Thema: Delphi Senden von großem Text

Einzelnen Beitrag anzeigen

suncezz

Registriert seit: 2. Dez 2008
8 Beiträge
 
#1

Senden von großem Text

  Alt 28. Mai 2009, 16:33
Hallo,

ich habe folgendes problem :

ich möchte den gesammten inhalt eines memo-fensters senden.
hierzu benutze ich Tclientsocket.

Delphi-Quellcode:
procedure TForm1.SendenClick(Sender: TObject);
var count,i : integer;
    zeile : string ;
begin
count := memo1.Lines.Count ;
   for i := 0 to count-1 do
       begin
       zeile := memo1.Lines.Strings[i];
       clientsocket1.Socket.SendText(zeile);
       end;
end;
das problem ist das nich alles ankommt... warscheinlich weil die schleife schneller ist als er mit dem senden hinterher kommt..

hat jemand eine ahnung wie man es vlt besser machen könnte ? weil so müsste man ja nach jedem schleifendurchgang ein "sleep" haben.

danke schon mal, mfg suncezz
  Mit Zitat antworten Zitat