Probleme mit TClientSocket unter D3 Prof.

[Ati]

Mahlzeit Leute,

ich bastel gerade an einem Programm, wo Daten zwischen einem Server und einem Client ausgetauscht werden. Ich habe die Kompo´s TClientsocket und TServerSocket auch visuell nachgerüstet. Wenn ich jetzt die Komponenten benutzen will, funktioniert kaum was. Hier mal der Code im OnCreate-Ereignis:

Code:

procedure TForm1.FormCreate(Sender: TObject);
begin
  //ClientSocket1 := TClientSocket.Create(Form1);
  ClientSocket1.Port := 5555; // Port festlegen
  ClientSocket1.Host := '127.0.0.1'; // IP des Zielrechners
  ClientSocket1.Active := TRUE;

end;

So sieht der Code aus wenn ich die Komponente auf die Form zieh. Hierbei dauert es ca. 20-30 Sek. bis das Formular überhaupt angezeigt wird. Wenn ich dann einen Text zum Server schicken möchte dauert es sogar noch länger bis dieser im Memofeld des Servers angezeigt wird.

Jetzt gibt es ja noch die Möglichkeit TClientSocket und TServerSocket nicht als visuelle Komponente zu benutzen. Hierbei habe ich auch wiederum das Problem das das anzeigen des Formulars unheimlich lange dauert, andererseits geht das senden des Textes sofort zum Server.

Ich hatte ja schonmal überlegt auf Winshoes umzusteigen doch irgendwie kann ich mich mit denen nichz so wirklich anfreunden (zu kompliziert für mich ).

Weiß jemand Rat????

Ati

[PierreB]

Zitat:

So sieht der Code aus wenn ich die Komponente auf die Form zieh. Hierbei dauert es ca. 20-30 Sek. bis das Formular überhaupt angezeigt wird.

Das dauert deshalb solange, weil du ja mittels

Code:

ClientSocket1.Active := TRUE;

den Clienten schon verbinden lässt und das dauert halt ein bisschen. (Mach das doch im nachhinein per Button oder so)

Zitat:

Wenn ich dann einen Text zum Server schicken möchte dauert es sogar noch länger bis dieser im Memofeld des Servers angezeigt wird.

Diese könnte unter anderem an deiner Internet/LAN-Verbindung liegen. (Es ist dir wohl klar das man das Senden mit einem Modem nicht mit DSL vergleichen kann). Aber poste doch mal den Code den du zum Senden benutzt.

[Ati]

@Delphman wie Du oben in meinem OnCreate Ereignis siehst teste ich das ganze erstmal auf meinem eigenen Computer. Das mit der Zeitverzögerung liegt also garantiert nicht daran, und selbst wenn ich das über eine Leitung schicken würde.....warum funktioniert das dann wenn ich nicht die visuelle Komponente nehme?????

Das mit dem ClientSocket1.Active := TRUE; als Ursachde kann ich mir irgendwie nicht vorstellen aber vielleicht bin ich ja auch ein "ungläubiger Jakob"

Ati