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

請問如何取得一個非本程式元件的Hint資料 謝謝 !

缺席
cavy9999
一般會員


發表:16
回覆:21
積分:7
註冊:2002-03-13

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-05-22 07:52:28 IP:61.64.xxx.xxx 未訂閱
版主,先進 大家好. 若已知該元件Handle值, 也並非自己程式內的某個元件, 而是其他譬如是左下角的開始按紐, 請問如何取得該元件的Hint的資料 謝謝 !
wnhoo
高階會員


發表:75
回覆:443
積分:198
註冊:2003-04-22

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-05-22 08:41:02 IP:61.155.xxx.xxx 未訂閱
uses Unit2; {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var MYWinCon : TWinControl; begin MYWinCon := FindControl(form2.Button1.Handle); showmessage(MYWinCon.Hint) ; end; 风花雪月 e梦情缘
------
风花雪月 e梦情缘
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-05-22 08:55:14 IP:218.16.xxx.xxx 未訂閱
wnhoo, 知道甚麼叫 "非本程式元件" 或 "並非自己程式內的某個元件" 的意思嗎?
cavy9999
一般會員


發表:16
回覆:21
積分:7
註冊:2002-03-13

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-05-22 08:59:11 IP:61.64.xxx.xxx 未訂閱
ㄚ兄..您誤會了..快哭出來了 我是說不同一個程式執行檔,而不是不同表單. 我想您應該聽的懂的,就是想截取別人的程式中,某元件的Hint文字資料 謝謝.    
引言: uses Unit2; {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var MYWinCon : TWinControl; begin MYWinCon := FindControl(form2.Button1.Handle); showmessage(MYWinCon.Hint) ; end; 风花雪月 e梦情缘
wnhoo
高階會員


發表:75
回覆:443
積分:198
註冊:2003-04-22

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-05-22 09:28:04 IP:61.155.xxx.xxx 未訂閱
若已知該元件Handle值 我上面的红字部分,是可以改变的;您可以改成=若已知該元件Handle值风花雪月 e梦情缘
------
风花雪月 e梦情缘
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-05-22 09:37:13 IP:218.16.xxx.xxx 未訂閱
wnhoo 大仙    請問如何用 FindControl 來找  並非自己程式內的某個元件 先要燒個符,練個咒嗎? 在這篇拿了甜頭(那篇的分是該得的,因問題沒說明是外部程式)還不夠嗎? http://delphi.ktop.com.tw/topic.php?TOPIC_ID=30869 看來我要更新一下 給 wnhoo ,也給關心事件的K.Top網友 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=30664 的新增個案了 發表人 - Justmade 於 2003/05/22 09:39:52
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-05-22 09:55:25 IP:218.16.xxx.xxx 未訂閱
cavy9999,    我在 win32 api help 裡找不到 直接解決的方法,    到網上找暫時也找不到好的方法。    這已是暫時最接近的建議,但只是建議沒有實作出來,他們亦沒有說明最後試驗是否成功 : http://groups.google.com/groups?hl=zh-TW&lr=lang_zh-CN|lang_zh-TW|lang_en&ie=UTF-8&oe=UTF-8&selm=3B41DDA0.B7944746%40gmx.net < 上面的 Link 自動斷開請用 Copy and Paste 來開 > 先參考一下再幫你找找,不過別期望能找到啊 發表人 - Justmade 於 2003/05/22 09:58:05
wnhoo
高階會員


發表:75
回覆:443
積分:198
註冊:2003-04-22

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-05-22 09:59:19 IP:61.155.xxx.xxx 未訂閱
Justmade 兄:    你为什么不为cavy9999兄来解答,不论对与错。提个建议或想法也是好的,论坛就是用来讨论问题的,不是来看你-没事找事的。    很多篇,我都看到你没事上来插几句,也不是来解决问题或提建议的。我真不知道你想搞什么?!没事找事做!!!!    cavy9999兄的问题,我先提供个想法给他(不论对于错的),现在我也在帮cavy9999兄想想关于这个问题的解决方法。    风花雪月 e梦情缘
------
风花雪月 e梦情缘
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#9 引用回覆 回覆 發表時間:2003-05-22 10:31:46 IP:218.16.xxx.xxx 未訂閱
引言: Justmade 兄: 你为什么不为cavy9999兄来解答,不论对与错。提个建议或想法也是好的,论坛就是用来讨论问题的,不是来看你-没事找事的。 很多篇,我都看到你没事上来插几句,也不是来解决问题或提建议的。我真不知道你想搞什么?!没事找事做!!!! cavy9999兄的问题,我先提供个想法给他(不论对于错的),现在我也在帮cavy9999兄想想关于这个问题的解决方法。
錯的答案浪費發題者時間,也使搜尋時多出了許多垃圾。錯每人都有,但像你比例這樣多仍每勸不聽的卻非常少見。 我從不沒事找事,這種貼子最好一篇都沒有,這這代表你沒再亂貼。你亂貼我就指出,這個我一早說清楚了。 絕大部份情況下,我指出你的不對都順帶提出我能找到的解答的(若己有其他人作好的解答的話除外),有極少數是我完全找不到資料才沒題解答,但我也有權指出你的錯誤以免你害了別人。 你可以列出我"沒事找事"的文章嗎 ?
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#10 引用回覆 回覆 發表時間:2003-05-22 10:55:08 IP:218.16.xxx.xxx 未訂閱
這篇也可參考一下: http://groups.google.com/groups?hl=zh-TW&lr=lang_zh-CN|lang_zh-TW|lang_en&ie=UTF-8&oe=UTF-8&threadm=3B48AB6F.567582F6@gmx.net&rnum=23&prev=/groups?q=hint+win32+api+hwnd+get&hl=zh-TW&lr=lang_zh-CN|lang_zh-TW|lang_en&ie=UTF-8&oe=UTF-8&start=20&sa=N 看來不容易呢,而且最多只能找到正在顯示的 hint 而不能找到沒顯示的 Hint。
cavy9999
一般會員


發表:16
回覆:21
積分:7
註冊:2002-03-13

發送簡訊給我
#11 引用回覆 回覆 發表時間:2003-05-22 12:07:42 IP:61.64.xxx.xxx 未訂閱
感謝您 版主. 沒關係,如果將來知道解決的話,再Post出來,讓大家分享 謝謝您的用心!
wnhoo
高階會員


發表:75
回覆:443
積分:198
註冊:2003-04-22

發送簡訊給我
#12 引用回覆 回覆 發表時間:2003-05-22 17:42:52 IP:61.155.xxx.xxx 未訂閱
参考: 利用FindWindow將其他form物件下所有的資料取出來 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=30409    风花雪月 e梦情缘
------
风花雪月 e梦情缘
系統時間:2024-05-16 8:16:31
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!