Показать сообщение отдельно
  #2  
Старый 07.10.2011, 08:00
Аватар для Ildar-tsr
Ildar-tsr Ildar-tsr вне форума
Местный
 
Регистрация: 09.08.2011
Адрес: г.Сургут, ХМАО
Сообщения: 453
Репутация: 7402
По умолчанию

В uses добавь Shellapi:
Код:
unit Unit1;
interface
uses
...,
Shellapi;

На форму кинуть ADOQuery (name - query).
Установить Connection, а в SQL внести запрос типа:
Код:
select I_Image from tbl_Image
потом обрабатываем (как пример на нажатие кнопки)
Код:
procedure TfmLinks.Button1Click(Sender: TObject);
begin
  if query.Active then
    query.close;
  query.open; //получили твою картинку

  //сохраняем на диск С под именем Image с расширением JPEG
  TBlobField(query.FieldByName('I_Image')).SaveToFile('C:\Image.jpg'); 

  //открытие
  ShellExecute(0,'Open',PChar('C:\Image.jpg'),nil,nil,1);
end;
Как-то так.
__________________
Google в помощь
Ответить с цитированием