Ver Mensaje Individual
  #1  
Antiguo 05-03-2007
teletranx teletranx is offline
Miembro
 
Registrado: feb 2004
Ubicación: Chile
Posts: 112
Reputación: 21
teletranx Va por buen camino
Cool Randomizando al Enemigo

Saludos

Mi problema es el siguiente:

Tengo una aplicación en VB.Net, la cual la estoy pasando a Delphi.

En una de sus partes utiliza Randomize y Rnd.
La cual genera una Semillas, para generar 5 números las cuales se sumas a cada cifra de una fecha juliana. Posteriormente genero más números, con los cuales se crea una cadena.
Ya que estoy pasando la aplicación por secciones y se esta utilizando, la parte que valida la cadena esta en VB.net
La cadena que genero en Delphi son distinta, aún que utilice la misma semilla.
Necesito sale como hacer para que lo que genero en Delphi sea lo mismo que en VB
Ejemplo semillas 29 en VB genera 29-19-30-33-21
en Delphi genera 32-13-29-16-31.

Funciones utilizadas

VB Delphi
Randomize Randomize
Randomize(<Semilla>) RandSeed := <Semilla>
Rnd(<Nro>) Random(<Nro>)

Muchas Gracias

JC

P.D. Se podrá Utilizar los API de Windows?

Última edición por teletranx fecha: 05-03-2007 a las 23:40:09.
Responder Con Cita