IsFKeyDown
From SCAR Divi Manual
Definition
function IsFKeyDown(Num: Byte): Boolean;
Source Code
function IsFKeyDown(Num: Byte): Boolean;
begin
Result := False;
if (Num > 0) and (Num < 13) then
Result := GetAsyncKeyState(111 + Num) <> 0;
end;Availability
SCAR Divi 3.00 > Current
Description
Returns true if an F-key specified by Num is being pressed.
Example
begin
repeat
Wait(500)
until IsFKeyDown(8);
WriteLn('Pressed F8');
end.
