Как передать переменную в FastReport ?

← →
Dimedrol © (2003-06-30 16:53) [0]

Коллеги, мне нужно в отчете писать цыфирьку,
введенную полоьзователем, скажем.
Так вот, как, например, из программы выставить значение
какого-нибудь TfrMemoView внутри отчета ?
Например сделать его = "1234567890" ?

← →
Dimedrol © (2003-06-30 17:52) [1]

Почему сюда переместили ?!
не понятно

← →
Anatoly Podgoretsky © (2003-06-30 17:55) [2]

Почему не удалили не понятно, чистый офтопик в базах.

← →
Витал © (2003-06-30 18:02) [3]

frReport.OnGetValue - вам поможет

← →
Dimedrol © (2003-06-30 18:25) [4]

2 Витал ©
Из вызывающей формы делаю -
RekF.frReport1.Dictionary.Variables["My_Var_Name"]:=989; или "989"

А уже в самой форме отчета даже так ее уже не видно -
procedure TRekF.FormShow(Sender: TObject); begin showmessage(RekF.frReport1.Dictionary.Variables["My_Var_Name"]); end;
Пустоту показывает... 8-(

Понятно что я ее потом в отчете не вижу.
Там МЕМО, пытается отобразить [My_Var_Name]
Тоже пусто...

2 Anatoly Podgoretsky ©
Не знал что FastReport не относиться к базам...

← →
Dimedrol © (2003-06-30 18:37) [5]

Спасибо Витал © !
Разобрался так :
PUBLIC xxx:STRING procedure TRekF.frReport1GetValue(const ParName: String; var ParValue: Variant); begin if ParName="My_Var_Name" then ParValue:=xxx; end;

А вот к стати еще вопрос:

Можно ли узнать, юзер НАПЕЧАТАЛ отчет, или
он в frReport1.PrintPreparedReportDlg нажал Cancel ?

Для передачи переменных можно так:
... frVariables["My_Var_Name"]:=xxx ...
По поводу второго вопроса... Вроде где-то на этом сайте мелькало что-то подобное, а может на http://www.fast-report.com/ru/forum.php
Некрасиво: можно отлавливать событие TfrReport.OnPrintReport...

Как передать переменную в FastReport ? Найти похожие ветки