Search Results for

    Show / Hide Table of Contents

    Criação de objetos no script

    É possível adicionar objetos novos a um relatório usando um script. Vamos demonstrar como isso é feito através de um exemplo simples. Crie um relatório em branco e insira este código no procedimento principal do script:

    PascalScript:

    var
      Band: TfrxReportTitle;
      Memo: TfrxMemoView;
    begin
      Band := TfrxReportTitle.Create(Page1);
      Band.Height := 20;
      Memo := TfrxMemoView.Create(Band);
      Memo.SetBounds(10, 0, 100, 20);
      Memo.Text := 'Este memorando foi criado por código';
    end.
    

    C++ Script:

    TfrxReportTitle Band;
    TfrxMemoView Memo;
    {
      Band = TfrxReportTitle.Create(Page1);
      Band.Height = 20;
      Memo = TfrxMemoView.Create(Band);
      Memo.SetBounds(10, 0, 100, 20);
      Memo.Text = "Este memorando foi criado por código";
    }
    

    Visualize o relatório:

    Observe que não destruímos os objetos FastReport que criamos neste exemplo. Isso não é necessário, já que objetos do FastReport são destruídos automaticamente pelo aplicativo Delphi após concluir o relatório. Também observe que quando criamos objetos Delphi padrão em um script (como TStringLists), também precisamos destruí-los no script, já que isso não é feito automaticamente pelo aplicativo.

    Back to top © 1998-2022 Copyright Fast Reports Inc.