F1 für kontextsensitive Hilfe auf andere F-Taste

[olaf]

Hallo,

die kontextsensitive Hilfe in meiner Anwendung wird standartmäßig immer mit F1 aufgerufen.

Ich brauche jedoch die Funktionstaste F1 für den Aufruf einer eigenen Funktion und auf die Hilfe für den User möchte ich auch nicht verzichten. Weiß einer, wie ich den Aufruf der kontextsensitive Hilfe auf z.B. F12 umleiten kann oder gibt es eine andere Lösungmöglichkeit.

Vielen Dank im voraus
Olaf

[taaktaak]

Moin, Moin.
Hmmm, die Hilfe sollte eigentlich immer mit F1 erreichbar sein!
Selbst der größte DV-Laie erwartet diese Funktionalität immer "hinter" der F1-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;

[olaf]

Hallo,

vielen Dank für die Lösung.

Habe jetzt meine Funktionen auf den numerischen Tasturblock gelegt(Aufruf im Keydown-Ereignis, mit Ctrl + Zahlentaste). Somit sind die Funktionstasten wieder frei und die Hilfe ist auch da, wo sie eigendlich hingehört.
Manchmal hat man auch ein riesiges Brett vorm Kopf.

Nochmals vielen Dank
Olaf