Escoger una palabra de una lista aleatoriamente

[DarkByte]

Saludos, ruego su ayuda una vez más.

¿Cómo puedo escoger una palabra (bueno, una string) aleatoriamente de una lista de strings?. Me parece que no necesita el caso más explicacion... debe ser algo sencillo... pero no lo he encontrado en los foros.

Gracias, simplemente, por leerme.

[Paoti]

Hola buen dia!!!!!



mirate en la ayuda la funcion Random();


esta te gebera un numero al azar entre 0 y 1, ese valor lo multiplicas por el valor maximo de la lista de string, y devuelves la parte entera y listo, el valor obtenido sera un numero aleatorio de una elemnto de tu lista.


nota. debes usar la palabara randomize antes....




espero te sirva!



Saludos a todos

[roman]

Empezado por Paoti

esta te gebera un numero al azar entre 0 y 1, ese valor lo multiplicas por el valor maximo de la lista de string, y devuelves la parte entera

De hecho Random puede recibir un argumento entero en cuyo caso regresara un número entero entre 0 y argumento - 1:

Código Delphi [-]
Assert(Random(StringList.Count) in [0..StringList.Count - 1]);

// Saludos

[Paoti]

voila, lo habia olvidado!!!!




esta mas sencillo!!!



nos vemos

[DarkByte]

Gracias a ambos, probaré y si puedo os contesto antes del viernes (no me dejan "enchufarme" entre semana).

[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.

[__cadetill]

prueba con

Código Delphi [-]
var
  MyRandom: integer;
begin
  MyRandom := Random(StringList.Count - 1);