学习型 ASP/PHP/ASP.NET 主机 30元/年全能 ASP/PHP/ASP.NET 主机，支持月付专业 MSSQL 数据库空间，支持月付专业 MySQL 数据库空间，支持月付
‹‹ 上一主题 | 下一主题 ››
发新话题
打印

双击标题栏的问题!!

masefee519

新手上路

Rank: 1

帖子
40 
精华
0 
性别
男 
注册时间
2007-4-3 
1# 大 中 小 发表于 2007-12-5 21:07  只看该作者

双击标题栏的问题!!

我做了个程序都是全屏幕的,已经禁止了标题栏的最大化按钮,我想让用户只能最小化和关闭,但是当鼠标双击标题栏时,窗体能缩小,我想阻止这个操作,请问怎么实现,请给具体代码好吗??

搜索更多相关主题的帖子: 标题栏 鼠标 屏幕 窗体 按钮

TOP

provoke

注册会员

Rank: 2

帖子
111 
精华
0 
性别
男 
注册时间
2007-6-14 
2# 大 中 小 发表于 2007-12-5 22:45  只看该作者

在窗体的OnCanResize事件和OnResize事件中添加代码

procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,
  NewHeight: Integer; var Resize: Boolean);
begin
  Resize:=false;
end;

如果这样还不行，就再加上下面的：

procedure TForm1.FormResize(Sender: TObject);
begin
Form1.Left:=0;
Form1.Top:=0;
Form1.Width:=Screen.Width;
Form1.Height:=Screen.Height;
end;
爱我至爱，至死不渝！

TOP

masefee519

新手上路

Rank: 1

帖子
40 
精华
0 
性别
男 
注册时间
2007-4-3 
3# 大 中 小 发表于 2007-12-6 18:44  只看该作者
谢谢 嘿嘿
if(NextLife==true) cout<<\"我依然爱你！\"<

TOP

‹‹ 上一主题 | 下一主题 ››
发新话题