Difference between revisions of "IsFKeyDown"
From SCAR Divi Manual
| Line 2: | Line 2: | ||
<source lang="scar" lines="false"> | <source lang="scar" lines="false"> | ||
function IsFKeyDown(Num: Byte): Boolean; | function IsFKeyDown(Num: Byte): Boolean; | ||
| + | </source> | ||
| + | |||
| + | ===Source Code=== | ||
| + | <source lang="scar"> | ||
| + | function IsFKeyDown(Num: Byte): Boolean; | ||
| + | begin | ||
| + | Result := False; | ||
| + | if (Num > 0) and (Num < 13) then | ||
| + | Result := GetAsyncKeyState(111 + Num) <> 0; | ||
| + | end; | ||
</source> | </source> | ||
Revision as of 16:34, 4 July 2011
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.
