DSDfmParser

Delphi DFM Parser

Parse dan simpan file DFM Delphi dengan memodifikasi objek dan propertinya.

Instalasi

Cukup sertakan file DS.DfmParser.pas dari src -directory.

 uses DS.DfmParser;

Penggunaan

 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 ;

Catatan

Nilai properti

Parser hanya mem -parsing DFM tetapi tidak puas. String misalnya diformat seperti bagaimana seseorang akan menulisnya di Delphi ( 'Caption1' ).

Nilai juga bisa multiline. Delphi umumnya mengindir garis nilai, tetapi seharusnya tidak membuat perbedaan jika tidak. Setelah menyimpan formulir di Delphi, ia harus secara otomatis memperbaiki indensi.

Contoh

Contoh proyek dapat ditemukan dalam example -direktori.