全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1513
推到 Plurk!
推到 Facebook!

dbgrid內的column值的取得 ?????(不簡單)

尚未結案
seedbcc
高階會員


發表:232
回覆:272
積分:105
註冊:2003-12-10

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-03-08 15:40:52 IP:61.59.xxx.xxx 未訂閱
假設我選取DBGRID內的某個COLUMN 而此column值的取得方式為 dbgrid1.SelectedField.asstring 但是我想取得 這個column右測column的值? 要如何取得呢?
Fishman
尊榮會員


發表:120
回覆:1949
積分:2163
註冊:2006-10-28

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-03-08 16:01:48 IP:210.65.xxx.xxx 未訂閱
Hi seedbcc,    
procedure TQueryForm.Button1Click(Sender: TObject);
begin
    ShowMessage(dbgrid1.Columns.Items[dbgrid1.SelectedField.Index   1].Field.AsString);
end;
---------------------------------- 小弟才疏學淺,若有謬誤尚請不吝指教 ----------------------------------
------
Fishman
seedbcc
高階會員


發表:232
回覆:272
積分:105
註冊:2003-12-10

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-03-08 16:33:24 IP:61.59.xxx.xxx 未訂閱
出現錯誤訊息 如下: list index out of bounds(3)
Fishman
尊榮會員


發表:120
回覆:1949
積分:2163
註冊:2006-10-28

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-03-08 17:12:52 IP:210.65.xxx.xxx 未訂閱
Hi seedbcc,    
procedure TQueryForm.Button1Click(Sender: TObject);
begin
    IF dbgrid1.SelectedIndex < dbgrid1.Columns.Count - 1 THEN
        ShowMessage(dbgrid1.Columns.Items[DBGrid_ORDER_DETAILS.SelectedField.Index   1].Field.AsString)
    ELSE
        ShowMessage('已在 DBGrid 最右側 !!');
end;
---------------------------------- 小弟才疏學淺,若有謬誤尚請不吝指教 ----------------------------------
------
Fishman
kevin622
一般會員


發表:0
回覆:22
積分:9
註冊:2003-10-16

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-03-08 22:24:58 IP:210.244.xxx.xxx 未訂閱
引言: 出現錯誤訊息 如下: list index out of bounds(3)
這個訊息表示你要讀取的欄位已超出你原有的欄位了..所以你必須判斷欄位在最後一個時,就不可以在讀取下一個欄位的值。答案已由樓上的先生告訴你了..^^ §§§ 量力而為 §§§ 當覺得力量不足時,就是該為自己充電的時候了。
系統時間:2024-11-05 5:36:57
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!