Ctrl+Alt+Space HotKey

[ArmyMan]

Hallo zusammen

Ich möchte ein HotKey "Ctrl+Alt+Space" in meinem THotKey definieren bei lauftzeit.
Dies funktioniert jedoch nicht. Wie kann ich machen dass die Komponente ein "Space" akzeptiert?

Greetz

[marabu]

Guten Morgen,

bei mir unter D7 geht es so:

Delphi-Quellcode:

 TextToShortcut('Umsch+Strg+Leerzeichen')

Welche Literale du verwenden musst, das kannst du in der Datei $(DELPHI)\Source\VCL\Consts.pas nachsehen.

Grüße vom marabu

[Prototypjack]

Moin!
Das THotkey von Delphi und auch die abgeleitete Version der Jedis sind beide unzufriedenstellend(meiner Meinung nach).
Es fehlen ein paar sachen, wie z.B. der Win-Key oder die Space-Taste oder Anderes.

Da ich momentan vor einem ähnlichen Problem stehe bastele ich mir ein eigenes THotkey
Dieses wird dann mehr funktionen haben und, wenn fertig, hier im FOrum in OpenSource veröffentlicht.

Gruß,
Max

[marabu]

Hallo Max,

die Space-Taste (SmkcSpace) sollte auch bei dir vorhanden sein. In älteren Delphi-Versionen - wenn mich meine Erinnerung nicht trügt - musste ich einen verstümmelten Klartext (Leerzeic o.ä.) korrigieren. Die speziellen Tasten VK_LWIN ($5B) und VK_RWIN ($5C) und andere Tasten des MS Natural Keyboard kannst du auch so ansprechen:

Delphi-Quellcode:

const
  VK_LWIN = $5B; // siehe: Virtual-Key Codes (im PSDK)
begin
  MyHotKey.HotKey := ShortCut(VK_LWIN, []); 
end;

Zumindest die für Windows reservierten Tasten solltest du dabei aber aussparen. Einer eigenen Komponente THotKeyEx bedarf es eigentlich nicht, es sind eher Unzulänglichkeiten in der unit Menus zu beheben.

Freundliche Grüße

[ArmyMan]

Dass man mit den VK den HotKey reincoden kann ist mir schon klar. Aber wenn ich das Prog starte und dann im HotKey Feld einen HotKey "Ctrl+Alt+Space" eintippen will kommt immer "None" weil er den Space nicht zulässt.

Mit den VK oder im HotKey Feld der Eigenschaften von THotKey kann man den HotKey ohne probleme einfügen.

@Prototypjack
Kannst du mir bitte ne PM schreiben wenn du fertig bist? (hoffentlich bald :P )

Greetz

[ArmyMan]

*dezenter push*