Accessing the variable ReportOptions.Description.Text

JQLJQL
edited August 2012 in FastReport 4.0
I've done a search but don't seem to be able to locate a topic for what I want to do, which is:

Read (silently) a folder containing a number of reports
Extract the "ReportOptions.Description.Text" information for each report and place it in a ListBox

So my question is: How do I read the variable "ReportOptions.Description.Text" (in Delphi)

Many thanks in advance

John

Comments

  • gpigpi
    edited 5:03AM 
    function GetInfoFR(const FileName: String): String;
var
Xml: TfsXMLDocument;
Root: TfsXMLItem;
Ext: String;
begin
  Result := '';
  Ext := Copy(FileName, Length(FileName) - 2, 3);
  if CompareText(Ext, 'fr3') = 0 then
  begin
    Xml := TfsXMLDocument.Create;
    try 
      Xml.LoadFromFile(FileName);
      Root := Xml.Root;
      Result := Root.Prop['ReportOptions.Description.Text'];
    finally
      Xml.Free;
    end;
  end;
end;
  • JQLJQL
    edited 5:03AM
    Thank you very much for the code.

    John

Leave a Comment


Home • FastReport 4.0Comment As ...

© Vanilla Keystone Theme 2025