請問各位: 請問要怎麼再DBGrid新增一個自動編號的欄位??? 前提是: 這個欄位是RunTime產生的, 並不是透過資料表去做設定 我現在的做法是 在 ADOQuery 新增一個Calculate的欄位 然後在ADOQuery1CalcFields(DataSet: TDataSet); 寫 i := i 1 ; ADOQuery1.Fields.FieldByName('Index').AsInteger := i 1; 結果是只出現我新增的這個欄位 其它的資料都不見了 而且在看資料時 新增的這個欄位會一直增加 請問要怎麼做啊??? 謝謝~

您好﹗    請參考﹕ http://delphi.ktop.com.tw/topic.php?TOPIC_ID=37962 大同小異﹐稍稍改動Select語法后的欄位名﹐將自動編號欄位放在第一位置即可        ===================== 努力,相信會獲得美麗! 忻晟

------
忻晟

procedure TForm1.ADOQuery1AfterOpen(DataSet: TDataSet); begin i:=0; end; procedure TForm1.ADOQuery1CalcFields(DataSet: TDataSet); begin i:=i 1; ADOQuery1.FieldByName('No').AsInteger:= i; end;

謝謝cashxin2002的建議 但是這樣做要產生很多的sql command 不是很方便... 謝謝payne的建議 但是我其它的欄位怎麼都不見啦 再說明一下好嗎! 感激~

您好﹗    這個問題是因為沒有將資料欄位加入DBGrid元件的欄位編輯器中﹐使用新增欄位的步驟如下﹕    1﹒首先在DBGrid增加此欄位﹐您必須在DBGrid的欄位編輯器中（雙擊DBGrid可開啟此編輯器）﹐需要加入所有的欄位﹐并新增一個欄位（Column）﹒ 2﹒然后在ADOQuery元件的欄位編輯器（雙擊ADOQuery可開啟此編輯器）﹐也需要加入所有的資料表欄位﹐并新增一個計算欄位作為對應DBGrid中的欄位﹒ 3﹒再在DBGrid的欄位編輯器中﹐指定剛才那個新增的欄位名的FieldName屬性值為ADOQuery欄位編輯器中的這個新增計算欄位名稱﹒ 4﹒在ADOQuery元件的OnPost事件和OnCalcFields的事件中﹐寫入之前的程式碼﹐就可以了﹒    參考看看﹗    ===================== 努力,相信會獲得美麗! 忻晟 發表人 - cashxin2002 於 2003/10/02 11:56:40

------
忻晟

謝謝cashxin2002的詳細講解  我忘了說明一點 就是我的 >

您好﹗    這部分應該也可以用程式碼來完成吧﹐不過小弟還沒有試﹗ 估計程式碼的部分應該會复雜一些﹐因為涉及到><>===================== 努力,相信會獲得美麗! 忻晟

------
忻晟