Escoger una palabra de una lista aleatoriamente

[DarkByte]

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
StringList:TStrings;
UnaString:String;
begin
StringList := TStrings.Create;
try
StringList.Add('hola');
StringList.Add('Pepe');
StringList.Add('jeje');
StringList.Add('jojo');
finally
Assert(Random(StringList.Count) in [0..StringList.Count - 1]);
end;
end;

¿?, no se como obtener el número aleatorio.