在TreeView上click的問題 |
|
答題得分者是：Fishman
|
|
老大仔
尊榮會員   發表：78 回覆：837 積分：1088 註冊：2006-07-06 發送簡訊給我 |
|
|
Fishman
尊榮會員  發表：120 回覆：1949 積分：2163 註冊：2006-10-28 發送簡訊給我 |
Add some codes in On_Mouse_Up event
<textarea class="vb" rows="10" cols="60" name="code">procedure TForm1.TreeView1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); var TN : TTreeNode; begin if Button = mbLeft then begin TN := TTreeView(SendeR).GetNodeAt(X,Y); if TN <> NIL then begin ShowMessage(Tn.Text); end; end; end; </textarea> Fishman
------
Fishman |
|
baby2321
初階會員 發表：52 回覆：165 積分：48 註冊：2005-06-11 發送簡訊給我 |
|
|
Mickey
版主 發表：77 回覆：1882 積分：1390 註冊：2002-12-11 發送簡訊給我 |
發表時間：2007-03-20 04:58:45
IP:220.132.xxx.xxx 訂閱
系統時間：2024-04-26 3:32:51
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |