Hilfe beim einem Quiz: beliebig viele variablen zur laufzeit

[Pseudemys Nelsoni]

habs mir durchgelesen.

ich habe hierzu 2 frage:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  benutzer: array of string;
begin
  SetLength(benutzer, 1);
end;

1.
wenn jemand in meinem quiz antwortet und diese antwort ist richtig, muss ich für jeden benutzer,
SetLength(benutzer, alterwert+1); neu aufrufen?

2.
wie bekomme ich raus wie gross mein array z.z ist? bzw wieviele strings darin sind?