MDI 程序中子窗体的管理(50分)

  • 主题发起人 主题发起人 plague
  • 开始时间 开始时间
P

plague

Unregistered / Unconfirmed
GUEST, unregistred user!
请问,通过什么代码(或属性设置)可以关闭子窗体,而不是仅仅最小化?
 
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
action:=cafree;
end;
 
先创建后释放
 
呵呵,无数遍了。
 
如果子窗体上不想有 bissytemmenu/biminimize/bimaximize 而用命令按钮,
想让使用者点按此命令钮才退出,此 button.click 事件中该用什么代码?
用 CLOSE 好像无用!
 
TO XF163:
有同样想法!
 
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
action:=cafree;
end; //其实是抄wjiachun兄的

之后再调用close方法就可以关闭了
 
action:=cafree;
 
接受答案了.
 
后退
顶部