migrar aplicacion delplhi - lazarus

[danielmj]

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

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.

[Ñuño Martínez]

Veo que has cambiado "Maximo" por " 10*SizeOf(Boolean)" en algunos sitio. ¿Por qué razón? Aunque la verdad es que no sé si tiene que ver con que se repitan números.

[tsk]

Si debería ser Maximo*SizeOf(Boolean).

Aunque no creo que FillByte sea el que cause los números repetidos, ya que lo único que hace es poner los el arreglo a 0. Eso debe estar en otra parte del código. En un rato hago otras pruebas para descartar que se pudieran sobre escribir sectores de memoria que pudiera interferir, aunque no lo creo.