Форум: "Базы";
Текущий архив: 2004.01.13;
Скачать: [xml.tar.bz2];

Вниз

Добавить изображение в 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 вся ветка

Форум: "Базы";
Текущий архив: 2004.01.13;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.009 c