很簡單的問題,我在delphi的界面中要實現用鍵盤的上下左右箭頭移動控件的焦點 請指教
P pdb Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-26 #1 很簡單的問題,我在delphi的界面中要實現用鍵盤的上下左右箭頭移動控件的焦點 請指教
Y yexiaofeng Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-26 #2 在FORM的onkeypress事件上写代码 if key=vk_down then edit1.setfoucs; 下键是VK_down 上是vk_up 左是vk_left 右是vk_right
P pdb Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-26 #5 各位: 我不想在每個控件里面寫代碼 ,用回車移動焦點我已經在窗體的onkeydow里面實現 了,先設窗體的keypreview設為true ,然後在窗體的onkeydowm這樣寫 if key = 13 then postmessage(self.handle,wm_keydown,vk_tab,0); ,但是我就是不知道上下箭頭是怎樣的?請各位把這個api函數告訴我,勞煩了
各位: 我不想在每個控件里面寫代碼 ,用回車移動焦點我已經在窗體的onkeydow里面實現 了,先設窗體的keypreview設為true ,然後在窗體的onkeydowm這樣寫 if key = 13 then postmessage(self.handle,wm_keydown,vk_tab,0); ,但是我就是不知道上下箭頭是怎樣的?請各位把這個api函數告訴我,勞煩了
S sonie Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-26 #6 好象是非曲直37、38、39、40 把你的代码key=13替换就是了
P pdb Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-26 #7 sonie: 向下可以啊,但是向上不行啊, 我也要用向上箭頭回傳上一個控件的焦點啊
L liujh Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-27 #9 在onkeypress中写 if key=VK_Down then begin key:=#0; selectnext( activecontrol, True, True); end; if key=VK_Up then begin key:=#0; selectnext( activecontrol, False, True); end;
在onkeypress中写 if key=VK_Down then begin key:=#0; selectnext( activecontrol, True, True); end; if key=VK_Up then begin key:=#0; selectnext( activecontrol, False, True); end;
小 小猪 Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-27 #10 http://www.delphibbs.com/delphibbs/dispq.asp?lid=647642
