Передача параметров

mishabik

Проблема следующая:
Хочу передать в отчет набор параметров из программы. При этом стандартный диалог fast report для задания параметров открывать не хочется.
Может кто знает, как это сделать?

Simon

Я посмотрел исходники FastReport (функция GetVariableValue) и мне кажется,
что есть возможность достучаться из программы до переменных через свойство

FR.Dictionary.Variables


Simon

Simon

P.S.

Или переменную frVariables:TfrVariables из модуля FR_Class

mishabik

Добраться-то я добрался. Вот только диалог все-равно выводится. Даже если на нем ничего кроме Query нет

AlexTZ

FAQ читали?

2.25. Как передать значение из программы в отчет?

Есть несколько способов. Первый: использовать глобальный объект frVariables
(описан в FR_Class):

frVariables := 10;

создает переменную My variable со значением 10. Это способ подходит,
если в отчет нужно передать статическую информацию (т.е. не меняющуюся
в течение построения отчета).
Второй способ: использовать событие TfrReport.OnGetValue. Этот способ
подходит для передачи в отчет информации, которая может меняться от
записи к записи:

procedure TForm1.frReport1GetValue(ParName: String; var ParValue: Variant);
begin
if ParName = 'MyField' then
ParValue := Table1MyField.Value;
end;

И, наконец, третий способ: программно заполнить список переменных.

with frReport1.Dictionary do
begin
Variables := 'CustomerData.Customers."CustNo"';
Variables := '10';
end;


(а можно ли передать значение из отчета обратно в программу?)

Можно - используйте объект frVariables. Если в отчете написать в скрипте
одного из объектов:

MyVariable := 10

то в программе значение MyVariable можно достать так:
v := frVariables;

mishabik

Пытаюсь использовать переменную Dictionary. Все равно выдает диалог, на котором расположен query отчета. Дословно делаю следующее:

frReport1.LoadFromFile('Untitled.frf');
frReport1.Dictionary.Variables := StrToInt(Edit1.Text);
frReport1.ShowReport;

Предварительно сохранил отчет в файл Untitled.frf.
В редакторе парамеиров отчета выставлено par=[V1]
Ну и понятно переменная V1 тоже заведена в отчете.

Может можно как-нибудь принудительно отключить появление диалога?

AlexTZ

О каком диалоге идет речь? Если на диалоговой форме нет контролов, а есть только невизуальные компоненты, форма показана не будет. Если только... вы не пользуетесь старым менеджером данных.

mishabik

Вероятнее всего там действительно был старый менеджер данных. После переустановки fast report все заработало нормально. Спасибо всем за советы.