danke für die schnelle antwort.. es hat funktioniert
für alle die das selbe prob hatten..
bitteschön
Code:
var:=TStringList.Create;
var.Add('zufallsstring1');
var.Add('zufallsstring2');
var.Add('zufallsstring3');
Label9.Caption:=var[Random(3)];
var.Free;