TCPConnected
From SCAR Divi Manual
Definition
function TCPConnected(const iTCPClient: Integer): Boolean;
Availability
SCAR Divi 3.26 > Current
Aliases
- IsConnectionOpen (SCAR Divi 3.00 > Current)
Description
Returns true if a TCP connection is associated with the index iTCPClient in the TCP client resource manager and is still connected.
Example
var
i: Integer;
begin
i := TCPConnect('irc.scar-divi.com', 6667, 1000);
try
WriteLn(TCPConnected(i));
finally
TCPFree(i);
end;
WriteLn(TCPConnected(i));
end.
