怎样制作真正的TopMost窗口 -pc6资讯

您的位置：首页 → 资讯 → 编程开发 → 怎样制作真正的TopMost窗口

怎样制作真正的TopMost窗口 时间：2010/2/22 11:52:00来源：本站整理作者：我要评论(0)

怎样制作真正的TopMost窗口：

　　如果一个TOPMOST窗口不是MainForm的话，那么即将将它设为总在顶端，它也会随着主窗口的前摆而前摆，后摆而后摆。那么怎么解决这个问题呢？

            先将窗口的BorderStyle设为bsNone,FormStyle设为fsStayOnTop。
            procedure TForm3.CreateParams(var Params:TCreateParams);
            begin
             inherited;
             with Params do
             begin
              Style:=Params.Style xor WS_DLGFRAME;
              WndParent:=0;//此行
             end;
            end;

            procedure TForm3.FormCreate(Sender: TObject);
            begin
             Width:=36;
             Height:=36;
             SetWindowLong(Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);
            end;

相关视频

没有数据

文章评论

查看所有0条评论>>

热门文章 没有查询到任何记录。