在窗體中選擇垂直滾動條組件,選擇Events標簽,單擊OnScroll的Value域,從下拉列表框中選擇ScrollBar1Scroll事件處理程序。這樣,垂直滾動條和水平滾動條將共用一個事件處理程序。 選擇水平滾動條組件,選擇Events標簽,雙擊OnChange域,然后輸入: Memo1->Lines->Append("水平滾動條的OnChange事件"); 它將在文本框后面顯示水平滾動條改變的信息。 類似的,給垂直滾動條的OnChange事件加上如下代碼:Memo1->Lines->Append("垂直滾動條的OnChange事件"); 具體代碼如下:
哪個事件優先你能看出來嗎?你一定會對OnScroll同一事件產生的兩個屬性值先后被OnChange分開而不解是嗎?你好好看一下什么時候產生scEndScroll值J
為什么這里用了一個Button1?假如你的程序中沒有另外一個組件可以獲得焦點,你將感受不到快捷鍵的功能的,因為焦點會停在HotKey組件上,在這里就是想將焦點轉移一下,然后用快捷鍵試一下效果J(待續) 新聞熱點
疑難解答