Каскадный режим | Линейный режим

***all__*** · 14.12.2011 15:44

Это памятка для меня, но может еще кому-нибудь пригодится.

PHP код:

function StreamToString(Stream: TStream): String;
begin
    with TStringStream.Create('') do
    try
        CopyFrom(Stream, Stream.Size - Stream.Position);
        Result := DataString;
    finally
        Free;
    end;
end; 

31.05.2013 13:48

спаcибо!
____
tu104

Похожие темы
Тема:		Автор	Ответов:	Просмотров:	Посл. сообщение
	Конвертация String в TStream	all__	0	2 469	14.12.2011 15:47 Посл. сообщение: all__

Каскадный режим \| Линейный режим Перевод TStream в String
Автор	Сообщение