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

Добавить изображение в Blob поле   Найти похожие ветки 

← →
OlegM ©   (2003-12-16 10:00) [0]

Привет всем!
Что то не получается подскажите че не так делаю
var
S:TStream;
begin
main.dbf2.Insert;
main.dbf2.FieldByName("ID").AsInteger:=strtoint(edit1.Text);
S:=main.dbf2.CreateBlobStream(main.dbf2.FieldByName("IMGOBOR"), bmReadWrite);
try
image1.Picture.Bitmap.SaveToStream(S);
finally
S.Free;
end;
main.dbf2.Post;

---

← →
JibSkeart ©   (2003-12-16 17:17) [1]

Ошибку напиши ...

---

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

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



Память: 0.44 MB
Время: 0.016 c