delphi中，如何实现 按下键盘F5键 同样功能的代码 ，谢谢

Question

delphi中，如何实现 按下键盘F5键 同样功能的代码 ，谢谢

Answer 1

用keybd_event模拟。或者发送 WM_KEYDOWN 和 WM_KEYUP 消息实现。

Answer 2

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm1 = class(TForm)
  private
    procedure WM_KEYDOWN(var Message : TMessage); message WM_KEYDOWN;
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.WM_KEYDOWN(var Message:TMessage);
begin
   if Message.WParam=116 then
      ShowMessage('You Press F5.');
end;
end.

Answer 3

建议不要用单个键，最好用组合键。例：Ctrl+Z

Answer 4

谢谢上面的朋友们，但是你们可能误会了我的意思
 我需要的是delphi什么代码（即运行这些代码）等价于 按键盘的F5 
 ：）

Answer 5

即是 delphi中什么代码可以实现 按F5刷新（桌面、webbrower等等）的功能？？

Answer 6

那要看具体的程序啊~~~比如说IE中，按F5的时候，自己写程序，重新载入当前页面
比如说Delphi编辑器中，按F5的时候，自己写程序，设置BreakPoint
比如说在Windows桌面，按F5的时候，Windows自己写程序，刷新桌面
哪里知道你的程序F5要拿来做什么啊，你用楼上朋友们的方法，拦截到F5键的时候，，，
做爱做的事情，，，就可以了，呵呵。