CanShrink Option

Taylor N

Hello,

I am trying to shrink a field when no data exists. In my case I have several address fields. If my second and third address lines are blank I want the fields below to move up and not print blank lines.

I have found some references to a CanShrink property for the .Net version. Is there something similar for the VCL version?

End users are going to be customizing this report so I really don't want a lot of script to make this work.

So for my specific example I have
[Address Line 1]
[Address Line 2]
[Address Line 3]
[City]
[State][Zip]

If Address Line 2 and 3 are blank I don't want blank lines between Line 1 and the City field.

fcs

Hello,

You can put [Address Line 1] and [Address Line 2] and [Address Line 3] into one Memo and set the StretchMode = smMaxHeight.
The other way is use for [Address Line 2] and [Address Line 3] code like this (my Z_Uwagi = yours AddressLine2)

procedure Z_UwagiOnBeforePrint(Sender: TfrxComponent);
begin
 if trim(<Z_Uwagi>)='' then begin
   Z_Uwagi.Lines.clear;
   Z_Uwagi.height:=0;
   Z_Uwagi.Printable:=false;
  // Child2.Height:=0;  // set the height of band to 0 in your case AdressLine2 and 3 should be store on child bands  
 end else begin
   Z_Uwagi.Printable:=true;
   // Child2.Height:=0.5;
 end;'
end;

Regards
Michal