Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > Lazarus, FreePascal, Kylix, etc.
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #18  
Antiguo 14-05-2018
Avatar de danielmj
danielmj danielmj is offline
Miembro
 
Registrado: jun 2011
Posts: 383
Poder: 13
danielmj Va por buen camino
Hola bucanero, estoy mirando tu codigo y hay un par de cosas que no consigo "llevar" a mis intereses, es decir, que no consigo implementarlo.

Cita:
if not Combinacion1.load([1, 5, 8, 13, 33]) then begin
Se le pasa una combinación dada, pero cuando entre los corchetes como valor pongo "1, 45, 33, 14, 20, 22" salta el msg diciendo que la combinacion no es valida. Entonces mi duda es, teniendo en cuenta que esa combinación estaría formada por los numeros mas repetidos entre 50.000 combinaciones aleatorias (por ejemplo) y que sería comparada con cada una de esas combinaciones ¿por que da error?
Tu codigo hace 2 cosas, primero genera una serie de aleatorios y luego lo compara con una combinacion dada, pero lo que intento es por ejemplo generar x numero de combinaciones repetidas y metidas en un listview, de ella extraigo los numeros mas repetidos y sobre esa unica combinacion, hago las comparaciones. Pero no puedo por que en el momento en que "combinaicon.load es distitno, el programa se detiene.
__________________
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
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
sumando valores de un listview danielmj Varios 28 14-11-2014 21:52:30
VALORES FANTASMAS FIREBIRD 2.1 valores Grandes ASAPLTDA Firebird e Interbase 17 02-12-2012 12:09:02
Rellenar con 0.... buitrago Varios 6 17-11-2011 20:02:53
¿Cómo insertar una imágen en un lisbox o un memo? Acuarius3000 Gráficos 3 27-06-2005 08:44:53
arastrar archivos a un lisbox gulder C++ Builder 3 05-05-2005 13:31:50


La franja horaria es GMT +2. Ahora son las 07:05:41.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi