Delimiter-Strigliste abarbeiten

[NoName1]

Guten Tag,
Ich habe eine Stringliste (ManungenSL) mit mehreren Zeilen. Die Stringliste hat als Trenner ein Semikolon
Beispiel:

Delphi-Quellcode:

      j := 0;
      ibqryZeigeForderungen.First;
      for i := 1 to grdZeigeForderungen.RowCount - 1 do
        begin
          if grdZeigeForderungen.GetCheckBoxState(1, i, pState) then
            begin
              if pState then
                begin
                  ibqryZeigeForderungen.MoveBy(i - 1 - j); // muss zuerst (MoveBy verschiebt den Datensatz)

                  pSLInput := ibqryZeigeForderungenFORDAUS.AsString + ';'
                    + ibqryZeigeForderungenFORDERUNGSTXT.AsString + ';'
                    + FloatToStrF(ibqryZeigeForderungenFORDERUNG.AsCurrency, ffCurrency, 8, 2) + ';'
                    + FloatToStrF(ibqryZeigeForderungenOFFEN.AsCurrency, ffCurrency, 8, 2);
                  MahnungenSL.Delimiter := ';';
                  MahnungenSL.DelimitedText := pSLInput;
                  MahnungenSL.StrictDelimiter := True;

                  j := i - 1; // muss zuletzt
                end;
            end;
        end;

Der Quellcode macht was er soll!!

Ich möchte nun die einzelnen Zeilen der Stringliste abarbeiten.
Meine Versuche scheiterten bisher kläglich.
for i := 0 to strigliste.Count - 1
Liest nur die Spalten der letzten Zeile.

Meine Fragen dazu:
Wie wird der Zeige auf die erste Zeile gestellt?
Ist evtl. eine Delimiter-Liste falsch und eine "Zusammenhänge Liste" besser
oder gar ein Record?


Vielen Dank im Voraus an die Tippgeber.