Delphi-Quelltext
1: 2: 3: 4: 5:
| if GetAsyncKeyState(VK_LBUTTON)<0 then Edit1.Text:='click' else Edit1.Text:='no click' |
Das ganze in nen Timer oder so packen. Wenn du >0 machst, bekommst du auch mit, wenn der User seit dem letzten Aufruf von GetAsyncKeyState geklickt hat, aber jetzt nicht mehr klickt.
Hier die Konstanten aus der Hilfe:
| F1 hat folgendes geschrieben: |
Constants
VK_LBUTTON (01)
Left mouse button
VK_RBUTTON (02)
Right mouse button
VK_CANCEL (03)
Control-break processing
VK_MBUTTON (04)
Middle mouse button (three-button mouse)
VK_XBUTTON1 (05)
Windows 2000/XP: X1 mouse button
VK_XBUTTON2 (06)
Windows 2000/XP: X2 mouse button
- (07)
Undefined
...//hier kommen dann Tasten
|
Direkt ein Event zu bekommen, wenn irgendwo hin geklickt wurde, geht wohl nicht so ohne weiteres, höchstens über komplizierte Hooks.
//Edit: achso, ich seh grad du willst Tastatur-Tasten-Drücke
Selbes Prinzip, statt VK_LBUTTON dann einfach die Taste nehmen (die gleichen Werte die du auch im OnKeydown /OnKeyPress kriegst)
| F1 hat folgendes geschrieben: |
(41)
A key
(42)
B key
(43)
C key
(44)
D key
(45)
E key
|