Probleme mit Clientsocket

>M@steR< · Beiträge: 288 Erhaltene Danke: 3

Gelöscht

Narses · Verfasst: Di 07.08.07 00:48

Moin!

>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

_________________
There are 10 types of people - those who understand binary and those who don´t.

>M@steR< · Beiträge: 288 Erhaltene Danke: 3

Gelöscht

Narses · Verfasst: Di 07.08.07 01:08

Narses 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:

_________________
There are 10 types of people - those who understand binary and those who don´t.

>M@steR< · Beiträge: 288 Erhaltene Danke: 3

Gelöscht

Narses · Verfasst: Di 07.08.07 01:22

Moin!

Dann mach´s doch mal so:

markieren

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

_________________
There are 10 types of people - those who understand binary and those who don´t.

>M@steR< · Beiträge: 288 Erhaltene Danke: 3

Gelöscht

Narses · Verfasst: Di 07.08.07 01:32

Moin!

>M@steR< hat folgendes geschrieben:

aber warum? :nixweiss:

Narses 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:

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.

>M@steR< · Beiträge: 288 Erhaltene Danke: 3

Gelöscht

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme