[DELPHI] KeyPress

[rotteninside]

è una funzione che se viene premuto il tasto da TRUE e se no da FALSE.
In effetti è un po' poco come spiegazione ma me la sono trovata così e devo tradurla in DELPHI, era scritta in professional pascal ma non ho un sorgente di come venisse usata. Appena i miei colleghi me li trovano posso darti spiegazioni più dettagliate. La funzione originale era questa:

function KEYPRESSED:boolean;
  var C_KEY_RESULT:longint;
  begin
    C_KEY_RESULT:=kbhit();
    if C_KEY_RESULT = 1 then KEYPRESSED:=true
    else KEYPRESSED:=false;
end;