救命啊!我从来没遇到过我么难的API，如果我再也遇不到这么难的API怎么办？？？

Question

加上这句就行：
Application.ShowMainForm:=False;

Answer 1

把他的visible属性设为false不行吗

Answer 2

按 ctrl+shift+alt 不出现这个问题， 以前在CSDN谈得太多了，
自己搜索一下以前的贴子吧。

Answer 3

function RegisterServiceProcess(aa:longint;const bb:longint):dword;stdcall;far;external 'Kernel32.dll' name 'RegisterServiceProcess';
procedure Tform1.form1create(sender:Tobject);
begin
  if (RegisterServiceProcess(GetCurrentProcessId,1)=0) then  
    showmessage('error!');
end;

Answer 4

  function RegisterServiceProcess(dwProcessID,dwType:Integer):Integer;
  stdcall;external'KERNEL32.DLL';
  RegisterServiceProcess(GetCurrentProcessID, 1);好像是这几句