S
sqgszxy
Unregistered / Unconfirmed
GUEST, unregistred user!
我想做一个先出现登录界面，待审核通过后再出现主界面，可是登录界面一闪而过，当把审核条件取消直接建立主界面时，登录界面却有显示。 代码如下：
Application.Initialize;
Application.Title := 'TEST;
login:=Tlogin.Create(Application);
//登录界面
login.Show;
if check then
//check为登录窗口全局变量，boolean类型
begin
Application.CreateForm(TMainForm, MainForm);
//主界面
login.Free;
end;
Application.Run;
Application.Initialize;
Application.Title := 'TEST;
login:=Tlogin.Create(Application);
//登录界面
login.Show;
if check then
//check为登录窗口全局变量，boolean类型
begin
Application.CreateForm(TMainForm, MainForm);
//主界面
login.Free;
end;
Application.Run;