Home End User
New Blog Posts: Merging Reports - Part 1 and Part 2

End user design it-Other App launchs it

edited January 2005 in End User
Hi

I'd like to know if there is some way to create a Report within an End User
Explorer app and print it within another different app which can provide the
AutoSearch criteria.

RB 7.2 Pro.

Thanks in advance

Eduardo Martinez

Comments

  • edited January 2005
    Hi Eduardo,

    ---------------------------------------------------------------
    Tech Tip: How to Programmatically Load Reports that were Saved
    using the Report Explorer
    ---------------------------------------------------------------

    1. The ReportExplorer has a run-time interface you can use to load
    reports using the ReportExplorer.LoadReport method. You can use this
    method without actually 'showing' the report explorer form. (See the
    online help topic for TppReportExplorer.)

    2. If you want use Report.Template.LoadFromDatabase, RB will locate the
    report stored in the database table based upon the NameField value only.
    However, for the rb_item table you really need Folder_Id, Name to locate
    a record uniquely.

    To override this default behavior, you can assign an event-handler to
    the Report.Template.OnLocateRecord event.

    example:

    TmyForm = class(TForm)
    private
    function ReportLocateRecordEvent(Sender: TObject; const
    aReportName: String): Boolean;

    end;

    procedure TmyForm.FormCreate(Sender, TObject);
    begin
    {assign the event handler}
    FReport.Template.OnLocateRecord := ReportLocateRecordEvent;

    end;


    function TmyForm.ReportLocateRecordEvent(Sender: TObject; const
    aReportName: String): Boolean;
    begin
    {add logic here to locate the record and return True if it is found}

    Result := myLocateReportFunction(FFolderid, aReportname);

    end;

    --
    Regards,

    Nico Cizik
    Digital Metaphors
    http://www.digital-metaphors.com

    Best Regards,

    Nico Cizik
    Digital Metaphors
    http://www.digital-metaphors.com
  • edited January 2005
    Thanks again, superb pruduct and superb support

    Eduardo Mtz


This discussion has been closed.