關鍵字:delphi
上面的步驟在實際編寫代碼時是這樣實現的: 1.//首先在FormCreate事件中編寫代碼 procedure TForm1.FormCreate(Sender: TObject); var ProgressBarStyle: integer; begin //將狀態欄的第二塊面板設為的自繪(即psOwnerDraw) StatusBar1.Panels[1].Style := psOwnerDraw; //將進程條放入狀態欄 ProgressBar1.Parent := StatusBar1;
延伸閱讀
文章來源于領測軟件測試網 http://www.kjueaiud.com/
關于領測軟件測試網 | 領測軟件測試網合作伙伴 | 廣告服務 | 投稿指南 | 聯系我們 | 網站地圖 | 友情鏈接
版權所有(C) 2003-2010 TestAge(領測軟件測試網)|領測國際科技(北京)有限公司|軟件測試工程師培訓網 All Rights Reserved 北京市海淀區中關村南大街9號北京理工科技大廈1402室 京ICP備10010545號-5 技術支持和業務聯系:info@testage.com.cn 電話:010-51297073 老湿亚洲永久精品ww47香蕉图片_日韩欧美中文字幕北美法律_国产AV永久无码天堂影院_久久婷婷综合色丁香五月
|