Beratung und Hilfe Daten in Array seichern und auslesen

[mkinzler]

Hier würde sich die Stringliste anbieten. Bzw. 2 deine Für die Zeilen und eine für die Spalten der Zeile (Trenner

Delphi-Quellcode:

var
  sl1, sl2: TStrings;
  i, j: integer;
  ...
begin
  try
    sl1 := TStringList.Create;
    sl2 := TStringList.Create;
    sl2.Delimiter := ';';
    for i := Low( Array1) to High (Array1) do
      sl2.add( Array1[i]);
    sl1.add( sl2.DelimitedText);
    for j = Low( Array2) to High( Array2) do
    begin
      sl2.text := '';
      for i := Low( Array2[j]) to High (Array2[j]) do
          sl2.add( Array2[j][i]);
      sl1.add( sl2.DelimitedText);
    end;
    sl1.SaveToFile( <Dateiname>);
  finally
     sl2.Free;
     sl1.Free;
  end;
end;

Der Code ist stark vereinfacht und einfach so hingetippt. Es wird davon ausgegangen, dass im Array Strings sind. Ggf müsste der Inhalt nach String gewandelt werden