3 Dimensionale Array of Word Speichern Und Laden?

[Hallo_Thomas]

Wie kann ich diese Array Speichern bzw Laden?
Mein Gedanke,ich weis recht unelegant, in 27 2Dimensionale Tabellen Speichern

Delphi-Quellcode:

type
  TIntArray3=Array of Array of Array of Word;
public
 Check      : TIntArray3;
end;

procedure TForm1.FormShow(Sender: TObject);
begin
  SetLength(Check,27,12,65535);
end;