H
hurryman
Unregistered / Unconfirmed
GUEST, unregistred user!
begin
Application.Initialize;
Application.CreateForm(TDataModule2, DataModule2);
try
logform:=tlogform.Create(application);
logform.ShowModal ;
if logform.ModalResult=mrok then
begin
Application.CreateForm(Tmainform, mainform);
application.Run ;
end;
finally
logform.Free ;
end;
Application.CreateForm(TmainForm, mainForm);
Application.Run;
end.
这是我的项目文件,我用的是MDI,那么,当我在主菜单选择注销的时候,又要调用登陆
的窗体,但,登陆窗体是在MDI的主窗体前生成的,我可以在MDI 的主窗体调用登陆的的
窗体,但是,我不能使用登陆窗体上的登陆按牛的功能了,就是说,我调出了登陆窗体,
输入用户名和密码后按确认没有效。大家帮我看看
Application.Initialize;
Application.CreateForm(TDataModule2, DataModule2);
try
logform:=tlogform.Create(application);
logform.ShowModal ;
if logform.ModalResult=mrok then
begin
Application.CreateForm(Tmainform, mainform);
application.Run ;
end;
finally
logform.Free ;
end;
Application.CreateForm(TmainForm, mainForm);
Application.Run;
end.
这是我的项目文件,我用的是MDI,那么,当我在主菜单选择注销的时候,又要调用登陆
的窗体,但,登陆窗体是在MDI的主窗体前生成的,我可以在MDI 的主窗体调用登陆的的
窗体,但是,我不能使用登陆窗体上的登陆按牛的功能了,就是说,我调出了登陆窗体,
输入用户名和密码后按确认没有效。大家帮我看看