我先用一个登录窗口验证身份,验证身份输入正确后创建一个MainForm主窗体
窗体类型为TMDIFORM,
验证身份正确后 我是这样创建的:
mainfrm:=TMainfrm.Create(Application);
Mainfrm.Show;但是在MainForm窗体中 创建Childform 的时候
总提示错误“Cannot create form, No MDI forms are currently active”TChildform 我是这样创建的[窗体类型 TMDIchild]
procedure TMainFrm.N3Click(Sender: TObject);
var
ReceiveChild:TReceivefrm;
begin
ReceiveChild:=TReceivefrm.Create(Application);
Receivefrm.Show;
end;不知道是哪里不对了,请大家来帮忙看看 应该怎样做!
窗体类型为TMDIFORM,
验证身份正确后 我是这样创建的:
mainfrm:=TMainfrm.Create(Application);
Mainfrm.Show;但是在MainForm窗体中 创建Childform 的时候
总提示错误“Cannot create form, No MDI forms are currently active”TChildform 我是这样创建的[窗体类型 TMDIchild]
procedure TMainFrm.N3Click(Sender: TObject);
var
ReceiveChild:TReceivefrm;
begin
ReceiveChild:=TReceivefrm.Create(Application);
Receivefrm.Show;
end;不知道是哪里不对了,请大家来帮忙看看 应该怎样做!
解决方案 »
- delphi 调用 webservice问题,求助!
- 求月平均问题IFF
- delphi中 webbrowser1设置访问一个页面后 再次点击就调用IE啦 如何内部调用网页链接地址
- 请问一个关于释放内存的问题
- 怎样制作安装程序用哪个安装制作软件好一些简单一些???
- webbrowser控件怎么显示opendialog选择的htm文件啊?
- 请问哪有Delphi串口通信工程开发实例导航这本书光盘下载
- 暴难的问题,哪位牛人能搞定500分相送,绝不食言!
- xpmenu的控件?
- 有用overbyteICS控件的朋友吗,来看看访问这个网址的问题
- 救命!!!!求‘报价系统’的源程序,自己想参考一下,没做过这方面的东西!!!
- 为大家提供的算法加密模块--例子源码与KeyGen
在**.dpr中
begin
......
LoginForm:=TLoginForm.Create(Application); if LoginForm.ShowModal=mrok then
LoginForm.free
else
begin
LoginForm.free;
exit;
end;
.....
end.
loginfrom := Tloginfrm.create(nil);
loginfrom.Showmodal;
确定后close,否则不close
LoginForm:=TLoginForm.Create(Application); if LoginForm.ShowModal=mrok then
LoginForm.free
else
begin
LoginForm.free;
exit;
end;