|
Query1->RecordCount 값이 자꾸만 -1이 되는 이유를 모르겠습니다.
제가 로컬 파라독스에서는 값이 제대로 나타납니다.
하지만 2000서버를 사용하면 값이 자꾸만 -1이 됩니다.
Query1->RecordCount의 값이 0보다 크면 DBGrid의 선택한 레코드값을
Edit박스에 뿌려주는 모듈을 만들려고 합니다.
그런데 자꾸만 -1값을 리턴하네요
그리고 신기한건 DBGrid의 Query1이 연결되어 있어서 내용을 뿌려줍니다.
먼저 SELECT하면 부분입니다.
AnsiString sql;
bool flag=false;
Query1->Close();
Query1->SQL->Clear();
sql="select * From tb_S_History_Sub where ";
if(NameCheck->Checked==true)
{
sql+="Name='"+Insa->Text+"'";
flag=true;
}
if(DateCheck->Checked==true)
{
if(flag==true)sql+=" and ";
sql+="BDate='"+DateToStr(WrkDate->Date)+"'";
flag=true;
}
if(ComCheck->Checked==true)
{
if(flag==true)sql+=" and ";
sql+="h_code='"+Company->Text+"'";
flag=true;
}
if(flag==true)sql+=" and ";
sql+="busegu='"+ClassGu+"'";
sql+=" order by jcdate1 DESC,Item_Name,SerialNo";
Query1->SQL->Add(sql);
Query1->Open();
그리고 처리하는 부분입니다.
if(Query1->RecordCount > 0)
{
switch(check)
{
case 0:
EditInDB(Sender);
break;
case 2:
EditInDB(Sender);
InsSetup(Sender);
ModCheck=true;
Bookmark=Query1->GetBookmark();
SaveBtn->Enabled = true;
Insa->SetFocus();
break;
case 3:
EditInDB(Sender);
DelDB(Sender);
DBGrid1->SetFocus();
break;
}
}
else
{
ShowMessage("데이타가존재하지않습니다");
}
너무 답답해서 미치겠습니다.
오늘 저녁내내 이것만 들여다 봤습니다.
부디 선배님들의 도움 부탁드립니다.
그럼 수고하세요!!
|