Delphi-PRAXiS - Delphi ShortCuts übersetzen

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi ShortCuts übersetzen (https://www.delphipraxis.net/127893-shortcuts-uebersetzen.html)

Samufi

20. Jan 2009 20:49

ShortCuts übersetzen

Hallo,
ich möchte gerne zur Laufzeit die Tastenkombinationen für einzelne Befehle verändern. Wie ich das mache ist mir eigentlich klar; nur wie ich die Tastenkombinationen formulieren muss, damit es funktioniert weiß ich nicht. Ich möchte gerne die Kombination Strg+Alt+c einfügen.

Delphi-Quellcode:

MainMenu1.items.Find('Bearbeiten').Find('Kopieren').ShortCut:=???

Vielen Dank schon im Vorraus für alles Antworten,
treuergebenst,
Samufi

Hawkeye219

20. Jan 2009 21:29

Re: ShortCuts übersetzen

Hallo Samufi,

die Unit Menus bietet zum Zusammenbauen von Tastenkürzeln die Funktion Delphi-Referenz durchsuchen

ShortCut an:

Delphi-Quellcode:

MenuItem.ShortCut := {Menus.}ShortCut(Ord('C'), [ssCtrl, ssAlt]);

Gruß Hawkeye

Samufi

21. Jan 2009 11:58

Re: ShortCuts übersetzen

Vielen Dank! Ich hatte Menus nicht miteingebunden.

Alle Zeitangaben in WEZ +1. Es ist jetzt 01:59 Uhr.