![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как загрузить рисунок в базу данных? [D7, Paradox]
Юлиана © (2003-12-12 07:34:00)
Подскажите, пожалуйста, как вставить рисунок в таблицу БД с помощью Query.
nik222 (2003-12-12 11:32:00) [1]
Я использую TImgLIb.
Решает все задачи работы с изображениями
Silver Alex (2003-12-12 10:10:00) [2]
можно вот так.Если будет более точная постановка задачи, будет более точный ответ(по ситуации)
procedure TForm1.Button1Click(Sender: TObject);
const
sqlUpdate="update Main.db set ico=:ico where id=:id"
begin
if PictureDialog.Execute then
with qUpdate do
begin
SQL.Clear;
SQL.Add(sqlUpdate);
ParamByName("ico").LoadFromFile(PictureDialog.FileName,ftGraphic);
ParamByName("id").AsInteger:=Table1.FieldByname("id").AsInteger;
ExecSQL;
// RefLocEx(Table1,"id",0);refresh
end;
end;
Stas (2003-12-12 09:48:00) [3]
Нужно поле Blob, и вставлять с помощью потока TMemoryStream.