tag:blogger.com,1999:blog-31013332.post8656437260002953270..comments2023-09-28T13:42:06.002+02:00Comments on Delphi al Límite: Generando números aleatoriosAdministradorhttp://www.blogger.com/profile/13785297087531327840noreply@blogger.comBlogger3125tag:blogger.com,1999:blog-31013332.post-30993225035136778072013-05-31T09:43:31.792+02:002013-05-31T09:43:31.792+02:00Esto se me ha olvidado meterlo. Es una función que...Esto se me ha olvidado meterlo. Es una función que completa un número alfanumérico con ceros por la izquierda:<br /><br />function CompletarCodigo(const sCodigo: string; const iDigitos: Integer): string;<br />begin<br /> Result := StringOfChar('0', iDigitos - Length(sCodigo)) + sCodigo;<br />end;<br /><br />Disculpas.Administradorhttps://www.blogger.com/profile/13785297087531327840noreply@blogger.comtag:blogger.com,1999:blog-31013332.post-26458574904003785412013-05-30T22:18:09.626+02:002013-05-30T22:18:09.626+02:00Tengo una duda, donde esta la funcion CompletarCod...Tengo una duda, donde esta la funcion CompletarCodigo??? no la veo en ninguna parte?Jose Romanhttps://www.blogger.com/profile/13070759234868245112noreply@blogger.comtag:blogger.com,1999:blog-31013332.post-63068883832100702112013-05-09T15:26:51.958+02:002013-05-09T15:26:51.958+02:00Y como se haría para repetir los numeros aleatorio...Y como se haría para repetir los numeros aleatorios por ejemplo 100.000.000 de veces y cuando acabe que devuelva los 6 numeros que mas se repiten en esos 100.000.000 de operaciones aleatorias? Yo lo estoy haciando volcando los numeros en un listBox pero cuando llega a un numero determinado, el componente rebosa por no admitir tantos elementos.danielmjhttps://www.blogger.com/profile/03325064993779695889noreply@blogger.com