usbid.~dpr

来自「測 USB 鼠 標 的 PVID 號」· ~DPR 代码 · 共 18 行

program USBID;

uses
  Forms,
  Main in 'Main.pas' {Mainfrm},
  ID in 'ID.pas' {idfrm},
  Error in 'Error.pas' {Errorfrm};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TMainfrm, Mainfrm);
  Application.CreateForm(Tidfrm, idfrm);
  Application.CreateForm(TErrorfrm, Errorfrm);
  Application.Run;
end.