form 上放几个button :每个button 的事件都是创建并打开一个窗体:
这些窗体为动态创建,且方法都相同:这些窗体在并都已经将visible设了false
如下
var form32:tform32;
begin
form32:=tform32.create(self);
form32.visible:=false;
form32.showmodal;
end
现在问题是;有的当点有的按时出现: cannt make a visible window modal 而有的则没有出现过
今天下在另一台机子上运行正常,便是换一台机子后,又有一个button点的出现上述错误
每当出现这个问题时,都没法解决 ,只有新建一个 form ,然后将原来 form 上的东西及代码拷过去
,不知那个大侠出手救命
这些窗体为动态创建,且方法都相同:这些窗体在并都已经将visible设了false
如下
var form32:tform32;
begin
form32:=tform32.create(self);
form32.visible:=false;
form32.showmodal;
end
现在问题是;有的当点有的按时出现: cannt make a visible window modal 而有的则没有出现过
今天下在另一台机子上运行正常,便是换一台机子后,又有一个button点的出现上述错误
每当出现这个问题时,都没法解决 ,只有新建一个 form ,然后将原来 form 上的东西及代码拷过去
,不知那个大侠出手救命
解决方案 »
- 请大家推荐一个单机数据库(要求较多)
- Filtered的用法
- 各位兄弟,我用dbedit显示数据,可以编辑,可是当程序不操作任何东西,一会儿鼠标就不能点在框里了。
- paradox数据库中类型为D的日期字段怎么查询呢? 比如查询该日期字段为2004-2-1到2004-12-31之间的记录怎么查呢?
- 初学者的两个小问题请高手多指教。
- 请问怎么捕获收到的ICMP报文??
- 一个很好的delphi免费网站www.toptang.com即将关闭,大家帮忙想想办法啊!
- sql语句出错!马上给分!
- 一个程序中用到了两种协议???
- 在windows9x如何隐藏进程?
- 这个错误是怎么引起的?
- 高分求解,菜鸟毕业设计中的两点问题,急!
在form32:=tform32.create(self);之后,form32.Visible就是False。
要是form32不是很重要的话,把form32.showmodal改为form32.show
因为用showmodal显示出来的窗体是独占前台的,这样会使得后面的窗体不工作,show就不会
begin
form32:=tform32.create(self);
form32.visible:=false;
form32.showmodal;
form32.release; //增加
end
form32.showmodal;这样才抱错 form32.visible:=false;
form32.showmodal;这样没错的
因为showmodal里一开始就进行了判断function TCustomForm.ShowModal: Integer;
var
……
begin
CancelDrag;
if Visible or not Enabled or (fsModal in FFormState) or (FormStyle = fsMDIChild) then
raise EInvalidOperation.Create(SCannotShowModal); 所以以上四种状态,不允许ShowModal
form32.visible:=false;
在 form332 的 Create 事件里面,隐藏。用完之后,记得 Free