Delphi Mit Tastenkombination zu einer bestimmten Taste springen

Thema durchsuchen

Ansicht

Themen-Optionen

Mit Tastenkombination zu einer bestimmten Taste springen

Ein Thema von superstar025 · begonnen am 10. Mär 2005 · letzter Beitrag vom 10. Mär 2005

Vorheriger Beitrag

Nächster Beitrag

microtronx

Registriert seit: 8. Mär 2005
Ort: Tapfheim
55 Beiträge

Delphi 2010 Enterprise

Re: Mit Tastenkombination zu einer bestimmten Taste springen

10. Mär 2005, 08:12

Hier ein Schnippsel, der bestimmt weiterhilft.

markieren

Delphi-Quellcode:

			procedure TMyForm.ApplicationShortcut(var Msg: TWMKey; var Handled: Boolean);

begin

 // wenn ALT + STRG + H gedrückt ist ...

 if (msg.CharCode=ord('H')) or (msg.charcode=ord('h')) then

 if (GetKeyState(VK_CONTROL) < 0) and (GetKeyState(VK_MENU) < 0) then begin

    MyHideFunction;

 end;

end;

Mfg.