copier.dpr

用delphi开发的有关打印的驱动实例； LIBRARY genprint EXPORTS EnumPrintProcessorDatatypesW OpenPrintProc

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.