Einzelnen Beitrag anzeigen

butch

Registriert seit: 22. Aug 2003
Ort: Herzberg/E.
15 Beiträge
 
#1

TClientSocket - Probleme bei SendText

  Alt 22. Dez 2003, 21:28
Also,
als erstes sag ich gleich das ich nicht die Komponente TClientSocket benutze. Also schoen mit codebsp alles versehen
Als erstes mache ich:
Delphi-Quellcode:
 
var
       Socket: TClientSocket;
dann
Delphi-Quellcode:
procedure TForm1.connect();
begin
  Socket := TClientSocket.Create(Form1);
  Socket.Port := 5555;
  Socket.Address := '192.168.0.5';
  Socket.Open;
  Socket.Socket.SendText('0001');
  Socket.Close;
end;
wenn ich nun die Procedure aufrufe ( was per buttonklick geschieht) sagt mir mein testserver beim 1. Klick das er connectet (schickt aber nichts) beim 2. klick connectet er dann nicht mal mehr
Das 1. GROSSE Problem ist das er nichts sendet. Das er beim 2. Klick nciht connectet kann ich mir auch nicht erklaeren *g*

Hoffe ihr koennt mir helfen.

\\Robert
  Mit Zitat antworten Zitat