[阅读: 373] 2007-12-14 08:37:24
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.ExStyle := Params.ExStyle
or WS_EX_APPWINDOW;
Params.WndParent := GetDesktopwindow;
//以上2行,让这个 Form 可以单独在任务栏上显示代表自己的Button