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

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;