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

TWinXP 讓程式有XP風格的元件,工具列的按鈕沒有壓下的感覺

尚未結案
hornacek
一般會員


發表:29
回覆:76
積分:21
註冊:2004-02-02

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-03-13 22:54:53 IP:220.138.xxx.xxx 未訂閱
我用TWinXP來使我的程式有XP的風格,但是唯獨工具列的按鈕沒有壓下去的感覺,感覺只是按鈕的圖形消失,如何才能讓工具列的按鈕有像IE的工具列按鈕一樣,有壓下的感覺?感激~~~謝謝各位大大的教導!   
hornacek
一般會員


發表:29
回覆:76
積分:21
註冊:2004-02-02

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-03-16 23:04:27 IP:220.139.xxx.xxx 未訂閱
沒有人用過XP風格的工具列嗎?按鈕按下去沒有下壓,只是消失? 不知道有沒有人知道要如何解決~~~感激不盡!   
TTL
一般會員


發表:4
回覆:17
積分:4
註冊:2004-01-30

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-03-19 02:44:25 IP:203.187.xxx.xxx 未訂閱
你說的是toolbar嗎 ?? 我試過是可以..不過按下去時字體會變大.. 變的不好看..
hornacek
一般會員


發表:29
回覆:76
積分:21
註冊:2004-02-02

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-03-19 09:16:51 IP:202.145.xxx.xxx 未訂閱
引言: 你說的是toolbar嗎 ?? 我試過是可以..不過按下去時字體會變大.. 變的不好看..
可不可以請問是怎麼做到的? 我將winxp.dcr, WinXP.pas, winxp.res放入程式的資料夾中, 然後Add to project->WinXP.pas,使程式有XP風格, 但按下工具列的按鈕時,在滑鼠不放開的情況下,沒有按下去的感覺, 可是字體沒有變大的情形發生,就只有回復到滑鼠離開工具列按鈕的狀態...
TTL
一般會員


發表:4
回覆:17
積分:4
註冊:2004-01-30

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-03-21 10:03:08 IP:203.187.xxx.xxx 未訂閱
感覺你沒有套用成功??.. Twinxp  pas檔加入project後(記得存檔)... VCL會出現一個新物件.... 拉一個到FORM....試試吧.. 參考這幾篇文章看看...    http://delphi.ktop.com.tw/topic.php?TOPIC_ID=44658 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=21344 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=44740
hornacek
一般會員


發表:29
回覆:76
積分:21
註冊:2004-02-02

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-03-21 16:11:34 IP:220.138.xxx.xxx 未訂閱
引言: 感覺你沒有套用成功??.. Twinxp pas檔加入project後(記得存檔)... VCL會出現一個新物件.... 拉一個到FORM....試試吧.. 參考這幾篇文章看看... http://delphi.ktop.com.tw/topic.php?TOPIC_ID=44658 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=21344 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=44740
感謝你的指導,安裝TWinXP後,在VCL最後一個出現TMS的頁面,裡面只有一個元件WinXP,把這個元件拉到我寫的程式中,可以使得程式有XP風格~~~ 但是問題就是ToolBar的按鈕,當滑鼠在按鈕上,很正常的出現XP風格凸起來的效果,但按壓下去後,卻沒有ToolBar按鈕Down的效果,我試過了BCB5及BCB6都有這樣的問題,不知道我是哪裡沒有用好呢?其它元件都很正常的有XP風格,感謝大大不厭其煩的指導,謝謝!感激不盡!
hornacek
一般會員


發表:29
回覆:76
積分:21
註冊:2004-02-02

發送簡訊給我
#7 引用回覆 回覆 發表時間:2004-03-22 00:03:20 IP:220.138.xxx.xxx 未訂閱
這邊找到一個例子: http://www.torry.net/vcl/packs/interfacemiddle/myxpstyleenglish.zip 我作出來的XP風格的程式就像這個壓縮檔裡包含的程式一樣... 工具列在按壓時沒有壓下去的感覺~~~
hornacek
一般會員


發表:29
回覆:76
積分:21
註冊:2004-02-02

發送簡訊給我
#8 引用回覆 回覆 發表時間:2004-03-25 14:33:39 IP:210.243.xxx.xxx 未訂閱
目前試出Theme Manager可以有下壓的效果,但TWinXP使終只有消失的效果,不知道我是不是哪裡有設錯,現在只好先暫時用Theme Manager囉!Theme Manager真的是滿強大的,連BitButton都能有XP的風格,不過我的程式大小也由400K,增加到640K,還是得付出代價~~~    發表人 -
系統時間:2024-06-26 11:45:07
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!