IdTCPServer: Packet an alle Clients?

[k4ni]

Hallo,

Ich versuche jetzt schon seit fast 2 stunden ein packet an alle eingeloggten user zu senden.
Also normal kann man ja immer nur an einen bestimmten Client etwas senden (im OnExecute mit AThread.Connection.SendBuf(..) ).

Jetzt hab ich hier ein type TPlayer:

Code:

type TPlayer = record
  palyerid: integer;
  tid: integer;
  name: string;
  wins: integer;
  loses: integer;
  online: boolean;
end;

(tid ist die Thread-Id des Players.)

Und von diesem type hab ich einen array names Players und iplayers hält die anzahl der spieler fest.
Also dacht ich en sowas:

Delphi-Quellcode:

for i:=1 to iplayer-1 do
begin
  if Players[i].online then
    IdTCPServer.Threads[Players[i].tid].Connection.SendBuf(..., ..);
end;

Doch das geht natürlich nicht. Wie geht das was ich versuche zu machen?

[STS301]

das geht mit IdUTP Broadcast einfacher
mit TCPClient usw ist das viel zu kompliziert (imho)

[k4ni]

Naja ich hab mich jetzt halt schon für ddafür entschieden und find es auch recht gut, nur bekomm ich das nicht hin

Google spuckt so gut wie garnichts über indy-componenten aus

Bitte helfen,
Vielen dank!

[shmia]

So wie dein Record aufgebaut ist, kannst du ihn nicht über das Netzwerk versenden.

Delphi-Quellcode:

type TPlayer = record 
  palyerid: integer; 
  tid: integer; 
  name: string;   // <===

Das Feld "name" ist nur ein Zeiger mit 4 Byte auf die wirklichen Daten.
Wenn der Zeiger über Netzwerk an einen anderen Rechner transportiert wird zeigt er auf ungültigen Speicher.

[k4ni]

Zitat von shmia:

So wie dein Record aufgebaut ist, kannst du ihn nicht über das Netzwerk versenden.

Delphi-Quellcode:

type TPlayer = record 
  palyerid: integer; 
  tid: integer; 
  name: string;   // <===

Das Feld "name" ist nur ein Zeiger mit 4 Byte auf die wirklichen Daten.
Wenn der Zeiger über Netzwerk an einen anderen Rechner transportiert wird zeigt er auf ungültigen Speicher.

Hallo!

Ich will das eigentlich garnicht versenden. Das ist nur für den server da, für die identyfication.
Eigentlich braucht ich nur die TIdPeerThread variable wo ThreadID = players[i].tid.
Also in etwa so eine function:

Delphi-Quellcode:

function GetThread(ThreadID: cardinal): TIdPeerThread;
begin
...
...
end;

Denn dann könnte ich GetThread(12345).Connection.Send(.., ..) machen.
Und in einer schleife:

Delphi-Quellcode:

for i:=0 to iplayers-1 {anzahl aller spieler} do
if players[i].online then
    GetThread(players[i].tid).Connection.Send(...)

Edit: Hab eine lösung gefunden und werde es in kürze posten