程序运行后在任务栏不显示(50分)

  • 主题发起人 hbhhjjyy
  • 开始时间
H

hbhhjjyy

Unregistered / Unconfirmed
GUEST, unregistred user!
我做一个受控端程序我想在程序运行后在任务栏中不显示请各位大哥赐教。
 
SetWindowLong(Application.Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);
 
上面所序为一法
也可
Application.ShowMainFrom:=False;

MainFrom.Show;
 
ShowWindow( Application.handle, SW_HIDE)
 
看看热门帖子:
谈谈VCL程序标准化:
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1244894
再谈VCL程序标准化:
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1247595

写得太棒了。
 
ShowWindow(Application.Handle, SW_HIDE);
SetWindowLong(Application.Handle, GWL_EXSTYLE,
GetWindowLong(Application.Handle, GWL_EXSTYLE)
or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);
 
function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer; stdcall; external 'KERNEL32.DLL';
{$R *.DFM}
procedure TForm1.FormCreate(Sender: TObject);
begin
RegisterServiceProcess(GetCurrentProcessID, 1);
end;
按ctrl+alt+del 也看不到了
 
好的,多谢指点。
 
顶部