起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 338|回复: 2

关闭弹出窗体

[复制链接]
发表于 2011-1-19 16:10:02 | 显示全部楼层 |阅读模式
用ShowModal 出来的窗体 怎么关闭 用Close;好像无效

比如lForm :=TfrmCZLLD.Create(self.Context);
     try
lForm.ShowModal;
     finally
       lForm.Free;
    end;

在 子窗体的 按钮控件事件中 写Close;  好像没有效果。
回复

使用道具 举报

 楼主| 发表于 2011-1-19 16:13:52 | 显示全部楼层
子窗体按钮控件事件写这个ModalResult := Business.Forms.Controls.mrOK; 是可以 但是还有其他方式吧????
回复 支持 反对

使用道具 举报

发表于 2011-1-19 16:33:45 | 显示全部楼层
应该有效果的,是不没编译,好像这个也可以

未命名.jpg

11.46 KB, 下载次数: 129

回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2024-12-23 14:22 , Processed in 0.040066 second(s), 18 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表