＋设为首页 ＋添加到收藏夹
大家好，我有一个小问题，说一下
我用FORM1作主窗口，FORM2作登录窗口，我想作的是，如里密码不正确的话，还能显示登录窗口，继续输入密码，只到正确以后在进入FORM1，
我用了几种办法不行，还请高手们指点
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
TForm2 * st=new TForm2(Application);
st->ShowModal();
//
//主板类型标志
//
Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
PortIO->CloseDriver();
//delete PortIO; //有问题，警告框
return 0;
}
在TForm2中判断口令是否正确，如果不正确，Form2不退出
要达到你想要得功能，你可以在工程文件里写代码。这是我在delphi里写的代码，供你参考。
with TfrmLogin.Create(Application) do //TfrmLogin是你的登陆界面
begin
if not Execute then //Execute是你的登录界面中判断用户登录的方法
begin
Free;
Application.Terminate;//退出系统
Exit;
end;
Free;
end;
//我的代码结束
Application.CreateForm(TfrmEIMSMain, frmEIMSMain);//程序主界面
Application.Run;
