![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сохранение 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;