batchtestallbox.dpr

来自「自己用API编写的端口通讯」· DPR 代码 · 共 18 行

program BatchTestAllBox;

uses
  Forms,
  TestControl in 'TestControl.pas' {Form1},
  CabinetControler in 'CabinetControler.pas',
  MyThread in 'MyThread.pas',
  OneBoxThread in 'OneBoxThread.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '光盘柜测试';
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.