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

請問如何測知使用者在Dbgrid上的那個欄位台頭上連按了二下???

 
rich777
一般會員


發表:25
回覆:25
積分:10
註冊:2002-04-22

發送簡訊給我
#1 引用回覆 回覆 發表時間:2002-05-10 08:07:48 IP:61.59.xxx.xxx 未訂閱
請問各位高手們~~~~ 一個Dbgrid元件有相當多的欄位~~~~ 如何得知使用上在那個欄位抬頭上連按滑鼠二下呢??? ps.不管Dbgrid的儲存格是否取得輸入焦點的情況下都要能測知~~~~ 感謝~~~
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2002-05-10 08:35:55 IP:211.22.xxx.xxx 未訂閱
以下是 TDBGrid 的 OnClick 事件 不過不是 Double Click procedure TForm1.DBGrid1TitleClick(Column: TColumn); begin ShowMessage(Column.FieldName); end;
ccchen
版主


發表:61
回覆:940
積分:1394
註冊:2002-04-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2002-05-10 11:18:30 IP:163.29.xxx.xxx 未訂閱
1. 可以結合onDblclick及onTitleclick達到目的 當在Title區Double Click時產生之Event為 TitleClick->DblClick->TitleClick ... public inDblClick:Boolean; { Public declarations } end; ... procedure TForm2.FormCreate(Sender: TObject); begin table1.open; end; procedure TForm2.DBGrid1DblClick(Sender: TObject); begin inDblClick:=True; end; procedure TForm2.DBGrid1TitleClick(Column: TColumn); begin if inDblClick then showmessage('Title:' column.FieldName); inDblClick:=False; end; procedure TForm2.DBGrid1CellClick(Column: TColumn); begin inDblClick:=False; end; 2. 以上為簡單之解決方法, 若要一勞永逸應如下: 為DBGrid寫一個 wndproc, 攔截message WM_LBUTTONDBLCLK; 於此Event中,檢查Mouse位置後Fire TitleDblClick
系統時間:2024-03-29 16:30:47
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!