|
결론은 에러네여...ㅡ.ㅡ;;
일단 구조는 부모폼이 메인폼으로 되어있는 로긴폼입니다...
아..그러니까요...
메인폼이 Create 될때 이벤트가 발생하구요...
글 발생하는 이벤트는..이러합니다.
Login_F = new TLogin_F(this);
Login_F->ShowModal();
위와 같이 해서 Login_F 폼이 생성 되었겠지여?
그럼 Login_F 의 Submit(확인) 이벤트는 이러합니다..
DM->DBQ->Close();
DM->DBQ->SQL->Clear();
if(EditID->Text!="" || EditPwd->Text!="")
{
DM->DBQ->SQL->Add("Select Pwd FROM User_T WHERE ID = '" + EditID->Text + "'");
DM->DBQ->Open();
if(DM->DBQ->RecordCount == 0)
{
ShowMessage("ID 존재하지 않음!!");
DM->DBQ->Close();
return;
}
src = DM->DBQ->FieldByName("Pwd")->AsString;
DM->DBQ->Close();
if(Trim(src) != EditPwd->Text){
ShowMessage("패스 확인 다시해주세요!");
return;}
else
MainForm->A2(2);
MainForm->A1(1);
}
else
ShowMessage(" ID & PASS 를 입력해주십시요.");
}
DM 은 DataModule 이구요.
DBQ 는 Query 입니다.
프로젝트 옵션에선...
MainForm 과 DM 은 초기 생성이구요.
Login_F 은 생성하지 않도록 되었습니다.
제가 설명이좀 어리버리 합니다만... 부족하문 다시 할게요..말씀해주시구요...
문제가 발생하는곳은 ㅡ.ㅡ; 제일 첫부분...
DM->DBQ->Close();
에서 에러가 뜨는데...
아마도 이부분을 지우더라도..다음에서 또 에러가 날듯합니다...
모달폼은 모듈폼과 연결이 안되나여?
어케 해결을 해야 할까여?
|