array

var
  a : array[1..3] of string;
  i : integer;
begin
  a[1] := \'hund\';
  a[2] := \'kat\';
  a[3] := \'kanin\';

  for i := 1 to 3 do
    ShowMessage(a[i]);
end;

takker :)

I delphi findes der dog andre typer, som er noget mere dynamiske end array typen.

Det er sføli et spørgsmål om hvad der er nødvendigt, for man kan godt resize et array runtime, men feks TStrings typen har en Add() metode, som tilføjer en streng til \"arrayet\" uden at man selv skal håndtere resize\'ningen.

Hvis borrisholt ser dette spørgsmål, så klager han sikkert over du ikke har taget hest med i dit array ;)

Snowball

var
  a : array[1..3] of string;
  i : integer;
begin
  a[1] := \'hest\';
  a[2] := \'dims\';
  a[3] := \'prut\';

  for i := 1 to 3 do
    ShowMessage(a[i]);
end;


så skulle de fleste behov være dækket

:-)