Ver Mensaje Individual
  #35  
Antiguo 07-04-2018
Avatar de danielmj
danielmj danielmj is offline
Miembro
 
Registrado: jun 2011
Posts: 383
Reputación: 13
danielmj Va por buen camino
Buenos dias, he probado lo que dices tsk y me encuentro con que la unidad UTAlea encargada de generar números aleatorios, repite los números cosa que antes de implementarla para lazarus no hacía. Adjunto dos unidades (en delphi y en lazarus) para que veas, veais las diferencias que son mínimas.
Mientras la versión para delphi lo hace perfectamente, incluir la linea
Código:
FillByte(Lista^,1+10*SizeOf(Boolean),0);
hace que los números salgan repetidos.

Delphi
Lazarus

Al subir uno de los archivos al servidor ftp no me di cuenta y lo subí sin asignar una carpeta adecuada, se subió a la raiz. Que algún administrador lo borre. Sorry.

Captura de repetición de númeos aleatorios

Un saludo.
__________________
La juventud pasa, la inmadurez se supera, la ignorancia se cura con la educación, y la embriaguez con la sobriedad, pero la estupidez dura para siempre. Aristofanes.
Responder Con Cita