hi,
geh ma da drauf, da habe ich die frage als ein neues thema gepostet..
http://www.delphipraxis.net/internal...=173909#173909
so und nun der Quellcode: server starten geht, nachricht senden ned...
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
begin
//----------- Den Mist senden --------------
// hier stehen die senden-komponente
Form1.IdUDPClient1.Send('DymonD sagt: '+Memo2.Text);
Form2.Memo2.Text := '';
end;
ich benutze UDP weil es einfacher geht.. ich habe es mit
tcp/
ip versucht aber es geht ned... vielleicht mache ich was falsch..?
Delphi-Quellcode:
Form1.TcpClient1.Sendln('DymonD sagt: '+Memo2.Text);
Form2.Memo2 := '';
und empfangen mit
tcp...
in Form1:
Form1.TcpServer1.OnReceive := Form2.JaDannLiesMal(Sender);
in Form2:
Delphi-Quellcode:
procedure TForm2.JaDannLiesMal(Sender: TObject);
begin
// so und nun empfangen...
Form2.Memo1.Lines.Add(Form1.TcpServer1.Receiveln);
end;
dymond