線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1143
推到 Plurk!
推到 Facebook!

TdxDBGrid 抓值的問題

尚未結案
jch
中階會員


發表:111
回覆:224
積分:66
註冊:2003-12-01

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-09-09 13:58:49 IP:218.162.xxx.xxx 未訂閱
TdxDBGrid 如果在DblClick事件時,要抓取該行某一欄位的內容該如何做呢? 小弟目前是利用 num:=q1.FieldByName('diff_num').AsString;來抓值,一切正常,但是若是點TdxDBGrid 的抬頭做排序的功能時,畫面上的位置改變後,num:=q1.FieldByName('diff_num').AsString;抓到的值,還是原來的值,並不是畫面上看到的值,該如何在DblClick事件時抓取該筆資料中某一欄位的值呢?? ======================== 我是DELPHI5的初學者
ko
資深會員


發表:28
回覆:785
積分:444
註冊:2002-08-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-09-10 20:37:25 IP:61.221.xxx.xxx 未訂閱
jch 你好: 若用 num:=TdxDBGrid1.Fields[0].ASString ; 試一試吧!!!
------
======================
昏睡~
不昏睡~
不由昏睡~
jch
中階會員


發表:111
回覆:224
積分:66
註冊:2003-12-01

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-09-14 09:55:39 IP:163.17.xxx.xxx 未訂閱
TdxDBGrid1並沒有Fields屬性可以用!! 不知是否還有其他方法?? ======================== 我是DELPHI5的初學者
cd109
一般會員


發表:23
回覆:33
積分:11
註冊:2003-12-22

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-11-22 16:31:20 IP:203.66.xxx.xxx 未訂閱
 procedure TfrmToolGroup.dxDBGridMasterFilterChanged(Sender: TObject;
  ADataSet: TDataSet; const AFilterText: String);
     begin
      dxDBGridMaster.KeyField:='xxxx';//你要取值欄位的名稱
     end;
jch
中階會員


發表:111
回覆:224
積分:66
註冊:2003-12-01

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-11-23 11:21:07 IP:218.162.xxx.xxx 未訂閱
如cd109所說小弟在該事件將cd109大哥所指的dxDBGridMaster.KeyField:='xxxx';//你要取值欄位的名稱 設定好,但在排序後,於DBGRID onClick 事件上抓取得值依然有誤? procedure TfrmE2004A_4D2.dbg1FilterChanged(Sender: TObject; ADataSet: TDataSet; const AFilterText: String); begin dbg1.KeyField := dbg1DIFF_NUM.FieldName; end; procedure TfrmE2004A_4D2.dbg1DblClick(Sender: TObject); begin ShowMessage(q1.FieldByName('diff_num').AsString); ....... end; ======================== 我是DELPHI5的初學者
cd109
一般會員


發表:23
回覆:33
積分:11
註冊:2003-12-22

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-11-23 15:24:42 IP:203.66.xxx.xxx 未訂閱
請試試這個 procedure TfrmE2004A_4D2.dbg1FilterChanged(Sender: TObject; ADataSet: TDataSet; const AFilterText: String); begin dbg1.KeyField := 'diff_num'; end;
jch
中階會員


發表:111
回覆:224
積分:66
註冊:2003-12-01

發送簡訊給我
#7 引用回覆 回覆 發表時間:2004-11-23 15:54:17 IP:218.162.xxx.xxx 未訂閱
還是不行喔!! 我將 procedure TfrmE2004A_4D2.dbg1FilterChanged(Sender: TObject; ADataSet: TDataSet; const AFilterText: String); begin dbg1.KeyField := 'diff_num'; end; 加進去程式後,點擊DBGRID的抬頭做排序的動作後,dbg1FilterChanged的事件也都沒有觸發啊?? ======================== 我是DELPHI5的初學者
cd109
一般會員


發表:23
回覆:33
積分:11
註冊:2003-12-22

發送簡訊給我
#8 引用回覆 回覆 發表時間:2004-11-23 16:15:59 IP:203.66.xxx.xxx 未訂閱
dbg1.filter.active=true OptionsDB ==> edgoLoadAllRecords=True OptionsBehavior ==> edgoMultiSort=True 發表人 - cd109 於 2004/11/23 16:19:43
jch
中階會員


發表:111
回覆:224
積分:66
註冊:2003-12-01

發送簡訊給我
#9 引用回覆 回覆 發表時間:2004-11-23 16:56:32 IP:218.162.xxx.xxx 未訂閱
OptionsBehavior ==> edgoMultiSort=True 這句才是關鍵喔!!多謝!! ======================== 我是DELPHI5的初學者
系統時間:2024-11-22 21:58:43
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!