Переменные в LAZREPORT

[Luxor]

Как мне программно создать переменную в lazreport?
Есть массив в виде [имя переменной, значение переменной]
Надо, чтобы я отобразив поле в отчете - мог вывести в него значение переменной. (по такому же принципу, как отображение поля базы данных). Как правильно создавать переменные программно?

[SeZuka]

Используй событие OnGetValue, в него передается имя переменной, обратно возвращаешь ее значение.

[alexs]

frValues['имя переменной']:=значение переменной.

[Luxor]

frValues['имя переменной']:=значение переменной.

Чего-то не получается...
Делаю так:

Код: Выделить всё

DM.frReport1.Variables.Add('CAT_01');

затем

Код: Выделить всё

if FrmEnterParamsReport.Components[m] is TDateEdit then
                begin
                  Params.Items[j].Value :=
                    (FrmEnterParamsReport.Components[m] as TDateEdit).Text;
                  DM.frReport1.Variables.Add(' '+Params.Items[j].Name);
//? здесь присваивать значение?
                end;


Получается список переменных
Теперь надо присвоить значения этим переменным. Я так понимаю это надо делать после того, как добавили переменную.
Как присвоить значение?

[SeZuka]

Код: Выделить всё

procedure TDM.frReport1GetValue(const ParName: String; var ParValue: Variant);
begin
  ParValue := Params.Values[ParName];
end;

[Luxor]

Спасибо. Всё заработало.