修改工程文件：

Application.Initialize;

Application.CreateForm(TmainForm, mainForm);
 Application.ShowMainForm:= False;

if LoginForm.ShowModal then
    begin
     Application.ShowMainForm := True;
     Application.Run;
    end
else
begin
 Application.Terminate;
end;

相關推薦