我的查詢程式，為什麼執行會變成把資料修改了呢？ void __fastcall TForm4::Button1Click(TObject *Sender) {   Table1->RecordCount;   Table1->First();   for (int i=0;iRecordCount;i ){ if(Table1->FieldByName("ID")->AsString == DBEdit1->Text){ Form2->flg=true; break; } Table1->Next(); } if (Form2->flg=false)ShowMessage("資料庫中不含此資料!!!"); } 請教教我吧！謝謝！ 發表人 - taishyang 於 2004/06/10 17:14:14

junichikimi, 您好 由您提供的資料看不出會修改資料， 您說修改資料的部分可能是其他程式碼(code)造成的， 如您不方便提供更多的程式碼， 可能就要請您有耐心一點， 設定中斷點慢慢debug， 找出真正會修改資料的部分囉！ Good Lucky!! ================================= <>涵養怒中氣。謹防順口言。留心忙裡錯。珍惜有時錢。 <>是非終日有，不聽自然無 <>天下本無事，庸人自擾之

此行有問題吧！ if (Form2->flg = false)ShowMessage("資料庫中不含此資料!!!"); Form2->flg 被改成 false了。

你程式有點怪喔,改一下看看..  

void __fastcall TForm4::Button1Click(TObject *Sender)
{
//Table1->RecordCount; 
  Table1->First();
  for (int i=0;iRecordCount;i  ){
   if(Table1->FieldByName("ID")->AsString == DBEdit1->Text){
    Form2->flg=true;
    break;
   }
   Table1->Next();
  }
  if (Form2->flg==false)
    ShowMessage("資料庫中不含此資料!!!");
}     

發表人 - bass15 於 2004/06/15 10:47:28