Delphi and C++ Builder serial communication library for FTDI devices for Android.

Features

Uses FTDI D2XX library
No special root access privileges needed
Available for Delphi/C++ Builder 10 - 11
Source code included in registered version
Royalty free distribution in applications

type
  TDataBits = (db7, db8);
  TFlag = (flOpened, flHiSpeed);
  TFlags = set of TFlag;
  TFlowControl = (fcNone, fcRtsCts, fcDtrDsr, fcXOnXOff);
  TLineErrorValue = (leOverrun, leParity, leFrame, leBreak);
  TLineError = set of TLineErrorValue;
  TModemStatusValue = (msCts, msDsr, msRing, msDcd);
  TModemStatus = set of TModemStatusValue;
  TParity = (paNone, paOdd, paEven, paMark, paSpace);
  TStopBits = (sb1, sb2);

  ESerialError = class(Exception)
  end;

  TSerialDeviceInfo = class
    property Description: string read;
    property DeviceInfo: JD2xxManager_FtDeviceInfoListNode read;
    property DeviceType: string read;
    property Flags: TFlags read;
    property LineStatus: Boolean read;
    property ModemStatus: Boolean read;
    property SerialNumber: string read;
    property &Type: Integer read;
  end;

  TSerialDevice = class
    constructor Create;
    destructor Destroy;

    procedure Open(DeviceIndex: Integer);
    procedure Close;
    procedure EnumDevices;
    procedure ResetDevice;

    procedure ClearBreak;
    procedure SetBreak;

    procedure ClearDTR;
    procedure SetDTR;

    procedure ClearRTS;
    procedure SetRTS;

    procedure Purge;
    procedure PurgeInput;
    procedure PurgeOutput;

    function InputCount: Integer;
    function InputFull: Boolean;

    function Read(Buffer: TJavaArray<Byte>; Timeout: Integer = 0): Integer;
    function Read(Buffer: TArray<Byte>; Timeout: Integer = 0): Integer;
    function Read(var Data: Byte; Timeout: Integer = 0): Integer;

    function Write(Buffer: TJavaArray<Byte>; Wait: Boolean = True): Integer;
    function Write(Buffer: TArray<Byte>; Wait: Boolean = True): Integer;
    function Write(Data: Byte; Wait: Boolean = True): Integer;

    property BaudRate: Integer read write;
    property DataBits: TDataBits read write;
    property Device: JFT_Device read;
    property DeviceCount: Integer read;
    property DeviceInfo[Index: Integer]: TSerialDeviceInfo read;
    property ErrorChar: Byte read write;
    property ErrorCharEnabled: Boolean read write;
    property EventChar: Byte read write;
    property EventCharEnabled: Boolean read write;
    property FlowControl: TFlowControl read write;
    property LibraryVersion: Integer read;
    property LineError: TLineError read;
    property Manager: JD2xxManager read;
    property ModemStatus: TModemStatus read;
    property Opened: Boolean read;
    property Parity: TParity read write;
    property StopBits: TStopBits read write;
    property XOff: Byte read write;
    property XOn: Byte read write;
  end;

function ToByteArray(JavaArray: TJavaArray<Byte>): TArray<Byte>;
function ToJavaByteArray(ByteArray: TArray<Byte>): TJavaArray<Byte>;

Only for V.I.P