同一條件查詢重複資料 |
尚未結案
|
braveheart
一般會員 發表:35 回覆:62 積分:24 註冊:2003-05-21 發送簡訊給我 |
要如何按一按鈕..能依次查詢相同條件下資料
TLocateOptions Opts_1; TLocateOptions Opts_2; Opts_1 << loPartialKey; Opts_2 << loPartialKey; ADOTable1->Next(); if((!ADOTable1->Locate(ComboBox1->Text, Edit1->Text, Opts_1)) && (!ADOTable1->Locate(ComboBox2->Text, Edit2->Text, Opts_2))) { ShowMessage("沒有相符合的資料!!"); }這是再一本書找到的程式...但只會查到第一筆符合條件的資料...若要再當再次按下時..會跳到下一比同條件下的資料....本想是用Next()....還是只會停在第一比同條件資料..無法依次往下查詢...請問先進如何解決...謝謝各位先進 |
johneyhu
一般會員 發表:6 回覆:7 積分:2 註冊:2003-04-06 發送簡訊給我 |
|
braveheart
一般會員 發表:35 回覆:62 積分:24 註冊:2003-05-21 發送簡訊給我 |
|
tech_state
版主 發表:44 回覆:638 積分:641 註冊:2003-02-10 發送簡訊給我 |
braveheart, 您好
請試試以下的code,是否符合您的需求?
bool TF; // 全域變數,判斷是否執行過查詢功能且有查到資料 void __fastcall TForm1::Button1Click(TObject *Sender) { if(TF) ADOTable1->Next(); else { AnsiString sqlpchg = ComboBox1->Text "='" Edit1->Text "' or " ComboBox2->Text "='" Edit2->Text "'"; ADOTable1->Filtered =false; ADOTable1->Filter = sqlpchg; ADOTable1->Filtered =true; if(ADOTable1->RecordCount < 1) { ShowMessage("沒有相符合的資料!!"); TF = false; } else TF = true; } }================================= 涵養怒中氣。謹防順口言。留心忙裡錯。珍惜有時錢。 是非終日有,不聽自然無 天下本無事,庸人自擾之 |
bee0606
一般會員 發表:22 回覆:30 積分:10 註冊:2003-08-12 發送簡訊給我 |
|
tech_state
版主 發表:44 回覆:638 積分:641 註冊:2003-02-10 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |