|
Registriert seit: 30. Jan 2005
Ort: Münster
745 Beiträge
Delphi 3 Professional
|
Re: Rechtsklick abschießen
10. Mai 2005, 20:39
Hallo,If (GetKeyState(VK_RButton) And $80 <> 0) Then
wird True, wenn die rechte Maustaste gedrückt ist.
Der Status ist im höchsten Bit gespeichert, darum das "And $80 <> 0"
Man könnte genausogut folgenden Code nehmen:If HiWord(GetKeyState(VK_RButton)) <> 0 Then
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
|