[Overview][Constants][Types][Procedures and functions][Variables][Index] |
Return file selector
Source position: line 0
function GetFS( |
var T: Text |
):LongInt; |
var F: file |
):LongInt; |
GetFS returns the file selector that the kernel provided for your file. In principle you don' need this file selector. Only for some calls it is needed, such as the Select call or so.
In case the file was not opened, then -1 is returned.
|
Wait for events on file descriptors |
Program Example33; { Program to demonstrate the SelectText function. } Uses oldlinux; Var tv : TimeVal; begin Writeln ('Press the <ENTER> to continue the program.'); { Wait until File descriptor 0 (=Input) changes } SelectText (Input,nil); { Get rid of <ENTER> in buffer } readln; Writeln ('Press <ENTER> key in less than 2 seconds...'); tv.sec:=2; tv.usec:=0; if SelectText (Input,@tv)>0 then Writeln ('Thank you !') else Writeln ('Too late !'); end.
lazarus-ccr.sourceforge.net |