![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Люди помогите! Мне надо преобразовать данные типа String в Stream
Ksion © (2002-08-06 12:06:00)Проблема у меня такая, я получаю от пользователя данные типа String и чтоб мне их передать дальше мне надо их перекодировать в данные типа Stream. Кто знает как это сделать подскажите плиз.
Владимир Васильев (2002-08-06 16:25:00) [1]procedure WriteStr(S: String; Stream: TStream);
var
i:word;
begin
i:=length(s);
stream.Write(i,sizeof(i));
stream.write(pchar(s)^,i);
end;
Дмитрий Баранов (2002-08-06 12:49:00) [2]TStringStream
MBo (2002-08-06 12:16:00) [3]L:=Length(AString);
AStream.Write(L,SizeOf(Integer));
AStream.Write(AString[1],L);