[Nyctos Kasignete]

Или же так... =)

Код:

type
  TStaticArray = array[0..255] of Byte;
  PStaticArray = ^TStaticArray;
var
  StaticArray: PStaticArray;
begin
  New(StaticArray);
  StaticArray^[25] := 25;
  StaticArray^[255] := 255;
  ShowMessage(IntToStr(StaticArray^[25] + StaticArray^[30] + StaticArray^[255]));
  Dispose(StaticArray);
end;