DSDfmParser

Delphi DFM解析器

通过修改对象及其属性来解析并保存Delphi DFM文件。

安装

只需在src -directory中包含文件DS.DfmParser.pas即可。

 uses DS.DfmParser;

用法

 var
  DfmFile: TDfmFile;
  PanelObject: TDfmObject;
  PanelCaption: String;
  DfmText: String;
begin
  DfmFile := TDfmFile.Create;

  // Load file
  DfmFile.LoadFromFile( ' MyDfmFile.dfm ' );

  // Get object (visual element)
  DfmObject := DfmFile.GetObject( ' Panel1 ' );

  Writeln(DfmObject. Name ); // Panel1
  Writeln(DfmObject.ClassName_); // TPanel

  // Get properties
  PanelCaption := PanelObject.GetProperty( ' Caption ' );
  Writeln(PanelCaption); // 'Panel1'

  // Set property
  PanelObject.SetProperty( ' Caption ' , ' '' MyPanel '' ' )

  // Delete property
  PanelObject.DeleteProperty( ' Caption ' );

  // Save file
  DfmFile.Save( ' MyModifiedDfmFile.dfm ' );

  // or get the context as string
  DfmText := DfmFile.GetDfm;
  Writeln(DfmText); // object Form1: TForm1...

  DfmFile.Free;
end ;

笔记

属性值

解析器仅解析DFM，但不是满足。例如，字符串的格式是如何在Delphi（ 'Caption1' ）中写入它。

值也可以是多行。 Delphi通常会缩进价值线，但是如果不这样做，那就不应该有所作为。将表格保存在Delphi中后，它应该自动固定压力。

例子

可以在example -Directory中找到一个示例项目。