偶做个程序,不想让用户改变窗体大小,但是呢,也不能使用AutoSize属性,还可以怎么样设置属性呢?呵呵不好意思,高手不要笑话偶另,因为分不多,所以只能给10了,呵呵
解决方案 »
- 我读取4个BYTE值。。然后如何转换成LONGWORD值
- 求全套Developer Express控件包 For Delphi7
- Timage如何实现pan功能?
- Application.MessageBox的关闭问题
- 怎样把combobox1组件下拉列表内的项循环显示在combobox1.text中
- 请教一个关于数据库中建逻辑表临时使用的问题?
- 双击一表,提示输入表中字段 姓名,让指针指向所输入的那条姓名的字段。怎么实现
- 高手进.!一段导出成XML文件的代码.但出错.!
- pascal类型字符串和空类型字符串有何区别
- 各位大虾:请问如何调用第三方的Dll,如第三方SDK中的Dll.
- 我使用twordapplication控件,如何取得当前编辑文件的文件名
- 一个小问题 :)
2. Click一个Button, 弹出一对话框(就上面那个ShowMessage来着), 在对话框中Click - OK后关闭对话框, 再关闭窗体... 就是一模式窗体(10分)谢谢各位了/...
好像没有这个功能!
2. Click一个Button, 弹出一对话框(就上面那个ShowMessage来着), 在对话框中Click - OK后关闭对话框, 再关闭窗体... 就是一模式窗体(10分)
showmessage("sadsadsa");
close;
不知道你说得是不是这个意思!
formmodal.showmodal来调用这个窗体就是你要的
boderstyle设成bssingle
、、、、、、、、、、、、
show 一个normlbox ,判断是不是mrok 是则执行close,不是放弃。
-----------------------------------------------------------------------
在form中有个closequery事件 在里面写
if messagebox(self.handle,'','',mb_yesno+32)=idyes then
CanClose=true
else
CanClose=false;
自己添加一个窗口,在里面添加一个按钮,讲按钮的ModalResult改为mrOK,在原来的的窗体添加以下代码:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Showmodal;
close;
end;