Ich würde die Bundesländer und ihre Hauptstädte in einem Record speichern (dafür eine Klasse zu bauen, halte ich für übertrieben). Etwa so (ungetestet, da kein Delphi zur Hand):
Delphi-Quellcode:
type TLand = record
Name,
Hauptstadt: string;
end;
var Laender: array[0..15] of TLand; //nur als Beispiel, ein privates Feld des Formulars wäre besser
...
procedure InitLaender;
begin
Laender[0].Name := 'Bayern';
Laender[0].Hauptstadt := 'München';
Laender[1].Name := 'Schleswig-Holstein';
Laender[1].Hauptstadt := 'Kiel';
...
end;
...
procedure Antwort;
begin
ShowMessage(Laender[x].Hauptstadt; //x ist der ermittelte Zufallswert
end;
//Edit: Rächtschraipfeeler berrichticht