server_old_ocx.dpr

来自「利用api函数重新启动一个程序的小程序」· DPR 代码 · 共 17 行

program Server_Old_OCX;

uses
  Forms,
  main in 'main.pas' {Form1};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '服务器模拟程序';
  Application.CreateForm(TForm1, Form1);
  Application.ShowMainForm:=False; 
  Application.Run;
end.