Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 2 de 2
Ir a la página Anterior  1, 2
 
Chooser No Acepta Mas De 62 Argumentos :(
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Re: Chooser No Acepta Mas De 62 Argumentos :( 
 
v3ctor:

Citar:

interesante lo pruebo, también estoy manejando esta posibilidad que no he probado porque me faltan unas diez colecciones (los datos) por terminar.


Más o menos para la creación de las colecciones, la estructura que tienes que averiguar si no me equivoco es:

[(Génesis 1:1)]

[(Libro Capitulo:Versículo)]

Puede que te interese más una clase. Las expresiones regulares suelen ser complejas pero podrían ayudarte bastante.

Saludos
 




===================
Gambas Básico
"No es un bug, es una característica no documentada"
 
última edición por Shell el Sabado, 18 Agosto 2018, 01:44; editado 1 vez 
Shell - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Chooser No Acepta Mas De 62 Argumentos :( 
 
al final pude simplificar asi:

Public Allcolecciones As Collection[] = [cGenesis, cExodo, cLevitico,
  cNumeros, cDeuteronomio, cJosue, cJueces, cRut, c1Samuel, c2Samuel,
  c1Reyes, c2Reyes, c1Cronicas, c2Cronicas, cEsdras, cNehemias, cEster,
  cJob, cSalmos, cProverbios, cEclesiastes, cCantares, cIsaias, cJeremias,
  cLamentaciones, cEzequiel, cDaniel, cOseas, cJoel, cAmos, cAbdias,
  cJonas, cMiqueas, cNahum, cHabacuc, cSofonias, cHageo, cZacarias,
  cMalaquias, cMateo, cMarcos, cLucas, cJuan, cHechos, cRomanos,
  c1Corintios, c2Corintios, cGalatas, cEfesios, cFilipenses, cColosenses,
  c1Tesalonicenses, c2Tesalonicenses, c1Timoteo, c2Timoteo, cTito,
  cFilemon, cHebreos, cSantiago, c1Pedro, c2Pedro, c1Juan, c2Juan, c3Juan,
  cJudas, cApocalipsis]

Public Function MaxVers(libro As Byte, capitulo As Byte) As Byte
  
  Return ExtraerMaxVers(ObtenerColeccion(libro), capitulo)
  
End

Public Function ObtenerColeccion(libro As Byte) As Collection
  
  Dim cVacia As New Collection
  Dim xColeccion As Collection
  Dim contador As Byte = 1
  
  For Each xColeccion In Allcolecciones
    If libro = contador Then Return xColeccion
    Inc contador
  Next
  
  Return cVacia
  
End

 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Chooser No Acepta Mas De 62 Argumentos :( 
 
v3ctor:

Entonces al final no usaste Chooser por lo que se ve.
Reducir has reducido bastante.

Lógicamente el que conoce la aplicación es su programador.  
 




===================
Gambas Básico
"No es un bug, es una característica no documentada"
 
última edición por Shell el Viernes, 07 Septiembre 2018, 14:51; editado 1 vez 
Shell - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
Ocultar¡Este tema fue útil?

 

Elegir valoración:                       

Media de valoración Valoración mínima Valoración máxima Número de valoraciones
0.00 0 0 0
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Bucle Until Y Los Argumentos Posicionales Shell Shell Scripting 4 Viernes, 06 Marzo 2015, 10:48 Ver último mensaje
Shell
No hay nuevos mensajes Un Campo Sql Varchar(32) Que Acepta Mas De... v3ctor Bases de Datos 1 Martes, 27 Diciembre 2016, 00:00 Ver último mensaje
tincho
No hay nuevos mensajes Argumentos Al Programa Desde El IDE gatoviejo General 3 Viernes, 28 Julio 2017, 18:13 Ver último mensaje
v3ctor
No hay nuevos mensajes Gambas3: SerialPort1.Speed No Acepta Confi... AlfredoSC Controles/Librerías/Componentes 6 Domingo, 09 Febrero 2020, 20:55 Ver último mensaje
jguardon
 

Publicar nuevo tema  Responder al tema  Página 2 de 2
Ir a la página Anterior  1, 2

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 0 invitados
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
No puede descargar archivos
No puede publicar eventos en el calendario