plus und minus als shortcut in menüs?

[Marco Steinebach]

Hallo zusammen,
ich möchte bei einem Menü + und - als ShortCut definieren. (möglichst auch noch shift++ und shift+-, also eigentlich Stern und unterstrick).
mit

Code:

.. := ShortCut (Word('+'), []);

geht mal gar nix.
Nu hat ich rausgefunden, daß + den ShortCutCode 187 hat (mit TextToShortCut), bei minus ist's 111, aber in meinem Programm tut das nix.
Gibt's dafür 'ne Lösung, oder hab ich hier was übersehen?
Ich kann auch die Tastatur abfangen mit dem OnKeyPress des Formulars, aber wie krig ich dann die Texte für die ShortCuts neben die Menüs?
Für Hilfe wäre ich sehr Dankbar.
Viele Grüße
Marco

[Matze]

Hallo Marco,

+ und Strg++ gehen bei mir so, nur mit dem Minuszeichen haut's nicht hin.

Delphi-Quellcode:

// +
MainMenu1.Items[0].Items[0].ShortCut := ShortCut(187, []);

// Strg ++
MainMenu1.Items[0].Items[1].ShortCut := ShortCut(187, [ssCtrl]);

Grüße

[Marco Steinebach]

Huhu Matze,
oh, das war blöd geschrieben. Das + geht bei mir auch, aber das Minus eben nicht.

Gibt's noch 'ne Idee?
Viele Grüße
Marco

[uligerhardt]

VK_OEM_PLUS und VK_OEM_MINUS funktionieren bei mir.

[Marco Steinebach]

Hallo,

Zitat von uligerhardt:

VK_OEM_PLUS und VK_OEM_MINUS funktionieren bei mir.

Oops! Die gibt's bei mir gar nicht. blos VK_ADD, aber nur für den Nummerblock. Könntest du mal die Tastencodes von VK_OEM_PLUS und VK_OEM_MINUS posten - vielleicht gehen die ja...
Vielen Dank
Marco+

[Matze]

Hier der Auszug aus der Windows.pas:

Delphi-Quellcode:

{$EXTERNALSYM VK_OEM_PLUS}
VK_OEM_PLUS = 187;
{$EXTERNALSYM VK_OEM_MINUS}
VK_OEM_MINUS = 189;

[Marco Steinebach]

Huhu Matze,

Zitat von Matze:

Hier der Auszug aus der Windows.pas:

Delphi-Quellcode:

{$EXTERNALSYM VK_OEM_PLUS}
VK_OEM_PLUS = 187;
{$EXTERNALSYM VK_OEM_MINUS}
VK_OEM_MINUS = 189;

Jaaa! It works!
Vielen herzlichen Dank!
Marco