Советы по Delphi
Передача переменных отчета в ReportSmith II
Тема: Передача переменных в отчет ReportSmith
Следующий код демонстрирует технологию передачи переменных в отчет ReportSmith.
Примечание: данный совет подразумевает ваше знание темы создания отчета со включенными переменными отчета. Для получения дополнительной информации обратитесь к электронной справке по ReportSmith к главе 'Creating Reports' (создание отчетов), поставляемой вместе с Delphi.
В нашем случае мы присвоим значение ('CA') строковой переменной отчета с именем 'state'.
Код ReportSmith:
Данная информация размещается в ReportSmith в диалоге ReportVariables (переменные отчета). Данный диалог можно вызвать, выбирая в меню Rreportsmith Tools | Report Query и нажимая на кнопку Report Variables. Name: state Type: string Title: state var Prompt: Введите ваше любимое состояние. Entry: type-in Report Variables: state ; Имейте в виду, что данная переменная и хранимое в ней значение при передаче в ReportSmith чувствительны к регистру. Код Delphi:
Данный код подразумевает, что вы разместили на форме компонент TReport, назвали его 'Report1' и установили его свойство ReportName в соответствии с именем отчета, передаваемого в переменной, приведенной выше.
Разместите следующий код в обработчике события OnClick кнопки, расположенной на вашей форме. В данном случае я использую событие кнопки исключительно в целях простоты, и для ваших целей можно использовать любое другое событие:
|
procedure TForm1.Button1Click(Sender: TObject);
var s: string;
begin
s:='CA';
Report1.InitialValues.Add('@state=<'+s+'>');
Report1.run;
end; |
[000941]
