Hallo Thomas,
versuch es mal so
Delphi-Quellcode:
type
Mehrdimarray = array[0..3] of array[0..3] of array[0..3] of byte;
.
.
.
function TForm1.sieg (k : mehrdimarray):byte;
.
.
.
var
f : MehrDimArray;
begin
sieg (f);
.
.
.
Nicht getestet, sollte aber so gehen
Klaus