copier.dpr

来自「虚拟打印机」· DPR 代码 · 共 16 行

program Copier;

uses
  Forms,
  ucopy in 'ucopy.pas' {Form1},
  threadcopy in 'threadcopy.pas';

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := 'copy procedure for <temp>\~emf*.tmp to <temp>\<count>.emf';
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.