登陆框疑惑
本帖最后由 tnijerry 于 2013-10-28 10:40:03 编辑 为什么连上数据库了，输入的用户名和密码都正确，主界面却出不来呢？
下面是代码：
主程序代码：
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Application->ShowMainForm=false; // 使主窗口先不出现;
Form1->Visible=false;
Form2 = new TForm2(this);
if(Form2->ShowModal() == mrOk)
{
Form1->Visible= true ;
}
else
{
delete Form2;
Application->Terminate(); //程序结束
}
}
登陆框程序代码：
void __fastcall TForm2::Button1Click(TObject *Sender)
{
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
String sql ="select * from login where UserName = '"+Edit1->Text+"'";
sql += "and Password = '"+Edit2->Text+"'";
ADOQuery1->SQL->Add(sql);
ADOQuery1->Open();
if(ADOQuery1->RecordCount)
{
ModalResult = mrOk ; //用户名和密码正确时，此行代码确实是被执行了
}
else
{
ModalResult = mrCancel ;
}
}
[解决办法]
