Вниз
Скачать: CL | DM;

Как записать кртинку из bmp-файла в таблицу Access?   Найти похожие ветки 

 
abell   (2004-12-10 10:39) [0]

Есть таблица в базе access, поле "Photo" определено как OLE.
Пытаюсь сделать следующее:

var
 stFile: TFileStream;
 stData: TBlobStream;
begin
 ADODataSet1.Edit;
 stFile:=TFileStream.Create(OpenDialog1.FileName, fmOpenRead);
 stData:=TBlobStream.Create(ADODataSet1.FieldByName("Photo") as TBlobField, bmReadWrite); // Ошибка здесь.
 stData.CopyFrom(stFile,stFile.Size);
 ADODataSet1.Post;
 stData.Free;
 stFile.Free;
end;

и вылетает "Invalid class typecast".
Что не так? Делаю то же самое для dBase 5 - все отлично, только поле типа Binary. В access такого типа нет, но описание OLE вроде бы подходит к этому типу. Как быть? От access базы отказаться не получится, она уже в работе.


 
Соловьев ©   (2004-12-10 10:44) [1]

Читаем как всегда хелп и не придумываем себе проблем на голову:
...
if not (Query.State in [dsInsert, dsEdit]) then Query1.Insert;

Query1Images.LoadFromFile("c:\Windows\Waves.bmp");
Query1.Post;
...


 
-=SS=- ©   (2004-12-10 11:05) [2]


ADODataSet1.Insert;
TBlobField(ADODataSet1.FieldByName("Picture")).LoadFromFile(OpenDialog1.FileName);
ADODataSet1.Post;

 enjoy



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.029 c
1-1104750616
kirilllius
2005-01-03 14:10
2005.01.16
Delphi 7


3-1102839075
Dell3r
2004-12-12 11:11
2005.01.16
TQuickRep


14-1103690463
КаПиБаРа
2004-12-22 07:41
2005.01.16
Об информации


1-1104353001
SilverDragon
2004-12-29 23:43
2005.01.16
Работа с динамическими обьектами


4-1101632434
mospehraict
2004-11-28 12:00
2005.01.16
перехват мыши при drag-n-drop файлов на объект




   Наверх