Entwickler-Ecke
Windows API - Hotkey funktioniert nicht mehr
Stread - Fr 27.05.11 21:00
Titel: Hotkey funktioniert nicht mehr
Hi,
bis vor kurzem ging bei mir noch mein Tastendruck Hotkey.
Dann wollte ich einen zweiten hinzufügen, habe einiges verändert und nun geht keiner mehr.
Da die Sicht bei eigenen Projekten immer eingeschränkt ist bitte ich euch mal drüber zusehen, vlt. habe ich nur was vergessen.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
| procedure TFormPixel.hot1key(var msg:TMessage);
begin
if (msg.LParamLo=MOD_ALT) and (msg.LParamHi=51)
then
begin
Timer1.Enabled:=False;
Timer2.Enabled:=False;
EditDez.Text:=IntToStr(Shape1.Brush.Color);
FarbeShape:= Shape1.Brush.Color;
end;
end; |
Moderiert von 
Narses: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Fr 27.05.2011 um 21:44
jaenicke - Fr 27.05.11 21:33
Stread hat folgendes geschrieben  : |
Delphi-Quelltext 1:
2:
3:
| if (msg.LParamLo=MOD_ALT) and (msg.LParamHi=51)
then
| |
Du schreibst etwas von Alt + Y, gibst aber als Tastenkombination MOD_ALT + Zeichen 51 an. Zeichen 51 ist die Zahl 3...
Vielleicht versuchst du es besser einmal mit
Ord('Y') bzw. 89...
jaenicke - Sa 28.05.11 05:36
Die Tabelle stimmt schon, $59 ist ja nun mal 89. Wie du aus der Tabelle auf 51 gekommen bist, ist mir nicht ganz klar, aber hauptsache es geht jetzt. ;-)
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!