为何在DELPHI 中,Keydown无法得到F1...功能键事件

Question

procedure   TForm1.FormCreate(Sender:   TObject);   
  begin   
      KeyPreview   :=   True;   //可以直接设置   
  end;   
    
  procedure   TForm1.FormKeyDown(Sender:   TObject;   var   Key:   Word;   
      Shift:   TShiftState);   
  begin   
      case   Key   of   
          #111:   {   F1要处理的代码   };   
          #112:   {   F2要处理的代码   };   
          VK_F3:   {   F3要处理的代码   };   
      end;   
  end;   
  按上面的写法,按F1...等功能键没有什么反映,

Answer 1

直接使用 VK_F1,VK_F2 不是更直观易懂吗?