Dynamically Pages in Delphi

Comments

• gpi

  May 2021

  Use

  var p, dest_page: TfrxReportPage;

  begin

  //there are Page1 and Page2 in the frxReport1

  p := TfrxReportPage.Create(frxReport1);

  frxReport1.Objects.Remove(p);

  dest_page := TfrxReportPage(frxReport1.FindObject('Page2'));

  frxReport1.Objects.Insert(frxReport1.Objects.IndexOf(dest_page), p);

  end;
• loupickard

  June 2021

  gpiMay 13, 2021

  Use

  var p, dest_page: TfrxReportPage;

  begin

  //there are Page1 and Page2 in the frxReport1

  p := TfrxReportPage.Create(frxReport1);

  frxReport1.Objects.Remove(p);

  dest_page := TfrxReportPage(frxReport1.FindObject('Page2'));

  frxReport1.Objects.Insert(frxReport1.Objects.IndexOf(dest_page), p);

  end;

  Thanks! This makes sense.
• hocinov

  August 2021

  hello

  why you are not playing on the visible property of the pages?

  var paga: TFrxpage;

  ......

  frxReport1.LoadFromFile('........fr3');

  if ..... then

  begin

  paga:= frxReport1.Pages[57] as TFrxpage;

         paga.Visible :=false;

  end;

  Thanks