procedure TForm1.WORD1Click(Sender: TObject);
var x:Tform;
begin
x:=Tform.Create(application);
x.FormStyle:=fsmdichild;
end;
上述代码动态创建了一个子窗体,但点该子窗体的关闭按钮,该子窗体却最小化了,我想为关闭按钮创建一个过程,以使该子窗体关闭.
var x:Tform;
begin
x:=Tform.Create(application);
x.FormStyle:=fsmdichild;
end;
上述代码动态创建了一个子窗体,但点该子窗体的关闭按钮,该子窗体却最小化了,我想为关闭按钮创建一个过程,以使该子窗体关闭.
解决方案 »
- cxgrid列下拉箭头筛选功能设置疑问
- 快过年了,预祝大家春节快乐!
- 我想住八宝山^_^
- delphi 让fieldbyname('均价').AsCurrency:=fieldbyname('总金额').AsCurrency/fieldbyname('总数量').AsCurrency通过
- form1.width 和form1.clientwidth 的区别
- 如何判断TmenuItem是否被点击?
- 复制HTML内容,然后粘贴成HTML后为什么会有乱码?
- 我在使用AdoQuery中的where 条件时,出现列名无效,
- 有关文本文件的操作
- 一个比较难的问题,有兴趣不妨进来聊聊。
- 程序结束问题
- 如何实现对ACCESS数据库的按权限访问?
Action := Cafree;