Help啊!

Question

请问Delphi对键盘和鼠标的操作有哪些函数?
如:我要实现:
   有一按扭button1,它的单击事件是edit1中显示'你好!',当焦点在edit中时,按Delete键就执行按扭的单击事件,请问如何实现?

Answer 1

响应Edit的OnKeyDown或者OnKeyUp事件,加入如下代码：
if Key=46 then
begin
  Key:=0;
  Button1.Click;
end;在Button1的OnClick中加入
Edit1.Text:='你好';

Answer 2

是这样吗？
procedure TForm1.Button1Click(Sender: TObject);
begin
edit1.Text:='你好!';
end;procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key=vk_Delete then Button1.Click;
end;

Answer 3

需要把Key的值去掉，否则便成'好'，'你'会被Delete吃掉；