[nixon232]

В поле есть файл, пытаюсь его сохранить в поток, но ругается Stream error write. Вроде удается записать в TMemoryStream, но передать его в стрим не могу. Я думал, что из области как Tstrings и Tstringlist, но что ничего толком не вышло. Или размер нужно вручную выставить?

Код:

1 2 3 4 5

MS:=TMemoryStream.Create;      bf:= TBlobField(Query.FieldByName('u_Data'));      bf.SaveToStream(ms);             ms.SaveToStream(m); // var M: Tstream тут Stream write error

Наставьте на путь истесанный.
--- upd Вроде удалось решить

Код:

1 2	M: tsream; m:=tMemoryStrem.create;

но смущает, так ли делаю?