Función Random ???

[Neftali [Germán.Estévez]]

Empezado por BlueSteel

...lo que me da lata es que puede demorarse mucho en recorrer la tabla, ya que los registros de la tabla temporal se van insertando según posición de llegada, por lo que tendre que verificar toda la tabla cada vez que salga un numero nuevo.... y debo generar un listado de 300 ganadores....??

Utiliza un TStringList en memoria ordenado. Las búsquedas son dicotómicas y casi inmediatas.
A medida que vayan saliendo buscas y añades los nuevos.

[*Caro*]

Empezado por Neftali

...un TStringList en memoria ordenado.....

Una pregunta Neftalí, esto significa que a parte de usar un TStringList y la función IndexOf, debemos también ordenarlo con Lista.Sorted := True, supongo que cada vez que se haya introducido un número a nuestra lista.

Saluditos

[Neftali [Germán.Estévez]]

Empezado por Caro

Una pregunta Neftalí, esto significa que a parte de usar un TStringList y la función IndexOf, debemos también ordenarlo con Lista.Sorted := True, supongo que cada vez que se haya introducido un número a nuestra lista.

Al crear el stringList lo creas con la propiedad Sorted a True.

Código Delphi [-]
  TS := TStringList.Create();
  TS.Sorted := True;
  TS.Duplicates := dupError;

En tu caso yo aseguraría que no hay duplicados, ya sea con dupError o dupIgnore (mejor el primero).

A partir de ahí puedes utilizar IndexOf o Find para encontrar el elemento que necesites. No necesitas reordenar maualmente cada vez.
Al estar ordenada e insertar elementos ya te los añadirá ordenados. Es un poco más lento al insertar/borrar, pero infinitamente más rápido al buscar.

[*Caro*]

Me ha quedado claro Neftali, muchas gracias por responderme.

Saluditos