Definiowanie tablicy o rozmiarze okreslonym zmienną

0

Czy da się zdefiniować tablicę (ale nie dynamiczną) o rozmiarze określonym zmienną? Np czy jest możliwa procedura:

procedure NowaTablica(count:Integer);
type
Ttab=array[0..count] of Integer;
var
tab:TTab;
begin
tab[1] coś tam
end;

Wiem count powinno być stałą, ale czy da to się jakoś obejść?

0

Nie da się tego zrobić. A co masz przeciwko tablicom dynamicznym, przecież możesz ją potem potraktowac jako zwykłą.

0

No właśnie nic nie mam przeciwko, tylko nie zawsze dynamiczną da się potraktować jak zwykłą i dlatego chcę ją zamienić na zwykłą. Metoda rozpaczliwa to napisać:

procedure tab1;
type
Ttab=array[0..0] of Integer;
..........................

procedure tab2;
type
Ttab=array[0..1] of Integer;
..........................

itd.....

case count of
1:tab1;
2:tab2;
......
end;

ale jak jest duże count to wariactwo!!!
Moze jednak jest sposób?

0

Hmm - no nic tylko tablice dynamiczną...

type 
  TTab: array of Integer;

var
  Tab: TTab;
  n: Integer; // wielkość tablicy !

begin
...
n := 5;
SetLength(Tab, n); // ustalenie wielkości
end;

1 użytkowników online, w tym zalogowanych: 0, gości: 1