Как считать параметры с Frf?

Комментарии

• Daedra

  December 2011 отредактировано 14:40

  Vika_Tig написал: »

  Выбирается шаблон, с него считываются параметры, которые затем отображаются на форме для редактирования значений параметров. Вопрос собственно в следующем: как программным путём считать с FRF параметры?

  
  Например, для описания печатной формы:
  
  function GetPrintFormDescription(FileName: String): String;
  var Report: TfrReport;
  begin
  Report := TfrReport.Create(nil);
  Report.LoadFromFile(FileName);
  Result := Report.ReportName;
  Report.Free
  end;
  
  procedure SetPrintFormDescription(FileName: String; Description: String);
  var Report: TfrReport;
  begin
  Report := TfrReport.Create(nil);
  Report.LoadFromFile(FileName);
  Report.ReportName := Description;
  Report.SaveToFile(FileName);
  Report.Free
  end;