Работает нормально. Только что проверил
Простейший отчёт:
Страница отчёта
Страница с данными
На странице с данными (Dialog1) расположил запрос (quSpr3), в котором извлекается изображение в поле spr_3_image
На странице отчёта расположен Picture, в поле DataField прописал значение [Dialog1.quSpr3."spr_3_image"]
В обработчике Dialog1.OnClick написал Dialog1.quSpr3.Open
Всё работает норм.
oтобразить картинки JPG - формата в Lazreport-e
Модератор: Модераторы
Картинка сама хоть записывается напрямую из базы на жесткий диск ??
Во пример кода:
Во пример кода:
Код: Выделить всё
var
jp:TJPEGImage;
SQLQuery: TZQuery;
begin
SQLQuery := TZQuery.Create(nil);
try
SQLQuery.Connection := ZConnection1;
SQLQuery.Active:=false;
SQLQuery.SQL.Clear;
SQLQuery.SQL.add('SELECT image FROM imags WHERE id="111" LIMIT 1;');
SQLQuery.Open;
jp:=TJPEGImage.Create;
jp.LoadFromStream(TStringStream.Create(SQLQuery.FieldByName('image').AsString));
jp.SaveToFile('/tmp/scan.jpg');
finally
jp.free;
SQLQuery.Free;
end;alexs писал(а):Работает нормально. Только что проверил
Простейший отчёт:
Страница отчёта
Страница с данными
На странице с данными (Dialog1) расположил запрос (quSpr3), в котором извлекается изображение в поле spr_3_image
На странице отчёта расположен Picture, в поле DataField прописал значение [Dialog1.quSpr3."spr_3_image"]
В обработчике Dialog1.OnClick написал Dialog1.quSpr3.Open
Всё работает норм.
спасибо завтра еще раз попытаюсь
