Ini-Datei-Äquivalent mit Kommentarfunktion - Klasse wie realisieren?

[SneakyBagels]

Ich möchte in Zukunft gerne ein Dateiformat erstellen, welches einer Ini-Datei ähnelt mit dem Unterschied, dass man Kommentare hinzufügen kann.
Das Format selber ist kein Problem auszudenken.

Aber wie würde man das ganze Konstrukt dann auslesen? Am besten wäre natürlich eine eigene Klasse aber wie geht man so etwas am besten an?

Erste Überlegungen gingen Richtung TStringList und Find aber ich denke das ist wenig performant!

Code:

#comment line
[testsection]
testident=testvalue

[Der schöne Günther]

Das Semikolon ist eigentlich der de-Facto-Standard für Kommentare in ini-Dateien

Code:

[abschnitt]
;Die Zeile drunter wird nicht geparsed
;thisIsNotParsed=42
thisIsParsed=99

(https://stackoverflow.com/q/1378219/2298252)

[SneakyBagels]

Ok nehmen wir das Semikolon. Was für eine Klasse könnte man für dieses Beispiel hier verwenden?

Code:

;comment line
[testsection]
testident=testvalue

Meine Idee bisher (leider gibt showmessage sl.text eine AV + der Destruktor wird nicht aufgerufen)

Delphi-Quellcode:

unit classIniTest;

interface

uses
 System.SysUtils, System.IniFiles, System.Classes, Dialogs;

type
 TIniTest = class

 private
  Fsl: TStringList;
 public
  constructor Create(const aFileName: string); overload;
  constructor Create(const aFileName: string; Encoding: TEncoding); overload;
  destructor Destroy; override;

  property sl: TStringList read Fsl write Fsl;
 end;

implementation

constructor TIniTest.Create(const aFileName: string);
begin
 TIniTest.Create(aFileName, TEncoding.Default);
end;

constructor TIniTest.Create(const aFileName: string; Encoding: TEncoding);
begin
 sl := TStringList.Create;
 sl.LoadFromFile(aFileName, Encoding);
end;

destructor TIniTest.Destroy;
begin
 sl.Free;

 inherited Destroy;
end;

end.


var
 Test: TIniTest;
begin
 Test := TIniTest.Create('TestDatei.txt');
 try
  ShowMessage(Test.sl.Text);
 finally
  Test.Free;
 end;

[sakura]

Willst Du die Kommentare in deinem Programm einfügen? Dann versuche TStringList. Geht es nur darum, dass Kommentare erlaubt sind (von Hand eingefügt), dann nimm TIniFile, die Klasse kann damit gut umgehen.

...:cat:...

[SneakyBagels]

Zitat:

die Klasse kann damit gut umgehen.

Naja eigentlich geht es mir darum eine eigene Klasse für all das zu schreiben, ich davon aber keine Ahnung habe wie man oben sieht.

Zitat:

Willst Du die Kommentare in deinem Programm einfügen?

Ich weiß´nicht was du meinst. Ich möchte einfach nur eine eigene Klasse machen, die wie eine TIniFile-Klasse anwendbar ist, aber mit erlaubten Kommentaren in der "ini"-Datei.

Zitat:

, dann nimm TIniFile, die Klasse kann damit gut umgehen.

Ich dachte immer das Ini-Format akzeptiert keine Kommentarzeilen?

[TiGü]

Zitat:

Zitat von SneakyBagels (Beitrag 1376112)

Ich weiß´nicht was du meinst. Ich möchte einfach nur eine eigene Klasse machen, die wie eine TIniFile-Klasse anwendbar ist, aber mit erlaubten Kommentaren in der "ini"-Datei.

Die TIniFile-Klasse kann von Haus aus mit den Semikolon-Kommentaren umgeben. Du musst also das Rad nicht neu erfinden.

[SneakyBagels]

---
moment bitte muss was ändern/testen

Zitat:

;comment line
[testsection]
;not=parsed
testident=testvalue ;test

Delphi-Quellcode:

var
 Test: TMemIniFile;
begin
 Test := TMemIniFile.Create('TestDatei.txt');
 try
  ShowMessage(Test.ReadString('testsection', 'testident', ''));
 finally
  Test.Free;
 end;

Ok das funktioniert. ;test bleibt erhalten und wegen ;not=parsed gibt es keine Probleme. Ein ReadSections ignoriert ;not=parsed ebenfalls und ;comment line wird auch ignoriert. Also alles OK.

[p80286]

Falls der unwahrscheinliche Fall auftreten sollte, daß sich in ferner Zukunft jemand hierfür interessieren könnte, wäre es nett von Dir, wenn Du Deine Lösung Deines Problems hier noch einmal explizit beschreiben würdest.

Gruß
K-H

[SneakyBagels]

Das ist ja das Schöne: ich mache nichts weiter als TIniFile/TMemIniFile zu nutzen :thumb:
Meine Interposer-Klasse nutze ich für andere Zwecke aber an den Create/Read-Funktionen habe ich nichts geändert.

[himitsu]

"reine" Kommentare kann man mit der TIniFile und der Windows-INI-API nicht erstellen (sind sie aber in der Datei drin, dann bleiben sie erhalten)

Delphi-Quellcode:

;comment line

geht eben nur über TStringList oder Sonstwas, bzw. bei TMemIniFile über die internen StringListen.

"auskommentierte" Wertpaare lassen sich aber behandeln.
Ganz einfach das Semikolon mit in den Valuenamen.

Delphi-Quellcode:

INI.WriteString('testsection', ';not', 'parsed')

Also praktisch gibt es keine Kommentare in INIs,
einmal ignoriert die API alles Unbekannte,
bzw. das Zeichen gehört mit zum Namen (geht aber nur bei Key=Value Paaren)

Aber in der Realität hat sich bei Vielen durchgesetzt, dass ein ; für einen Kommentar steht, womit man das schon als "Quasi-Standard" ansehen könnte,
aber es wären auch andere Zeichen möglich (im ASCII gibt es noch ein paar freie Zeichen und ich hab auch schon # als Kommentar gesehn)