Передача переменной во Free Report

Комментарии

• gpi

  February 2006 отредактировано 19:42

  Должно работать.
  А значение

  написал:

  (...Тут дата из календаря на форме берется)

  присутствует? Не пустое?
  Для проверки можно попробовать frVariables := Date;
  А Update2 для Delphi6 установлен?
  
• Solo

  February 2006 отредактировано 19:42

  gpi написал:

  Должно работать.
  А значение

  gpi написал:

  (...Тут дата из календаря на форме берется)

  присутствует? Не пустое?
  Для проверки можно попробовать frVariables := Date;
  А Update2 для Delphi6 установлен?

  А значение (...Тут дата из календаря на форме берется)[/QUOTE] присутствует? Не пустое?
  
  Не, не пустое, конечно :-) Да и без даты я пробовал, как в хелпе написано делал
  frVariables := 'Апрель' , пробовал и Integer (10), и строковый тип, и дату...
  
  Дельфи все апдейты стоят, с 1 по 3-й...
  
  Я все-таки думаю, что при загрузке из frf-файла этот прибамбас может не работать, только при сохранении репорта в ДФМ... :-( Жаль, если так...
  
  
  
• -=Serg=-

  February 2006 отредактировано 19:42

  Покажи порядок вызова функций начиная от загрузки файла и кончая показом отчета.
• Solo

  February 2006 отредактировано February 2006

  написал:

  Покажи порядок вызова функций начиная от загрузки файла и кончая показом отчета.

  Вот примерно так

  frReport1.Title:= 'Задолженность оплаты за услуги';
    //Загружаем файл квитанции Debt.frf
    frReport1.LoadFromFile('Reports\Debt.frf');
    //Обновляем Query задолженности
    QryDebtRefresh(QryDetailDebt, FmTheMain.QryTheMain.FieldByName('MID').AsInteger, VolgaPeriod1.StartDate);
    //Переключаем датасет репорта на Query задолженности
    frDBDataSet1.DataSet:= QryDetailDebt;
    QryDetailDebt.DisableControls;
    //чтобы показать в отчете дату TVolgaPeriod
    frVariables['VolPer'] := DateToStr(VolgaPeriod1.StartDate); //Или даже просто Date
    frReport1.ShowReport;
    QryDetailDebt.EnableControls;
  

  
  В самом отчете создана категория CatVolPer, в ней переменная VolPer, ну все это нормально, через пробел и т.д. По крайней мере в дизайн-тайме эта переменная показывается списке, вставляется и пр. То-есть тут все путем.
• Solo

  March 2006 отредактировано 19:42

  И тишина...
• gpi

  March 2006 отредактировано 19:42

  Попробуйте frReport1.Dictionary.Variables := DateToStr(VolgaPeriod1.StartDate);
  или выбросьте из словаря данных отчёта VolPer и обращайтесь тогда через frVariables