Příklady

Top  Previous  Next

InvokeRmReport

 

 

Pokud je skript uložen ve složce "Examples" pod jménem "InvokeReport" vyvolá report po kliknutí na tlačítko sám sebe.

 

Skript

procedure Click(Sender : TObject);

begin

  InvokeRmReport('Examples','InvokeReport');

end;

  

procedure OnPrepareScript(Sender : TReportProperty);

begin

  TButton(Sheet.GetCellProperty('B2').CellComponent).OnClick:=@Click;                                                        

end;

 

begin

 

end.