关键字：delphi
上面的步骤在实际编写代码时是这样实现的： | 1.//首先在FormCreate事件中编写代码 procedure TForm1.FormCreate(Sender: TObject); var ProgressBarStyle: integer; begin //将状态栏的第二块面板设为的自绘（即psOwnerDraw） StatusBar1.Panels[1].Style := psOwnerDraw; //将进程条放入状态栏 ProgressBar1.Parent := StatusBar1;
延伸阅读
文章来源于领测软件测试网 https://www.ltesting.net/
关于领测软件测试网 | 领测软件测试网合作伙伴 | 广告服务 | 投稿指南 | 联系我们 | 网站地图 | 友情链接
版权所有(C) 2003－2010 TestAge（领测软件测试网）|领测国际科技（北京）有限公司|软件测试工程师培训网 All Rights Reserved 北京市海淀区中关村南大街9号北京理工科技大厦1402室 京ICP备10010545号-5 技术支持和业务联系：info@testage.com.cn 电话：010-51297073 |