3.變數 j 的內容既然只有兩種變化,使用boolean比用integer好,宣告在Private內,每按一個鍵,使用"j := not j;"改變內容,當然..也要宣告初值.
4.在procedure的最後,把該元件的"Enabled"屬性改為false,就能達到鎖按鍵的功能.
5.字體加大一些可能會比較好.