Key abfrage

[EWeiss]

@Roachford

Zitat:

Solche Funktionen sind überhaupt nicht aussagekräftig und macht es einem um so schwerer dir zu helfen. Mit was wird denn das Result nach dem Aufruf verglichen? Mit 14? 55? 42? oder gleich mit Random(MaxInt)?

Was ist da nicht aussagekräftig ?

Delphi-Quellcode:

function IsKeyDown(CheckKey: Integer): SmallInt; 
begin 
    result := (GetAsyncKeyState(CheckKey) and 15); 

end; 

function IsLButtonDown: Integer; 
begin 
    Result := IsKeyDown(1); 
    // 1 <<<<<<< selbe wie VK_LBUTTON davon der aktuelle status zurück geliefert
    // was ist da nicht verständlich.. hmm
end;

Solche veralteten Methoden(variablen) wie Boolean wirst du in PowerBasic nicht mehr finden.
Aber egal trotzdem danke für deine Hilfe.

gruss Emil