Einzelnen Beitrag anzeigen

Benutzerbild von MSSSSM
MSSSSM

Registriert seit: 18. Apr 2008
223 Beiträge
 
Delphi 7 Professional
 
#6

Re: 4-gewinnt fertig, jetzt online machen

  Alt 17. Mai 2008, 08:16
also
Du solltest es eher nicht mit Ip's machen, kann zu Problemen führen, vllt.
Wenn eben 1 client connected (mit indy gehts einfach) erstellst du in dem array einen neuen eintrag, mit fortlaufender id. (wie das geht? neue variable mit höchster id drin)
also:

Delphi-Quellcode:
type TPlayer = record
  id: integer;
  name: string;
  wins: integer;
  loses: integer;
  playing: boolean;
end;

var
  Players: array of TPlayer;
  iplayers: integer = 0;
Delphi-Quellcode:
{ wenn connected }
SetLength(Players, iplayers+1);
Players[iplayers].id:=iplayers;
Players[iplayers].name:='Spieler '+inttostr(iplayers+1);
Players[iplayers].wins:=0;
Players[iplayers].loses:=0;
Players[iplayers].playing:=false;
inc(iplayers);
dann sollte der client aber auch beim connecten seine id mittgeteilt bekommen, und die dann mitschicken;
Marius
  Mit Zitat antworten Zitat