Hi All,
See the below code. When the preview window showed first set scale to 200%, close the preview, preview showed second time and scaled to 200%. Why? How to reset the preview to the original state? (Not just the scale, but everything.)
procedure TForm1.Button1Click(Sender: TObject);
procedure Proc_Report;
var
Report:TfrReport;
begin
Report:=TfrReport.Create(Self);
Report.Clear;
Report.PrintToDefault:=True;
Report.Pages.Add;
Report.ShowReport;
Report.Free;
end;
begin
Proc_Report;
Proc_Report;
end;
Gabor