本文介紹了使用PowerBuilder實現指示燈的方法。

相信大家在安裝各種軟件或微軟公司產品時都會注意到那直觀可愛的條狀指示燈，它總是以最直接的方式告訴我們工作的進程情況，在PowberBuilder 中也可以實現。

（1）創建一個應用程序（working－out)。

（2）創建一個窗口（w_01）。

（3）在應用程序的Open事件中最未尾Open()函數改為Open(w_01)。

（4）編輯w_01窗口。

（5） 添加三個控件在 w_01窗口上,即兩個Rectangle ：r_1，r_2 和一個commandButton ：cb_1。

（6） 將 r_1的Fill Color:設為White 將Line Color:設為Black，將X設為243，Y設為645，Width設為1541，Height設為113。按Apply 或 OK即可。

（7） 將 r_2的Fill Color:設為Blue 將Line Color:設為White，將X設為261，Y設為661，Width設為5，Height設為85。按“Apply” 或 “OK”即可。

（8） 在cb_1的 clicked事件中添寫：
　　r_1.visible= true
　　r_2.visible = true
　　int lock
　　lock=0
　　do while lock <100
　　lock = lock ＋ 1
　　r_2.width=lock＊15
　　loop

（9） 按 “Run” 鍵運行此程序，就會看到一條從頭走到尾的像安裝Win98一樣的指未燈出現在你的程序窗口上。

注＊此程序只是作為一個指示燈，那什么時候指示燈該向前走，什么時候指示燈該停，只要想辦法用變量給Lock賦值就可以了。