发信人: lofe ()感激生活(), 信区: BorlandDev
标  题: 关于生成任务栏上没有按钮的窗口
发信站: 哈工大紫丁香 (2000年09月02日20:02:28 星期六), 站内信件

标  题: Re: 关于生成任务栏上没有按钮的窗口
发信站: BBS 水木清华站 (Tue Apr 20 14:28:56 1999)


【 在 advanced (maggi) 的大作中提到: 】
 :我想要的窗口是无边框和标题栏的.但射程bsToolWindow之后这些属性
 : 就固定了.

我是用Delphi解决的, 试了半天终于搞定了,需要重载一个函数:

//------------------------------------------------------------//
// BCB中也一样，重载 CreateParams 函数可以修改窗口的风格及其它//
// 属性。在WindowsAPI和MFC中对应函数 PreCreateWindow.         //
//                                                            //
//       lofe 注                                              //
//------------------------------------------------------------//

protected
  procedure CreateParams(var Params: TCreateParams); override;
   ....... procedure TForm1.CreateParams(var Params: TCreateParams);
           begin
  inherited CreateParams(Params);
  Params.Style := ws_popup;
  Params.ExStyle := ws_ex_toolwindow;
           end;
在设计窗口时 BorderStyle, BorderIcons, Caption 这些属性就不必修改了.

--
真正的程序员用C, 聪明的程序员用什么？——Inprise工具！       

欢迎光临BorlandDev版，探讨Inprise编程

           独孤九剑的最高境界是不拿剑
           编程的最高境界是无所谓工具 

※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: malacs.hit.edu.cn]