Create event in Delphi

lucas_doni

How do I create an event for example BeforePrint a band of fast report in delphi 10 seattle ?

gpi

If you have FR Standart, Professional, Enterpise with script support - use

frxReport.LoadFromFile('reportfolder\test.fr3');
with frxReport do begin
frxreport.ScriptText.Clear; //clear script text
frxreport.ScriptText.Add('procedure MasterDataOnBeforePrint(Sender: TfrxComponent);');
frxreport.ScriptText.Add('Begin');
frxreport.ScriptText.Add('Memotest.Color := $00FF0000;');
frxreport.ScriptText.Add('end;');
frxreport.ScriptText.Add('Begin');
frxreport.ScriptText.Add('masterData.OnbeforePrint :='+''''+'MasterDataOnBeforePrint'+''''+';');
frxreport.ScriptText.Add('end.');
frxReport.ShowReport;
end;