![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
проблемма с вычиткой BLOB полей из базы данных
ford © (2009-03-05 11:55:00)Удалено модератором
Примечание: Восстановление закрытой ветки
Ega23 (2009-03-05 12:15:00) [1]попробуй тупо
uses DB
var
bf: TBLOBField;
ms : TMemoryStream;
begin
bf := TBLOBField(DataSet.FieldByName('myBLOB'));
if bf.IsNull then Exit;
ms := TMemoryStream.Create;
try
bf.SavetoStream(ms);
ms.Position := 0;
ms.SaveToFile('C:\1.rtf');
finally
ms.Free;
end;
end;