![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Добавить изображение в Blob поле [D6, D7, dBase, FoxPro]
OlegM © (2003-12-16 10:00:00)
Привет всем!
Что то не получается подскажите че не так делаю
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:00) [1]
Ошибку напиши ...