Blob поля

← →
*Denis* (2004-06-17 19:50) [0]

Подскажите пожалуйста как достать(обратиться) информацию из блоб поля и сохранить в файл ????

← →
Ozone © (2004-06-18 05:20) [1]

Что-то типа того:
TBlobField(Table1.FieldByName("...")).SaveToFile("...");

← →
*Denis* (2004-06-18 09:15) [2]

Поставим вопрос по-другому как из этого поля выгрузить изображение в DBImage ?????

← →
Ozone © (2004-06-18 11:10) [3]

Укажи соответстующее поле в DataField.

← →
Moss (2004-06-22 15:54) [4]

Procedure SaveBlob(F: tField; FN: String);

Var S: tStream;
FS: tFileStream;

Begin

S:= F.DataSet.CreateBlobStream(F, bmRead);
FS:= tFileStream.Create(FN, fmCreate);
S.Position:= 0;
FS.CopyFrom(S, 0);
S.Free;
FS.Free;

End;

← →
Subdigger (2004-06-22 19:07) [5]

2 Мосс

а филд это какой филд?

← →
Moss (2004-06-25 13:58) [6]

а филд - это свойство компонента tDataSet.Fields[i].

Например, есть таблица Table1: tTable c полями:
Table1.Fields[0] - имеет тип "Строка"
Table1.Fields[1] - имеет тип "Число"
Table1.Fields[2] - имеет тип "Blob"

для сохранения Table1.Fields[2] в файл "C:\1.1" делай так:

Procedure tForm1.SaveToFileButtonClick(Sender: tObject);
Begin

IF OpenDialog1.Execute Then

SaveBlob(Table1.Fields[2], OpenDialog1.FileName) ;

End;

Класс tField лежит в DB.Pas

Ясно ?

Blob поля Найти похожие ветки