Hotkey to String

[ebber]

Hallo

gibts sowas wie HotkeytoString ?

MfG

[Muetze1]

ShortCutToText()

[ebber]

Hallo

ich weis auch nicht aber ich bekomms nicht hin.
Wie geht das mit ShortCutToText(), kann mir jemand mal ein kurzes Beispiel machen ?

Und gleich noch ne Frage :

Wenn ich einen TJVHotkey habe und den Hotkey davon einem TJVApplicationHotkey.Hotkey zuweisen möchte sagt er Incompatible Types TShortCut und TJvHotkey. Wie geht das ?

MfG

[DGL-luke]

Leider nein. Die WinAPI schafft es allerdings, einen Hotkey in einem einzigen Integer zu speichern. Das und die Funktionen, die die VCL mitbringt, sollte reichen, oder?

Mom...
SendMessage(Hotkey1.Handle, HKM_GETHOTKEY,0,0); Damit bekommst du den Hotkey-Code. Per HKM_SETHOTKEY kannst du natürlich wieder setzen. Und wenn du wirklich einen String brauchst - hol dir den text des hotkey-controls: GetWindowText

Rückumwandeln kannst du den aber nicht.

//roter Kasten
Na toll... ich wusste ich hatte was vergessen... aber dieser post quillt so über mit Wissen, den kann ich nicht verwerfen.

//zweiter roter kasten

tja... da werden die jedis wohl ihre eigene routine haben um hotkey in text umzuwandeln. mom...

TJvApplicationHotkey hat einen ganz normalen TShortCut. Ich hab das Gefühl ich muss meine JVCL updaten, denn ein TJvHotkey hab ich nciht

EDIT: Es muss eine Routine geben um das umzuwandeln. Robert Marquardt, wo bist du?!

[ebber]

Ein Integer würde mir reichen, wenn ich einen bekommen würde.

Ich will den Hotkey von einem JVHotkey. Also JvHotkey1.hotkey1 in einen Integer.

Wie genau geht das dann mit SendMessage(Hotkey1.Handle, HKM_GETHOTKEY,0,0); ?

[DGL-luke]

Du bekommst da ein Integer zurück. Das ist dein Hotkey. -> HKM_GETHOTKEY

EDIT: In deinem Fall:

HotKeyIdent := SendMessage(JvHotkey1.Handle, HKM_GETHOTKEY,0,0);

[ebber]

Warscheinlich bin ich einfach nicht fürs programmieren geschaffen.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);

var HotKeyIdent : integer;

begin

HotKeyIdent := SendMessage(JvHotkey1.Handle, HKM_GETHOTKEY,0,0);

end;

So ?

Soll das dann heisen, dass das HotKeyIdent dann mein Integer ist .?

Was muss ich bei uses alles reinmachen ? Ist das das Problem, weil ichs einfach nicht hinbekomme dass er es nimmt, unn wenn doch kommt 0 raus.

MfG

[DGL-luke]

Ja, so passts eigentlich. Da sollte dann aber nicht 0 rauskommen... der TJvHotkey ist ein Visual Control, oder? Wo ist denn der definiert? Ich find ihn leider bei mir nicht.

PS: Nicht verzweifeln. An den Hotkeys sind schon die VCL-Programmierer gescheitert: http://www.delphipraxis.net/internal...t.php?t=102529

[ebber]

Was genau meinst du ?

Das Ding heist TJvHotkey unter JvEdits.

Edit : Es muss nicht unbedingt ein Jvhotkey sein es geht auch ein normaler Hotkey wenn das besser geht.

[DGL-luke]

Hmm... naja, wie du an dem link oben siehst, ist der VCL-Hotkey nicht besonders vertrauenerweckend. Wie gesagt, du hast offenbar ne neuere JVCL(Die Unit JvEdits hab ich nicht mal), aber da der TJvHotKey ja auch mit nem WinAPI-Hotkey-Control arbeitet (arbeiten müsste), müsste es genauso funktionieren...

du kannst hier jetzt nur auf jemanden warten, der schon die neueste JVCL hat und sich auch mit den Hotkeys beschäftigt. Ich hab hier nur Modem und werd mir deswegen mal die Sourcen ziehen, wenn ich die ordentlich installiert bekomm, kann ich dir vielleicht heute noch näheres sagen.

(du hast die 3.30, oder?)