用PowerBuilder制作指示燈

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

　　 創建一個應用程序（workingout）

　　 創建一個窗口（w_）

　　 在應用程序的Open事件中最未尾Open（）函數改為Open（w_）

　　 編輯w_窗口

　　 添加三個控件在 w_窗口上即兩個Rectangle :r_r_ 和一個commandButton :cb_

　　 將 r_的Fill Color:設為White 將Line Color:設為Black將X設為Y設為Width設為Height設為按Apply 或 OK即可

　　 將 r_的Fill Color:設為Blue 將Line Color:設為White將X設為Y設為Width設為Height設為按Apply 或 OK即可

　　 在cb_的 clicked事件中添寫

　　r_visible= true

　　r_visible = true

　　int lock

　　lock=

　　do while lock <

　　lock = lock +

　　r_width=lock*

　　loop

　　 按 Run 鍵運行此程序就會看到一條從頭走到尾的像安裝Win一樣的指未燈出現在你的程序窗口上

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

       編輯推薦

       ASP NET開發培訓視頻教程

       Microsoft NET框架程序設計視頻教程

From:http://tw.wingwit.com/Article/program/PB/201311/24627.html