Видимость вертикальных бэндов

отредактировано 09:48 Раздел: FastReport 4.0
Приветствую,
Имею на листе два бэнда - горизонтальный и вертикальный. Каждый привязан к своему датасету, данные пихаю через onGetValue.
Для того чтобы спрятать некоторые ненужные строки и столбцы написал такой код:
procedure Memo16OnBeforePrint(Sender: TfrxComponent);
begin
  If (<HideEmpty>=True) and (<SumKol>=0) Then MasterData1.Visible:=False
   Else MasterData1.Visible:=True;                                     
end;

procedure Memo5OnBeforePrint(Sender: TfrxComponent);
begin
   If (<AgentActual>=True) Then MasterData2.Visible:=True                
    Else MasterData2.Visible:=False;                               
end;

Проблема в том, что строки прячуться нормально, а вот столбцы вообще не показываются(и нужные и ненужные).
Вот. :)

Комментарии

  • gpigpi
    отредактировано 09:48
    Перенесите код в обработчики бендов
    Если добавить такой код в обработчик вертикального бенда в примере Old-style cross-tab
    procedure MasterData2OnBeforePrint(Sender: TfrxComponent);
    begin
          if (cell>8) and ((cell mod 9) =0) then 
         begin
           Memo1.Visible:=False;
           Memo3.Visible:=False;           
           MasterData2.Width:=0;
         end
         else
         begin
           Memo1.Visible:=True;
           Memo3.Visible:=True;         
           MasterData2.Width:=45.35;
         end;  
    end;
    
    то десятый столбец не будет выводиться
  • отредактировано 09:48
    Спасибо, заработало.

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.