Chat - User anzeigen

[Masteric]

hi, ich habe auch schon auf die selbe Weise einen Chat programmiert, wahrscheinlich sogar aus dem selben Tutorial....

Also ich hab das mit der Wer ist online? Liste so gemacht, das jeder Client, nach dem verbinden eine Nachricht mit seinem Nickname schickt, welcher vom Server gespeichert wird, dafür habe ich noch etwas oben bei dem TNachrichten Type eingeführt, das kannst du z. B. so machen :

Delphi-Quellcode:

type  TChatNachricht = Record
        Nickname: string[255];
        Text:     string[255];
       Befehl: string[255]
      end;

da muss dann eben der Befehl z. B. anmelden sein, damit der Server und der Client ihn in die Liste aufnimmt.
Dass musst du dann abfragen, ich habe es so ähnlich gemacht, da es so nicht als Chatnachricht angezeigt wird, sondern beide, Server und Client Wissen, dass es ein interner Befehl ist.

Ich habe unten mal meine fertige, (2. Version) meines Chatprogramms angehangen, sie ist noch nicht ganz fertig, das Verschlüsseln ist noch nciht eingebaut und der Server ist bei mir ein eigenes Programm, deswegen Poste ich dir mal beide.

Gruß Masteric