Hallo Leute, ich habe ein zweidimensionales Array of Boolean und würde gerne ab und an den Zustand abspeichern um ihn später wieder laden zu können.
Delphi-Quellcode:
const
MinX = 0; // Index der linken Spalte im Array TMatrix
MaxX = 70; // Index der rechten Spalte im Array TMatrix
MinY = 0; // Index der obersten Zeile im Array TMatrix
MaxY = 46; // Index der untersten Zeile im Array TMatrix
type
TMatrix = array[MinX..MaxX, MinY..MaxY] of Boolean;
Ich habs bisher damit versucht aber er meckert rum, dass Boolean und array of Boolean inkompatibel sind
Delphi-Quellcode:
procedure TForm2.S1Click(Sender: TObject);
var StrList: TStrings;
x,y: integer;
begin
if SaveDialog1.Execute then begin
StrList := NIL;
try
StrList := TStringList.Create;
for x := MinX to MaxX do
for y := MinY to MaxY do
begin
StrList.Add(BoolToStr(UniversumsMatrix[x]));
StrList.Add(BoolToStr(UniversumsMatrix[y]));
end;
StrList.SaveToFile(SaveDialog1.FileName);
finally
StrList.Free;
end;
end;
end;
Habt ihr eine Idee wie ich das Array[x /y] trotzdem umwandeln kann in einen String?
