show outline by script

EarlyBird

Hi,
is it possible to show outline by script in a report?
i have tried this:

procedure OnStartReport(Sender: TfrxComponent);
begin
  report.PreviewOptions.OutlineExpand := True;    
  report.PreviewOptions.OutlineVisible := True;
end;

procedure Page1OnBeforePrint(Sender: TfrxComponent);
begin
  report.PreviewOptions.OutlineExpand := True;    
  report.PreviewOptions.OutlineVisible := True;  
end;

but it didn't work

gordk

do it from outside, set the preview options after loading the report and before calling showreport.