изменение свойств страницы отчета

Комментарии

• Fokewolf Киев

  April 2006 отредактировано 01:24

  А почему бы тебе не использовать вместо cross-tab вертикальный бэнд? Как по мне, с ним работать удобнее. И непоместившиеся графы будут переноситься на другую страницу.
• gpi

  April 2006 отредактировано 01:24

  В программе:

  frxReport1.Script.Variables['NeedRotate']:=False;
    frxReport1.PrepareReport;
    if frxReport1.Script.Variables['NeedRotate'] then
      begin
        TfrxReportPage(frxReport1.FindObject('Page1')).Orientation:=poLandscape;
        frxReport1.ShowReport();
      end
    else
      frxReport1.ShowPreparedReport;
  

  В скрипте:

  procedure Cross1OnPrintCell(Memo: TfrxMemoView; RowIndex, ColumnIndex, CellIndex: Integer; RowValues, ColumnValues, Value: Variant);
  begin
       if (not NeedRotate) and (ColumnIndex>9) then NeedRotate:=True;
  end;
  

  Если печатается итоговый столбец, то ColumnIndex>10
  Хотел сделать отчёт двухпроходным. На первом проходе определять необходимость поворота страницы, а на втором в главной процедуре отчёта менять ориентацию страницы. Не получается - NeedRotate всегда False.
  Надеюсь, разработчики прояснят ситуацию
• natasha

  April 2006 отредактировано 01:24

  Добрый день! Спасибо за ответ ,попробовала ваш вариант но при компиляции выдает ошибку Undeclared identifier 'poLandscape'? Почему не понятно может нужно в uses что-то еще прописать?
  
• Lex

  April 2006 отредактировано 01:24

  uses
  Printers;
• natasha

  April 2006 отредактировано 01:24

  Спасибо уже сама нашла !