Forum: Netzwerke
Delphi
by Aenogym,
21. Dez 2006
also mit 127.0.0.1 sollte es keine probleme geben. habe ich damals auch erfolgreich auf einem rechner laufen gelassen :)
Forum: Netzwerke
Delphi
by Aenogym,
21. Dez 2006
also ich sitz grad auf arbeit und kann daher leider nicht mal eben nachvollziehen ;)
prinzipiell solltest du alles richtig machen. am besten nochmal in der delphihilfe nachlesen und einfach ein bisschen rumprobieren :thumb:
aeno
Forum: Netzwerke
Delphi
by Aenogym,
21. Dez 2006
schreib dir zuerst eine funktion, die als eventhandler dient:
procedure TForm1.MyReceive(Sender: TObject; Buf: PChar;
var DataLen: Integer);
begin
//hier die nachricht ausesen (steck im parameter "Buf"; die länge steht in "DataLen")
end;
dann, beim OnAccept des TcpServer folgendes:
Forum: Netzwerke
Delphi
by Aenogym,
21. Dez 2006
also durch das OnAccept bekommst du ja den client als TCustomIpClient übergeben. den kannst du dir für spätere zwecke beispielsweise in einem array ablegen.
wenn du nun was vom server zum client senden willst, musst du lediglich TCustomIpClient.SendLn() aufrufen. am client wird dann OnReceive ausgelöst, welches dir mittels Buf und DataLen die Nachricht übergibt :)
im grunde ganz simpel....