F1 für kontextsensitive Hilfe auf andere F-Taste

[daywalker9]

Wenn du das wirklich brauchst, fang die WM_KEYDOWN von der Application.OnMessage ab.

zB:

Delphi-Quellcode:

procedure tEventOBJ.OnMessage(var Msg:tMSG; var handled:boolean);
var
  shift : TShiftState;
  vk    : word;
begin shift:=KeyDataToShiftState(msg.lparam);
      vk:=msg.WParam;
      if vk=VK_F11 then
        begin
          Application.HelpContext(CurrentHelpContext);
          handled:=true;
        end;
      if vk=VK_F1 then //tu was anders...
end;

Und im initialization Teil weißt du das zu;
   Application.OnMessage:=MyEventOBJ.Onmessage;