C
Carem
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.FormCreate(Sender: TObject);
begin
if Win32Platform = VER_PLATFORM_WIN32_NT then
begin
SvcMgr.Application.Initialize;
SvcMgr.Application.CreateForm(TService1, Service1); <=== 提示这里出错，是要新建进程，然后加入工程之中？
Forms.Application.CreateForm(TForm1, Form1);
SvcMgr.Application.Run;
end;
end;
目的是想判定如果是nt就将这个程序变成服务启动，当然还有windows的处理，我没写出来！
begin
if Win32Platform = VER_PLATFORM_WIN32_NT then
begin
SvcMgr.Application.Initialize;
SvcMgr.Application.CreateForm(TService1, Service1); <=== 提示这里出错，是要新建进程，然后加入工程之中？
Forms.Application.CreateForm(TForm1, Form1);
SvcMgr.Application.Run;
end;
end;
目的是想判定如果是nt就将这个程序变成服务启动，当然还有windows的处理，我没写出来！