AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke Delphi Nur einmal WriteLn mit IDTCPServer
Thema durchsuchen
Ansicht
Themen-Optionen

Nur einmal WriteLn mit IDTCPServer

Ein Thema von RobertS · begonnen am 4. Aug 2003 · letzter Beitrag vom 5. Aug 2003
 
RobertS
(Gast)

n/a Beiträge
 
#1

Nur einmal WriteLn mit IDTCPServer

  Alt 4. Aug 2003, 19:35
Hi habe auf dem Demos von Indy augebaut habe aber jetzt folgendes Problem:


Delphi-Quellcode:
procedure TServer.IdTCPServercom_restartCommand(ASender: TIdCommand);
var
n:integer;
begin
ASender.Thread.Connection.WriteLn('Aktion wir gestartet..');
for n:=0 to 15000 do label1.caption:=Inttostr(n); // eine aktione
ASender.Thread.Connection.WriteLn('Aktion erfolgreich');
Wie man sehen kann schicke ich 2 mal per WriteLn eine message diese kommt aber nur 1. mal an.

Hat jemand eine Idee wieso das so ist?
Hier der Source vom Sendcommand(Client):

Delphi-Quellcode:
procedure TProg.btnSendCommandClick(Sender: TObject);
var
    LCommand, LInString : String;
    LInInteger : integer;
begin
LCommand := cboCommands.Text;
LInInteger := -1;
with IdTCPClient do begin
  try
    WriteLn(LCommand);
    case cboCommands.ItemIndex of
     0: LInString := ReadLn;
     1: LInString := ReadLn;
     2: LInInteger := ReadInteger;
     3: LInString := ReadLn;
    end;
    if LInInteger <> -1 then
     LInString := IntToStr(LInInteger);
     lbCommunication.Items.Insert(0,'We said -> ' + LCommand);
     lbCommunication.Items.Insert(0,'Server said -> ' + LInString);
    except
      on E : Exception do begin
       // LockControls(True);
        ShowMessage(E.Message);
     end;
   end;

end;


end;
Ich danke im voraus
mfg aus köln r
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:16 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz