Hi,
hatte nen kleines Problem deine Projekte zu öffnen, weil ich die beiden Komponenten (TClientSocket, TServerSocket) nicht als
VCL-Komponente installiert habe (warum auch immer die in
RAD Studio 2009 nicht installiert sind).
Trotzdem habe ich mir das ganze mal angeguckt. Hab die Komponenten einfach zur Laufzeit erzeugt.
Das erste, was mir aufgefallen ist, ist die Zuweiseung der Verbindungsinformationen beim Client...
Du verwendest die Eigenschaft "Host". Die Delphi Hilfe sagt aber, man soll die Eigenschaften Address und Port benutzen, weil die Host-Eigenschaft nur irgendein Alias ist. Weiß ich gerade auch nicht mehr so genau
Das ganze sieht dann in entwa so aus:
Delphi-Quellcode:
procedure TForm1.ConnectClick(Sender: TObject);
begin
Client.Address :=
ip.Text;
Client.Port := 8181;
Client.Open;
Start.Enabled := True;
Passiert.Lines.Add('
Verbunden (' + TimeToStr(Now) + '
)');
end;
Ich hoffe du hast bei dem Server den Port auch auf 8181 gestellt
Wenn du die Verbindungsinformationen wie oben beim Client angibtst sollte es eigentlich laufen.
Gruß