如何在运行一个DELPHI程序时，隐藏桌面上的图标(50分)

S

soit

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-05-22

• #1

如何在运行一个DELPHI程序时，隐藏桌面上的图标

 

L

liwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-05-23

• #2

可能是这个：
application.hide;

或者
showwindow(application.handle,sw_hide);

 

L

LSS

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-05-23

• #3

我给你发个例子，请查收

 

Y

yxshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-05-30

• #4

lss,give me a copy please!

 

L

LSS

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-05-31

• #5

yxshi,我已经给你发过去了，soit收没收到为什么不给个话

 

C

CJ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-06-01

• #6

RxLib中的AppEvent可做到

 

3

3p

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-06-01

• #7

看来例子很保密，或是很长？公开如何？

 

T

tongle

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-06-03

• #8

　　要实现该功能只要在OnCreate事件里利用到API函数SetWindowLong
即可。
procedure TForm1.FormCreate(sender:TObject);
begin
SetWindowLong(Application,Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);
end;

 

L

LSS

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-06-04

• #9

program DeskTop;

uses
Windows, sysutils;
var
WndClass: array[0..50] of char;
begin
StrPCopy(@WndClass[0], 'Progman');
ShowWindow(FindWindow(@WndClass[0], nil), SW_HIDE); //隐藏图标
// ShowWindow(FindWindow(@WndClass[0], nil), SW_RESTORE); //显示图标
end.
{这是一个工程文件desktop.dpr，直接运行就可以了}

 

S

soit

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-07-24

• #10

不好意思，拖了这么长的时间，我的MODEM昨天才修好
谢谢大家的帮助

 

S

soit

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-07-24

• #11

多人接受答案了。