Свойство Visible - не только скрыть а и не оставлять место

Critical

Добрый день!

В коде отчета следующий текст:

procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
    if <DBOpportunity>  then     
       MasterData3.Visible :=True else 
       MasterData3.Visible := False;  
     
    if <DBOpportunity>  then     
       DBCrossOpportunity.Visible :=True else 
       DBCrossOpportunity.Visible := False;  
end;

  
procedure DBCrossOpportunityOnBeforePrint(Sender: TfrxComponent);
begin
                        
  if <DBOpportunity>  then     
    DBCrossOpportunity.Visible :=True else 
    DBCrossOpportunity.Visible := False;

  if <DBOpportunity>  then     
    DBCrossOpportunity.Printable :=True else 
    DBCrossOpportunity.Printable := False;        
end;



procedure MasterData3OnBeforePrint(Sender: TfrxComponent);
begin

   if <DBTask>  then     
       MasterData3.Visible :=True else 
       MasterData3.Visible := False;  
        
end;

  
procedure DBCrossTaskOnBeforePrint(Sender: TfrxComponent);
begin
  if <DBTask>  then     
    DBCrossTask.Visible :=true else  
    DBCrossTask.Visible := false;
end;
  

begin

end.

(мастердата расположены соответственно - сначала 1, потом 3). Если нужно напечатать только вторую таблицу, то первая становится невидимой, но печатается - то есть под неё отводятся пустые листы. Как этого избежать?

Почему-то свойство DBCrossOpportunity.Printable := False; не помогает это исправить.

Stalker4

Critical написал: »

(мастердата расположены соответственно - сначала 1, потом 3). Если нужно напечатать только вторую таблицу, то первая становится невидимой, но печатается - то есть под неё отводятся пустые листы. Как этого избежать?

Почему-то свойство DBCrossOpportunity.Printable := False; не помогает это исправить.

Попробуйте еще дополнительно к Visible := False добавить для бендов и кроссов DataSet := nil;