Entwickler-Ecke

Internet / Netzwerk - Probleme mit Clientsocket


>M@steR< - Di 07.08.07 00:38
Titel: Probleme mit Clientsocket
Gelöscht


Narses - Di 07.08.07 00:48
Titel: Re: Probleme mit Clientsocket
Moin!

user profile icon>M@steR< hat folgendes geschrieben:

Delphi-Quelltext
1:
2:
3:
4:
//...
if Server1.Enabled then
  ServerSocket1.Socket.Connections[0].SendText('REFRESH' + #13 +
//...

Diese Eigenschaft hat nix mit dem Verbindungszustand des Sockets zu tun, du meinst vermutlich .Connected bzw. .Active? :nixweiss:

Aber selbst wenn der Server online ist (.Active = TRUE), wer sagt denn, dass dann auch eine Client-Verbindung im .Connections[]-Array drin ist (und genau darauf weist der Fehler hin)! :mahn:

cu
Narses


>M@steR< - Di 07.08.07 01:01

Gelöscht


Narses - Di 07.08.07 01:08
Titel: Re: Probleme mit Clientsocket
user profile iconNarses hat folgendes geschrieben:
Aber selbst wenn der Server online ist (.Active = TRUE), wer sagt denn, dass dann auch eine Client-Verbindung im .Connections[]-Array drin ist (und genau darauf weist der Fehler hin)! :mahn:


>M@steR< - Di 07.08.07 01:17

Gelöscht


Narses - Di 07.08.07 01:22

Moin!

Dann mach´s doch mal so:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
procedure TForm1.NEXT();  
begin  
  if Server1.Enabled and (ServerSocket1.Socket.ActiveConnections > 0) then
    ServerSocket1.Socket.Connections[0].SendText('NEXT' + #13);  
  if Client1.Enabled then
    ClientSocket1.Socket.SendText('NEXT' + #13);  
end;

Exception jetzt weg? ;)

cu
Narses


>M@steR< - Di 07.08.07 01:28

Gelöscht


Narses - Di 07.08.07 01:32

Moin!

user profile icon>M@steR< hat folgendes geschrieben:
aber warum? :nixweiss:

user profile iconNarses hat folgendes geschrieben:
wer sagt denn, dass dann auch eine Client-Verbindung im .Connections[]-Array drin ist (und genau darauf weist der Fehler hin)! :mahn:

:roll:

cu
Narses


>M@steR< - Di 07.08.07 01:35

Gelöscht