读书人

keydown事件与keypress事件的有关问题

发布时间: 2012-10-18 13:46:56 作者: rapoo

keydown事件与keypress事件的问题
KeyDown事件中这样的代码

if key=39 then
showmessage('你按下了右键');


如果放在keypress事件的话 应该怎么写?



[解决办法]
或:

Delphi(Pascal) code
//新加的代码:procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;  Shift: TShiftState);var k:Char;begin  if key=39 then begin    k:=#32;    Edit1KeyPress(Sender,k);  end;end; 

读书人网 >.NET

热点推荐