At the moment of the impression I need to eliminate the lines blank of the Rich1.
I tried to use the following code, but it did not function because in the Rich1 it does not have the property Lines.
procedure Rich1OnBeforePrint(Sender: TfrxComponent);
begin
 var
 cont: Integer;
begin
 cont:= 0; Â
 while (cont <= Rich1.Lines.Count  - 1)  do
  if ( Trim(Rich1.Lines[cont]) = '' ) then
   Rich1.Lines.Delete(cont)
  else
   Inc(cont);
end;
Comments
What are you trying to exclude, lines from an original rtf file or lines produced by added fr variables?
At the moment of the impression I need to eliminate the lines blank of the Rich1.
I tried to use the following code, but it did not function because in the Rich1 it does not have the property Lines.
What I must make?
Tanks,
Marcos