Forum: Netzwerke
Delphi
by k4ni,
14. Dez 2007
Also das hesit gesendet hab ich es richtig aber angenommen nicht?
Ich glaub mal schon ja weil wenn ich die empfangene nachricht in ein Memo setze dann geht es ja wunderbar, nur nicht in der ListBox da ich dort nicht weis wie ich es dort einfügen soll.
Forum: Netzwerke
Delphi
by k4ni,
13. Dez 2007
Gibt es wirklich keinen weg das als TStrings lsit zu senden?
Forum: Netzwerke
Delphi
by k4ni,
13. Dez 2007
Ohh ya :) Vielen dank!
Also zum senden verwende ich jetzt
Nachricht.Nickname := 'Hello';
Nachricht.Text := Listbox1.Items.Text;
Socket.SendBuf (Nachricht, SizeOf(Nachricht));
und zum empfangen
if Nachricht.Nickname = 'Hello' then begin
Forum: Netzwerke
Delphi
by k4ni,
13. Dez 2007
Also ich hab das vorher falsch eingefügt sorry.
Jetzt geht es schon weiter und die adress violation kommt jetzt später wenn es das macht:
Listbox1.Items.AddStrings(Nachricht.More);
das geht auch nicht:
Listbox1.Items.Assigns(Nachricht.More);
obwohl ich oben before
Socket.ReceiveBuf (Nachricht, SizeOf(Nachricht));
das gemacht hab
Forum: Netzwerke
Delphi
by k4ni,
13. Dez 2007
Danke, geht aber auch nicht :(
Normale strings zu senden und zu empfangen geht ganz einfach, aber das ist nicht so leicht.
Forum: Netzwerke
Delphi
by k4ni,
13. Dez 2007
Ich hab das:
Nachricht.Nickname := 'Hello';
Nachricht.More.Create;
Nachricht.More.Assign(Listbox1.Items);
Socket.SendBuf (Nachricht, SizeOf(Nachricht));
und das:
Nachricht.Nickname := 'Hello';
Forum: Netzwerke
Delphi
by k4ni,
13. Dez 2007
Nein, und ich weis auch nicht was das heist.
Bitte um erklärung
Forum: Netzwerke
Delphi
by k4ni,
13. Dez 2007
Danke :-D
doch jetzt kommt eine Address Violation beim Server.
Forum: Netzwerke
Delphi
by k4ni,
13. Dez 2007
type TChatNachricht = Record
Nickname: string;
Text: string;
Text2: string;
More: TStrings
end;
Forum: Netzwerke
Delphi
by k4ni,
13. Dez 2007
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:
Server:
Nachricht.More(Listbox1.Items); //More ist TStrings