Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Blob поля [D7, dBase, FoxPro]

*Denis* © (2004-06-17 19:50:00)
Подскажите пожалуйста как достать(обратиться) информацию из блоб поля и сохранить в файл ????

Moss (2004-06-25 13:58:00) [1]
а филд - это свойство компонента 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

Ясно ?

Subdigger (2004-06-22 19:07:00) [2]
2 Мосс

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

Moss (2004-06-22 15:54:00) [3]
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;

Ozone (2004-06-18 11:10:00) [4]
Укажи соответстующее поле в DataField.

*Denis* (2004-06-18 09:15:00) [5]
Поставим вопрос по-другому как из этого поля выгрузить изображение в DBImage ?????

Ozone (2004-06-18 05:20:00) [6]
Что-то типа того:
TBlobField(Table1.FieldByName('...')).SaveToFile('...');

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »