Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.25;
Скачать: CL | DM;

Вниз

работа с TClient/TServerSocket   Найти похожие ветки 

 
4ward   (2004-02-27 14:23) [0]

отсылаю SendText"ом на сервере подряд несколько сообщений на один и тот же клиент. при приёме на клиентской стороне принимается конкатенация отправленных строк. как сделать, чтобы строки приходили по одной?
З.Ы. Заранее извиняюсь за ламерский вопрос


 
Verg ©   (2004-02-27 14:33) [1]

На приеме дробить принимаемый поток по строкам, зная их разделители.


 
TButton ©   (2004-02-27 18:34) [2]

парсить строки... счас функцию кину.

function ParseString(s: string): TStringList;
var
 list:TStringList;
 ss:string;
 i:integer;
begin
 list:=TStringList.Create;
 list.Clear;
 ss:="";
 result:=list;
 if s="" then exit;
 for i:=1 to Length(s) do
 begin
   if Ord(s[i])>31
     then ss:=ss+s[i]
     else if s[i]=Chr(13) then
     begin
       list.Add(ss);
       ss:="";
     end;
 end;
 result:=list;
end;


если интересно могу весь модуль для парсинга (самодельный) изложить.


 
TButton ©   (2004-02-27 18:46) [3]

маленькое примечание в конце каждой строки прилепляй #13#10 (или наоборот)... точно не помню... это общепринятое.



Страницы: 1 вся ветка

Текущий архив: 2004.04.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.052 c
3-1080189793
dm37
2004-03-25 07:43
2004.04.25
Корректная обработка доступа к процедурам MS SQL Server


14-1081151876
syte_ser78
2004-04-05 11:57
2004.04.25
Запрограмировался. :)


14-1081071735
Black_phoenix
2004-04-04 13:42
2004.04.25
Программы для клубов с открытым исходным кодом


14-1080376475
Тимур
2004-03-27 11:34
2004.04.25
Две мыши


14-1080622115
Dmitriy O.
2004-03-30 08:48
2004.04.25
Набираю команду кодеров.