Znaci imam chat server na svom kompu,i zeleo bih listing svih ip adresa klijenata konektovanih
isao sam ovako
**TServerOnClientConnect**
var i:integer;
begin
for i := 0 to ServerSocket1.Socket.ActiveConnections-1 do
begin
listbox1.items.add(serverscoket1.socket.connections.remoteaddress);
end;
al dobijam greske....
treba mi kod koji ce dodati u listbox svaki novi ip koji se konektuje al da ne pravi duplikate.....
i da ga izbrise kad se diskonektuje tj. da osvezi listbox listu...
I da li je moj komp ugrozen ako otvorim port za chat tj. port forward...
HVALA
isao sam ovako
**TServerOnClientConnect**
var i:integer;
begin
for i := 0 to ServerSocket1.Socket.ActiveConnections-1 do
begin
listbox1.items.add(serverscoket1.socket.connections.remoteaddress);
end;
al dobijam greske....
treba mi kod koji ce dodati u listbox svaki novi ip koji se konektuje al da ne pravi duplikate.....
i da ga izbrise kad se diskonektuje tj. da osvezi listbox listu...
I da li je moj komp ugrozen ako otvorim port za chat tj. port forward...
HVALA