|
Registriert seit: 31. Aug 2005
1.622 Beiträge
FreePascal / Lazarus
|
Re: IsPressed - Maus -/ Tastendrücke global abfragen ohne ho
7. Jun 2009, 12:16
Die IsPressed Funktion lässt sich auch um einiges verkürzen:
Delphi-Quellcode:
function IsPressed(key : Cardinal) : boolean;
begin
result := (GetAsyncKeyState(key) and $8000) = $8000;
end;
Andreas
"Sollen sich auch alle schämen, die gedankenlos sich der Wunder der Wissenschaft und Technik bedienen, und nicht mehr davon geistig erfasst haben als die Kuh von der Botanik der Pflanzen, die sie mit Wohlbehagen frisst." - Albert Einstein
|