[NLObP]

Попробуй создать массив и вызывать его по типу этого:
var
ItemsBase: array[0..79,0..9] of integer

procedure InventoryCreate(array1 : array of integer);
begin
end;

begin
InventoryCreate(ItemsBase);
end.