TADODataSet如何为某字段建立动态索引? |
|
尚未結案
|
|
lovelypp
初階會員   發表：122 回覆：111 積分：46 註冊：2003-02-19 發送簡訊給我 |
|
|
Fishman
尊榮會員  發表：120 回覆：1949 積分：2163 註冊：2006-10-28 發送簡訊給我 |
Hi lovelypp, 這裡有一篇文章，你參考看看
http://delphi.ktop.com.tw/topic.php?topic_id=42872 不過我剛剛試了一下 ADODataSet 似乎只接受
ADODataSet1.IndexFieldNames := Column.FieldName;
語法，
ADODataSet1.IndexName := Column.FieldName '_INDEX';
好像會產生錯誤訊息
------
Fishman |
|
Fishman
尊榮會員 發表：120 回覆：1949 積分：2163 註冊：2006-10-28 發送簡訊給我 |
Hi lovelypp, 看了你另外一篇發問
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=46175
發現了原來 ADODataSet1 有另一項屬性 ADODataSet1.Sort 可用(平常慣用 BDE)，在 D7 測試了一下沒有問題，你可以試試
procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
IF ADODataSet1.IndexFieldNames = Column.FieldName THEN
ADODataSet1.Sort := Column.FieldName ' DESC'
ELSE
ADODataSet1.IndexFieldNames := Column.FieldName;
end;
------
Fishman |
發表時間：2004-03-09 09:07:37
IP:218.104.xxx.xxx 未訂閱
系統時間：2024-06-30 0:10:35
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |