Delphi XE6, 3D массив записей с булевыми полями членов, не будет строить

Question

Простой пример:

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; 

Когда я пытаюсь построить, что последняя строка будет отмечена и две ошибки показаны:

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

Я пропустил что-то жизненно простое здесь?

И, да, я генерация темницу ;-)

Answer 1

Вы используете круглые скобки, где требуются скобки. Он должен выглядеть следующим образом, вместо:

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

Я хотел бы предложить использовать единый многомерный массив вместо:

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

... 

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