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

PageControl 上的 TabSheet 美化處理

 
Louis_H
一般會員


發表:7
回覆:19
積分:10
註冊:2005-10-07

發送簡訊給我
#1 引用回覆 回覆 發表時間:2011-11-24 17:25:35 IP:59.125.xxx.xxx 未訂閱
前題:最近要將即有 BCB5 開發的 程式 UI 做美化的工作,
就在遇到 PageControl 這個元件時,上面的 TabSheet 無法用 其它元件 方式來覆蓋..
也就是背景與內容都用底色或Image方式美化好了...唯獨..
TabSheet 無法美化,只能用 Drawtab 方式變更顯示文字與底 的顏色而已...XD
作法:後來發現 ( 小弟覺得能分享給還不知道的大大們 ! ^^ )...
在 FormShow 時設定該 TabSheet 全都為 TabVisible = false
最後一定要指定 PageControl->ActivePageIndex = 0 ; ( 預設顯示的 TabSheet )
然後在 即有 PageControl 元件的上方放 Button 或 Image ..
在 Button 或 Image 的 觸發事件(On_Click) 內只需指定
PageControl->ActivePageIndex = 你想顯示的 TabSheet 即可。
結果:能用 Image 美化即有的 PageControl 上 Tab 的顯示;
在 FormShow 時即會將 PageControl 上 Tab 全部隱藏起來,
改由美美的 Image 按鈕來代替... XD
編輯記錄
Louis_H 重新編輯於 2011-11-24 02:28:44, 註解 無‧
系統時間:2024-04-19 8:29:19
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!