Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо