在dbgrid表格的keypress事件中可以监测回车事件 if key=#13 then showmessage('ok')
怎么不能监测光标向上、向下的事件呢,if key=#38 then showmessage('ok') 这条语句永远也不执行
换成VB_UP 变量也不行
我用EDIT控件来测试也不行,请问怎么样才能实现呢?由于特殊原因一定要用到 光标上下键事件,请赐教

解决方案 »

  1.   

    procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
    if key=38 then
      showmessage('ok');
    end;没问题,测试通过
      

  2.   

    哇思,这位老兄好快哟,谢谢
    难道一定要在KeyDown事件里面吗?keypress里面可不可以实现
    当然在keydown里面能实现也可以了,只是顺便想知道keypress里面可不可以实现
    jackie168(花好月圓) 分是你的了
      

  3.   

    在KeyUP事件里也可以的。还有,楼主为何一定要在KeyPress事件里实现?(是不是有点钻牛尖 ^_^)
      

  4.   

    呵呵~~~新的问题出来了
    俺在keypress事件里可以用dbgrid1.Columns[0].Field.asstring读到刚刚输入的值来进行一系列操作,
    可在KEYUP、KEYDOWN事件里取不到应的值,用dbgrid1.Columns[0].Field.asstring什么都取不到