Консультация № 181374
15.12.2010, 11:11
54.40 руб.
0 1 1
Здравствуйте, уважаемые эксперты! Прошу Вас ответить на следующий вопрос: Задача такая Delphi7 + FreeReport v2.33. В отчете есть рисунок (Picture). Вопрос : как управлять видимостью рисунка из основного кода программы???

Обсуждение

Неизвестный
15.12.2010, 12:08
общий
это ответ
Здравствуйте, PaTiFoN!
Предлагаю следующее решение задачи.
Необходимо получить в модуле программы объект рисунка из отчета fastReport используя функцию FindObject. После этого, перед формированием отчета, изменяем свойство объекта (в Вашем случае это картинка) Visible на значение false. Далее выводим отчет на печать (просмотр).
Вот реализация:

Код:

//модуль программы delphi
var
frxComp: TfrxComponent; //для объекта рисунка из отчета
{...}
begin
{...}
frxReport1.LoadFromFile('report.fr3'); //загружаем необходимый отчет из файла в frxReport1 (если это необходимо)
//ищем нужную картинку по имени объекта используемому в отчете (узнать можно в редакторе отчета FastReport Disegner)
//в своем случае я ищу картинку с именем 'Picture1' на первой странице (Pages[1]) отчета frxReport1
frxComp:=fMain.frxReport1.Pages[1].FindObject('Picture1'); //теперь в frxCopm ссылка на объект рисунка из отчета
frxComp.Visible:=false; //если не нужно выводить рисунок - ставим свойство Visible равное false, иначе при значении true - картинка будет выводиться
frxReport1.PrepareReport(true); //формируем отчет
frxReport1.ShowPreparedReport; //отображаем сформированный отчет
{...}
end;


Успехов!
5
За эту строчку спасибо. - fMain.frxReport1.Pages[1].FindObject('Picture1')!!!
Форма ответа