我把快闪窗体放在一个dll中，可是调用后，在任务栏上会出现东西，这样感觉像是两个软件一样，很不好？谁知道去掉任务栏上东西的方法，要dll中的哟！(100分)

我把快闪窗体放在一个dll中，可是调用后，在任务栏上会出现东西，这样感觉像是两个软件一样，很不好？谁知道去掉任务栏上东西的方法，要dll中的哟！

SetWindowLong

TO：powerjet
能具体点吗？谢谢！

procedure HideTitlebar;
var
save : LongInt;
begin
if BorderStyle = bsNone then Exit;
Save := GetWindowLong(Handle,gwl_Style);
if (Save and ws_Caption)=ws_Caption then Begin
Case BorderStyle of
bsSingle,
bsSizeable : SetWindowLong(Handle,gwl_Style,Save and (Not(ws_Caption)) or ws_border);
bsDialog : SetWindowLong(Handle,gwl_Style,Save and (Not(ws_Caption)) or ds_modalframe or ws_dlgframe);
end;
Height := Height-getSystemMetrics(sm_cyCaption);
Refresh;
end;
end;

把调用程序的Application.Handle传到dll中去，就可以了。
看看dll的例程。

快闪窗体的Create中加
SetWindowLong(Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);