hallo,
Danke, bekomme den Wert 0 zurück! Ist das Richtig?
Delphi-Quellcode:
procedure TForm1.ServerSocket2ClientConnect(Sender: TObject;
Socket: TCustomWinSocket);
var
i : integer;
begin
memo3.Lines.Add(ServerSocket2.Socket.ActiveConnections.ToString(i));
end;