Текущий архив: 2003.07.17;
Скачать: CL | DM;
Вниз
Как передать переменную в 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;
← →
Dimedrol © (2003-06-30 18:46) [6]А вот к стати еще вопрос:
Можно ли узнать, юзер НАПЕЧАТАЛ отчет, или
он в frReport1.PrintPreparedReportDlg нажал Cancel ?
← →
Hint © (2003-06-30 19:24) [7]Для передачи переменных можно так:
...
frVariables["My_Var_Name"]:=xxx
...
По поводу второго вопроса... Вроде где-то на этом сайте мелькало что-то подобное, а может на http://www.fast-report.com/ru/forum.php
Некрасиво: можно отлавливать событие TfrReport.OnPrintReport...
Страницы: 1 вся ветка
Текущий архив: 2003.07.17;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.013 c
