Source position: ssfpc.inc line 386
function Send(
s: TSocket;
Buf: TMemory;
len: Integer;
flags: Integer
):Integer;