Delphi XE6, 3D-Array von Datensätzen mit boolean Mitglied Feldern bauen nicht

Question

Einfaches Beispiel:

type 
    TGm = record 
    Rm,Nc,Sc,Wc,Ec,Su,Sd:boolean; 
    end; 

var 
    Dm: Array[1..20] of Array[1..20] of Array[1..20] of TGm; 
    Gm: TGm; 

... 

if (Dm(z,y-1,x).Ec) then Gm.Wc := TRUE; 

Wenn ich versuche, zu bauen, dass letzte Zeile markiert und zwei Fehler angezeigt:

'$1' does not contain a member named 'Ec' 
Type of expression must be BOOLEAN 

Fehle ich etwas ganz einfach hier?

Und, ja, ich bin Erzeugen eines Dungeon ;-)

Answer 1

Sie verwenden Klammern, wo Klammern sind erforderlich. Es sollte wie diese Stelle aussehen:

if Dm[z][y-1][x].Ec then Gm.Wc := TRUE; 

Ich würde vorschlagen, eine einzige mehrdimensionale Array statt:

var 
    Dm: Array[1..20, 1..20, 1..20] of TGm; 
    Gm: TGm; 

... 

    if Dm[z,y-1,x].Ec then Gm.Wc := TRUE;