Hello,

New unit serial.pp for Windows.
http://www.luisdigital.com/programacion/fpc/serial.pp

Please, to verify any error, since I am not an expert.

Some differences:

Linux:
TSerialState = record
   LineState: LongWord;
   tios: termios;
 end;

Windows:
TSerialState = record
   LineState: LongWord;
   DCB: TDCB;
 end;

BitsPerSec now is Windows const. CBR_110...

procedure SerRestoreState(Handle: TSerialHandle; State: TSerialState);
Restore only DCB.

There is an error in the description of the version in Linux:

Returns "0" if device could not be found
function SerOpen(const DeviceName: String): TSerialHandle;

Really is -1

--
http://luisdigital.com

_________________________________________________________________
    To unsubscribe: mail [EMAIL PROTECTED] with
               "unsubscribe" as the Subject
  archives at http://www.lazarus.freepascal.org/mailarchives

Reply via email to