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

Рисунки в Access с помощью ADO   Найти похожие ветки 

← →
dito ©   (2003-08-10 17:43) [0]

Привет,

Как добавить рисунок в базу MS Access с помощью ADO?
Как я думаю, в базе Access должен быть поле OLE (или MEMO), а в Delphi:
AdoDataSet1.FieldByName("Picture").asBCD:= … а дальше?

Может я что-то не так делаю?

Заранее благодарю.

---

← →
sniknik ©   (2003-08-10 18:20) [1]

BCD это цифра, а не рисунок

попробуй так

TBLOBField(ADODataSet1.FieldByName("Picture")).LoadFromFile("Image.Bmp ");

или так (это точно работает)

---

← →
sniknik ©   (2003-08-10 18:21) [2]

var st: string;
begin
if ADODataSet1.Active then begin
st:= ADODataSet1.FieldByName("AUTOID").AsString;
ADOCommand1.CommandText:= "UPDATE MyTable SET ImField=:ImField WHERE AUTOID="+St;
ADOCommand1.Parameters.ParamByName("ImField").LoadFromFile(Edit1.Text, ftGraphic);
ADOCommand1.Execute;
end;
end;

---

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

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



Память: 0.45 MB
Время: 0.018 c