发信人: a_ning()
整理人: yueqs(2000-12-05 19:33:07), 站内信件
|
【 在 powerjeep (恋曲2000) 的大作中提到: 】
: 我要在任务栏里放一个图标
: 然后将应用程序隐藏。
: 当用户右键点击图标时，弹出一个POPUP MENU，
: 而且当程序检测到某个端口有消息发过来时，
: .......
第一个问题，可能是win系统的问题！这个问题也不算大，可以不理吗！
至于第二个问题吗？可以参考以下的程序。
Hwnd := FindWindow('TForm1','记事本');
if Hwnd=0 then
begin
Application.Initialize;
Application.CreateForm(TFDate, FDate);
Application.Run;
end else
if Not IsWindowVisible(Hwnd) then
PostMessage(Hwnd,wm_User,0,0);
SetForegroundWindow(Hwnd);
--
来自珠江三角洲的我，可否有缘跟您做个朋友？
多情戴妃无情客，A_Ning是也！
※ 来源:．月光软件站 http://www.moon-soft.com．[FROM: 202.96.191.124]
|
|