Hitungan array Delphi

var
  ArrayLength: Integer;
begin
  ArrayLength := Length(ArrayOfSomething);
  ...
end;
Prickly Polecat