kann bei OnConnect keine TStrings liste übergeben

[k4ni]

Hey leute,

Ich bin gerade dabei einen chat zu machen.
Und das mache ich mit ServerSocket und ClientSocket, und was klar ist wenn der Client connected braucht er eine liste mit den leuten die schon im chat sind. Und diese liste gibt es auf dem Server.

Also übergeb ich die list von einer ListBox in TStrings. Also ungefähr so:

Delphi-Quellcode:

Server:
Nachricht.More(Listbox1.Items);  //More ist TStrings

Client:
Listbox1.Clear;
Listbox1.Items.AddItems(Nachricht.More);  //Natürlich noch die nachricht davor empafangen

Also damit ihr das noch besser versteht, hier die source: Download

Ich versteh einfach nicht warum das nicht funktioniert.

Danke im voraus!!