Delphi:
function StartCom : Longo; stdcall; external 'ca100.dll';
function CommError : byte; stdcall; external 'ca100.dll';
function SendToTerm( NumTerm : Curto; Txdados : string ) : Longo; stdcall; external 'ca100.dll';
function ReadFromTerm( NumTerm : Curto; Txdados : Tbuffer) : Longo; stdcall; external 'ca100.dll';
fivewin?
Muito obrigado
![]()