Помогите с базой на Access

← →
Vetas (2004-03-29 10:04) [0]

День добрый. Суть в следующем. В поле объекта OLE надо вставить вотографию в JPG, но при подключении базы BDImage матрерится "Bitmap image is not valid"

← →
Kadr © (2004-03-29 11:14) [1]

Используй TImage
Код примерно следующий:

Uses JPEG

var
img:Stream;
jpg:TJPEGImage;
begin
if OpenDialog1.Execute then
begin
try
jpg:=TJPEGImage.Create;
jpg.LoadFromFile(OpenDialog1.FileName);
Image1.Picture.Assign(jpg);

img:=Table1.CreateBlobStream(Table1.FieldByName("BLOB"),
bmWrite);
jpg.SaveToStream(img);
finally
jpg.Free;
img.Free;
end;
end;
end;

Помогите с базой на Access Найти похожие ветки