Also, ich versteh nicht, wieso man das mit einer
CSV-Komponente machen soll.
Das vorliegende Format ist das einer 'INI'-Datei. Man kann eine entsprechnde Komponente verwenden (TIniFile, TMemIniFile), wenn man Zugriff auf die einzelnen Segmente '[blabla]' haben möchte. Wenn nicht, reicht auch eine Stringlist.
Für die Trennung der per ';' getrennten Daten würde ich auf die Eigenschaften 'DelimiterChar' und DelimitedText der TStringlist zurückgreifen.
Einlesen der Datei geht so:
Delphi-Quellcode:
Var
Datei : TStringlist;
Begin
Datei := TStringlist.Create;
Datei.LoadFromFile('DeinDateiname');
...
Suchen geht so:
Delphi-Quellcode:
Procedure SucheNamenBeginnendMit (Datei : TStringlist; NamensTeil : String);
Var
i : Integer;
Begin
For i:=0 to Datei.Count - 1 do
If Pos (NamensTeil, Datei[i])<>0 Then
// Zeile gefunden
End;
Und unterteilen der durch Semikolon getrennten Teile so:
Delphi-Quellcode:
Procedure ExtrahiereDaten (Datei : TStringList; aZeile : Integer; DatenEinerZeile : TStringlist);
Begin
DatenEinerZeile.DelimiterChar := ';';
DatenEinerZeile.DelimitedText := Date.Values[aZeile]
// Anschließend kann auf die Teile durch DatenEinerZeile[i] zugegriffen werden
End;
Da wird kein
CSV benötigt.