在delphi中新建的窗体怎样在任务栏内显示?(100分)

5

5i1zhou

Unregistered / Unconfirmed
GUEST, unregistred user!
在delphi中新建的窗体怎样在任务栏内显示?
 
sorry,不太明白意思!
up!
 
是不是说子窗口显示在任务栏呢?是的话送你一个过程:
在子窗口的private中声明一下:
procedure CreateParams(var Params: TCreateParams); override;

procedure Ttbcx_frm.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.WndParent := GetDesktopWindow;
end;
 
怪事。!※※
在delphi中新建的窗体怎样在任务栏内显示?
它会自己显示啊。以前的问题都是问怎么不显示的。
是不是问错了?也许没有说清楚吧
 
不会自己显示的,我试过(在win98里)。
而我上面的过程就是让它也显示在任务栏上面。
 
to

TForm1 = class(TForm)
procedure CreateParams(var Params: TCreateParams); override;
private
{ Private declarations }
public
{ Public declarations }
end;


procedure Tform1.CreateParams(var Params: TCreateParams);
begin
inherited ;
Params.WndParent := 0;
end
 
楼上的做法也行,异曲同工
 
没那麽复杂吧,有一句就搞定
Application.Title := ‘你要显示的内容’
 
to 墙头草:
你的方法不行吧,这样只是把原来主窗口的title改变了一下而已。
 
alan_yang 兄弟感谢你告诉我我的错误。
呵呵 不好意思误导了,我以为是他要显示最初的exe呢
 
呵呵,没关系。
只是这位仁兄今天怎么没上来看看呢?也不知道他的意思是不是这样。
 
非常感谢大家的帮助:
对 alan_yang pcc_mmz1 说声谢谢
 
呵呵,不用客气,要紧的是结束问题分配分数啊。:D:D:D
 
顶部