Einzelnen Beitrag anzeigen

Benutzerbild von DymonD
DymonD

Registriert seit: 12. Mai 2004
Ort: Niederhöchstadt
116 Beiträge
 
Delphi 2005 Personal
 
#43

Re: Nachricht vom Server an alle Clienten schicken

  Alt 12. Mai 2004, 15:24
hi,

nice nice... bloß dass er nix macht ^^

aber ich peil udp ned und es geht auch ned... aud außerdem soll das nicht im netzwerk sein sondern im inet, der soll das an alle aktive verbindungen senden..

wieso geht das bei mir ned??
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
begin
  //----------- Den Mist senden --------------
  // hier stehen die senden-komponente
  Form1.TcpClient1.Sendln('DymonD sagt:'+Memo2.Text);
  Form2.Memo2.Text := '';
  //----------- und beim Senden auch lesen ---
  Form2.Memo1.Lines.Add(Form1.TcpServer1.Receiveln);
end;
oder soll ich das anders schreiben:

Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
begin
  //----------- Den Mist senden --------------
  // hier stehen die senden-komponente
  Form1.TcpClient1.Sendln('DymonD sagt:'+Memo2.Text);
  Form2.Memo2.Text := '';
  //----------- und beim Senden auch lesen ---
  Form2.Memo1.Lines.Add(Form1.TcpClient1.Receiveln);
end;
erst wenns funzt wird der code eingebaut damit der server den string an alle clients sendet

DymonD
Dimitri K.
DymonD & Dimak are Ganxtas Of Paradise
http://www.dymond-online.de/gop
  Mit Zitat antworten Zitat