[ViNT]

Вот так компилится, но работу мидлета не проверял:

type
 objint=array[1..10,1..10,1..10] of integer;
var
 object:objint;
begin
  object[1,2,3]:=12;
end;