[fpc-pascal] Sending Hex codes over TCP/IP

Brian vmst at golden.net
Sun Sep 13 19:25:26 CEST 2020


Use Ararat Synapse .

http://synapse.ararat.cz/doc/help/

Unit blcksock  Class TTCPBlockSocket

Then send and receive byte arrays using :

Public 	function SendBuffer(Buffer: TMemory; Length: Integer): Integer;
override;
Public 	function RecvBuffer(Buffer: TMemory; Len: Integer): Integer;
override;

var
 Tx_buffer : array[0..n] of byte;

SentN := SendBuffer(@Tx_Buffer,NumBytes);




--
Sent from: http://free-pascal-general.1045716.n5.nabble.com/


More information about the fpc-pascal mailing list