Ergebnis der Suchanfrage

• Forum: Netzwerke

  AW: ClientSocket bekommt keine Verbindung

    Delphi
    by UliBru, 6. Jan 2013
  Ähm, gute Idee. Werde ich gern auch mal testen.
  Es scheint mir als ob man nur durch Trial & Error lernt. Die Beschreibung einer Komponente mit den jeweiligen Methoden und Eigenschaften besagt ja nicht direkt etwas darüber, WIE man das nun richtig einsetzt. Und dann studiert man ja auch nicht jede Methode bis ins Letzte. Also schaut man nach Beispielen. Und bei den Beispielen hier im Forum, oder...
• Forum: Netzwerke

  AW: ClientSocket bekommt keine Verbindung

    Delphi
    by UliBru, 6. Jan 2013
  Ich hab nun Client.ClientType := ctBlocking getestet und damit klappt es auch. Das was der ursächliche Grund.
  Da sich mit TClientSocket ein kleineres Programm ergibt als mit TIdTCPClient verwende ich nun doch wieder das TClientSocket.
  
  Das Programm sieht nun so aus:
  Client := TClientSocket.Create(nil);
  try
  Client.Host := '127.0.0.1';
  Client.Port := 8078;
  Client.ClientType...
• Forum: Netzwerke

  AW: ClientSocket bekommt keine Verbindung [gelöst]

    Delphi
    by UliBru, 6. Jan 2013
  Das muss ich nochmal testen. Klingt logisch.
  In der Zwischenzeit hab ich es mit Indy getestet und das klappt. Never touch a running system ...
  
  
  IdTCPClient1 := TIdTCPClient.Create(nil);
  try
  IdTCPClient1.Host := '127.0.0.1';
  IdTCPClient1.Port := 8078;
  IdTCPClient1.Connect;
  if IdTCPClient1.Connected then
• Forum: Netzwerke

  AW: ClientSocket bekommt keine Verbindung

    Delphi
    by UliBru, 5. Jan 2013
  Ja, ich hatte zuerst auch den Server unabhängig vom Client geschrieben.
  Und wenn ich beim Sever mit
  telnet localhost 8078
  
  teste, bekomme ich auch eine Verbindung inkl. Anzeige des gesendeten Textes im Server. Das klappt also.
  
  Meine eigentliche Anwendung (testweise arg geschrumpft) ist
  
  program ACSendCommand;
• Forum: Netzwerke

  ClientSocket bekommt keine Verbindung

    Delphi
    by UliBru, 5. Jan 2013
  Habe ein für mich unverständliches Problem. Siehe Code-Snippet
  
  
  procedure TMainForm.Button1Click(Sender: TObject);
  begin
  ServerSocket1.Port := 8078;
  ServerSocket1.Open;
  if (ServerSocket1.Port = 8078) and (ServerSocket1.Active) then //Server aktiv ??
  begin
  ClientSocket1.Port := 8078;