如何将一个程序的任务栏按钮隐藏掉????? 有一个程序运行会在任务栏上有一个按钮,我如何通过另一个程序将这个程序在任务栏上的按钮给隐藏掉呢?看清楚是另外一程序! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 有FORM,在任务栏无按钮:procedure TForm1.FormCreate(Sender: TObject);begin ShowWindow(Application.Handle, SW_HIDE); SetWindowLong(Application.Handle, GWL_EXSTYLE, GetWindowLong(Application.Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW ); ShowWindow(Application.Handle, SW_SHOW);end; 不能实现你那样的。我有个思路,你可以做一下,先得到要隐藏程序的句柄,发送消息将其隐藏。 试一试这个?varWndClass: array[0..50] of char; Handle:WndClass: array[0..50] of char; StrPCopy(@WndClass[0], '程序主窗体名称'); Handle := FindWindow(@WndClass[0], nil); ShowWindow(Handle, SW_SHOW); procedure TForm1.FormCreate(Sender: TObject);begin SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);end;给分吧,呵呵 ShowWindow(Handle, SW_SHOW);和SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);都可以呀!!!! var HWndCalculator : HWnd;HWndCalculator := Winprocs.FindWindow(nil, '程序名称');SetWindowLong(HWndCalculator , GWL_EXSTYLE, WS_EX_TOOLWINDOW);未经调试,你自己根据思想试试。 udpclient或udpserver怎么接受数组数据啊?? 如果中间层写成一个dll是不是要注册为服务才能使用呀? 注销windows帐号 关于在Delphi中使用接口 如何改变贝尔曲线的颜色??? 关于函数参数 的 一个 疑问????????? 高薪诚聘delphi工程师 使用Socket出现的问题! 关于删除数据记录的问题 请教:在Delphi中如何自定义基类,不在使用默认的TObject.在C++中很容易,但在Delphi中好象不行。谢谢 特急呀。不完成就不能下班了。 一个关于SHELL编程的问题,高手请进!!!!!!!!!!! ★求教关于取字符串的问题!
procedure TForm1.FormCreate(Sender: TObject);
begin
ShowWindow(Application.Handle, SW_HIDE);
SetWindowLong(Application.Handle, GWL_EXSTYLE,
GetWindowLong(Application.Handle, GWL_EXSTYLE)
or WS_EX_TOOLWINDOW );
ShowWindow(Application.Handle, SW_SHOW);
end; 不能实现你那样的。
我有个思路,你可以做一下,先得到要隐藏程序的句柄,发送消息将其隐藏。
WndClass: array[0..50] of char;
Handle:WndClass: array[0..50] of char; StrPCopy(@WndClass[0], '程序主窗体名称');
Handle := FindWindow(@WndClass[0], nil);
ShowWindow(Handle, SW_SHOW);
begin
SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);
end;给分吧,呵呵
SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);
都可以呀!!!!
HWndCalculator : HWnd;
HWndCalculator := Winprocs.FindWindow(nil, '程序名称');
SetWindowLong(HWndCalculator , GWL_EXSTYLE, WS_EX_TOOLWINDOW);
未经调试,你自己根据思想试试。