paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-11 20:19:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL, TASyncProcess: FIONREAD is part of 2.0.4 termio units for all unix targets

Browse Source 
git-svn-id: trunk@10548 -
This commit is contained in:
vincents 2007-01-31 14:18:03 +00:00
parent 5bee5ec659
commit 4ced1d8d15
1 changed files with 1 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lcl/asyncprocess.pp
View File

@ -55,8 +55,8 @@ type
public
procedure Execute; override;
destructor Destroy; override;
published
property NumBytesAvailable: dword read GetNumBytesAvailable;
published
property OnReadData: TNotifyEvent read FOnReadData write FOnReadData;// You must read all the data in this event. Otherwise it is called again.
property OnTerminate: TNotifyEvent read FOnTerminate write FOnTerminate;
end;
@ -85,11 +85,6 @@ end;
uses BaseUnix, TermIO;
{$ifdef BSD}
const
FIONREAD = $4004667;
{$endif}
function TAsyncProcess.GetNumBytesAvailable: dword;
begin
if not (poUsePipes in Options) then