請問如何將Query結果放在List或Array中處理？ |
|
尚未結案
|
|
ajyi
一般會員   發表：1 回覆：4 積分：1 註冊：2003-01-07 發送簡訊給我 |
|
|
yehcwin
一般會員 發表：1 回覆：10 積分：2 註冊：2002-06-11 發送簡訊給我 |
|
|
ajyi
一般會員 發表：1 回覆：4 積分：1 註冊：2003-01-07 發送簡訊給我 |
引言: 有沒有試過 TStringList . 它有locate的效果,也可以做sort,可是只能儲存兩個值. 若搭配Variant陣列應該可以做到多欄位的效果.TString在功能上的確很方便， 但TStringList不是只能add AnsiString的值嗎？ 如何搭配Variant Array呢？ 是把Query出來的一筆Record中的每個欄位值塞入一個TStringList中嗎？ 如： TStringList sl1=new TStringList(); for (int i=0;i |
|
william
版主   發表：66 回覆：2535 積分：3048 註冊：2002-07-11 發送簡訊給我 |
|
|
yehcwin
一般會員 發表：1 回覆：10 積分：2 註冊：2002-06-11 發送簡訊給我 |
------------ 存入 ------------------
// ID:Key值
for (int i=0;i〈RecordCount;i ){
sl1->Add(pQuery->Fields->Fields[ID]->AsString "=" String(i));
} Variant aVariant[iRecordCount] ;
int j=0
for (pQuery->First();!pQuery->Eof;pQuery->Next()){
aVariant[j] = VarArrayCreate( OPENARRAY(int,(0,FieldCount-1)), varVariant ) ;
for (int i=0;i〈FieldCount;i ){
aVariant[j].PutElement( pQuery->Fields->Fields[i]->Value, i );
}
j ;
} ------------- 取出 -------------------------
// IDValue:pQuery->Fields->Fields[ID]->AsString
aVariant[sl1->Values[IDValue].ToInt()].GetElement( i ); 發表人 - yehcwin 於 2003/01/21 18:13:38
|
|
ajyi
一般會員 發表：1 回覆：4 積分：1 註冊：2003-01-07 發送簡訊給我 |
|
|
ajyi
一般會員 發表：1 回覆：4 積分：1 註冊：2003-01-07 發送簡訊給我 |
引言: Have you ever thought of creating the query at run time? Or copying the query result to some kind of memory table (e.g. TClientDataSet)?I need to create a result set which is copied from a query result at run time. I have tried TField , but it need to connect to db and it is not I want. Maybe using TClientDataSet is a good way, I will try that.Thanks. |
|
alvin1108
一般會員 發表：8 回覆：8 積分：3 註冊：2005-05-06 發送簡訊給我 |
引言: ------------ 存入 ------------------ // ID:Key值 for (int i=0;i〈RecordCount;i ){ sl1->Add(pQuery->Fields->Fields[ID]->AsString "=" String(i)); } Variant aVariant[iRecordCount] ; int j=0 for (pQuery->First();!pQuery->Eof;pQuery->Next()){ aVariant[j] = VarArrayCreate( OPENARRAY(int,(0,FieldCount-1)), varVariant ) ; for (int i=0;i〈FieldCount;i ){ aVariant[j].PutElement( pQuery->Fields->Fields[i]->Value, i ); } j ; } ------------- 取出 ------------------------- // IDValue:pQuery->Fields->Fields[ID]->AsString aVariant[sl1->Values[IDValue].ToInt()].GetElement( i ); 發表人 - yehcwin 於 2003/01/21 18:13:38發表人 - alvin1108 於 2005/06/05 00:16:28 |
發表時間：2003-01-07 16:22:21
IP:210.66.xxx.xxx 未訂閱
系統時間：2024-05-04 5:18:51
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |