Mehrdimensionales, dynamisches Array speichern

[himitsu]

Zitat von DeddyH:

Wenn das Array leer ist, bekommst Du Probleme beim Speichern, da Du in der ersten Dimension auf das erste Element zugreifst, ohne es auf Existenz zu prüfen. Beim Lesen hast Du das selbe Problem bei einer leeren Datei. Und statt

Zitat:

x := High(buchstabe) + 1;

würde ich eher
x := Length(buchstabe); schreiben.

Das macht eigentlich keinen unterschied, da es equivalent ist, denn die Funktion High ist so definiert

Delphi-Quellcode:

function High(const a: TMyArray): integer;
begin
  Result := Length(a) - 1;
end;

Bei statischen Arrays wird es ebenso im Compiler ausgerechnet und dann direkt verwendet.


Aber natürlichst speicherst/liest du immer nur den ersten Wert aller SubArrays (egal ob sie existieren oder nicht) und alle weiteren Daten der Subarrays werden ignoriert,
also für x = 1 bis Ende (buchstabe[i][x] )

[DeddyH]

Dass das bei dynamischen Arrays keinen Unterschied macht, weiß ich auch. Aber erstens ist das so verständlicher, da es ja um die Länge geht und zweitens sollte man sich das gleich richtig angewöhnen, sonst bekommt man bei statischen Arrays, die nicht 0-indiziert sind, später Probleme.

[Dunkelbunt27]

Zitat:

Aber erstens ist das so verständlicher, da es ja um die Länge geht und zweitens sollte man sich das gleich richtig angewöhnen, sonst bekommt man bei statischen Arrays, die nicht 0-indiziert sind, später Probleme.

Das ist ein guter Einwand, ich persönlich finde es so verständlicher.

Wo wir gerade beim Thema sind, könnte mir jemand mal diese Zeile erklären:

Zitat:

Datei.Read(buchstabe[i][0].Zeichen, y*SizeOf(TBuchstabe));

TBuchstabe ist ja ein Typ (Record aus Zeichen, Attribut) was liefert denn SizeOf(TBuchstabe) zurück?
X ist die Länge in beide dimensionen, oder wird automatisch nur die x Dimension genommen?
Y ist dann die Länge für die Y Dimension, wenn X=0, richtig?

Ich versteh nicht ganz wo die Attribute und Zeichen gespeichert werden.

FG Dunkelbunt

[Bummi]

Der Record wird als ganzes gespeichert, dies geht bei allen Recordstrukturen die nur aus Elementen einer "fixen Größe" bestehen als z.B. String[33] statt String beinhalten.
SizeOf liefert bei Deiner Definition 4 Byte bei der Definition

Delphi-Quellcode:

  TBuchstabe = packed record
                      Zeichen : char;
                      attribut : byte;
                    end;

3 Byte ....aehaem, ab 2009 da dort Char=2Byte