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

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

Сохранение any файлов в DB


Furkan ©   (2003-09-08 14:41:00) 

Каким образом можно сделать сабж.
Как я понимаю в BLOB, через поток?
Только если можно подробней...


x77   (2003-09-08 14:46:00) [1]

как гласит F1,

var

FS: TFileStream;
begin
if not (Query1.State in [dsInsert, dsEdit]) then Query1.Insert;
FS := TFileStream.Create("c:\Windows\Winlogo.bmp", fmOpenRead);
try
Query1Images.LoadFromStream(FS);
finally
FS.Free;
end;
Query1.Post;
end;


Наверх

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