熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> Delphi編程 >> 正文

用DELPHI在狀態欄中顯示進程條[1]

2013-11-23 17:35:46  來源: Delphi編程 
經常上網的朋友可能早就已經發現在一些浏覽器的底部會在某些情況下動態顯示一個進程條比如在顯示網頁的時候如果時間比較長就會出現一個一格一格前進的用以提醒用戶已經有多少數據被下傳下來它不僅僅出現在浏覽器中還經常被用於下載軟件中比如現在最熱門的BT下載軟件都使用了這一技術技術的改進源於工作的需要現在編寫網絡軟件那麼流行上面的小技巧應該是每個像我們這樣的編程愛好者都需要的吧


  打開DELPHI選擇WIN面板上的狀態欄(StatusBar)組件放到窗體(Form)上(圖默認情況下狀態欄組件將自動被擺放到窗體的底部(即Align屬性被設為alBottom)同時該狀態欄上初始為一個面板(Panel)為了使下面的表述清楚我們來給這個狀態欄加一個面板操作步驟如下

  雙擊狀態欄組件打開面板編輯器(Panels editor)

  右擊面板編輯器然後選擇Add添加一個面板

  選擇第一個面板在對象檢查器(Object Inspector)中選中Text屬性寫入Progress

  關閉面板編輯器

  僅僅有一個狀態欄當然不行今天的主角應該是Progress(進程條)才對現在我們把進程條擺放到窗體上來(圖


  看到上面的圖之後有的急性子讀者可能要問怎麼那個進程在狀態條的上面而不是在它的內部就是在面板上呢?這個不是我要的結果嘛!別急別急下面的才是今天的壓軸好戲把進程條放到狀態欄的面板上還能讓它動起來操作步驟如下

  把ProgressBar的Parent屬性設為StatusBar

  把StatusBar的第二塊面板的Style屬性改成psOwnerDraw這裡是解決問題的關鍵當Style被設為psOwnerDraw之後面板上就可以被放制其它的組件實現的方法是在OnDrawPanel事件中編寫代碼默認情況是被設為psText這樣就只能顯示文本就像第一塊面板那樣

[]  []  


From:http://tw.wingwit.com/Article/program/Delphi/201311/24749.html
    推薦文章
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.