tincho 02-09-2022, 14:38
Hola.
En el ejemplo de mas abajo hay una colección de recetas llamadas R1 y R2 pero imaginen que son miles.
Luego hay una lista String[] que en un loop va cambiando los integrantes y en cada pasada deseo saber si la lista "temporal" de ingredientes coincide con alguna "receta" de la colección, es decir si los ítemes de la lista String[] coinciden con los indices de la colección secundaria R1 R2 ... Rn.
Deseo saber si existe coincidencia 100% o un porcentaje, por ejemplo la receta del "pan" coincidiría con la receta de la pizza en algunos de sus ingredientes (las cantidades de momento no me interesan).
¿Cómo lo harían?
En el ejemplo de mas abajo hay una colección de recetas llamadas R1 y R2 pero imaginen que son miles.
Luego hay una lista String[] que en un loop va cambiando los integrantes y en cada pasada deseo saber si la lista "temporal" de ingredientes coincide con alguna "receta" de la colección, es decir si los ítemes de la lista String[] coinciden con los indices de la colección secundaria R1 R2 ... Rn.
Código:
cRecipes["R1"] = ["tomate": 400, "harina": 1000, "sal": 12, "levadura": 42, "agua": 400]
cRecipes["R2"] = ["harina": 5000, "sal": 12, "levadura": 42, "agua": 400]
aRecipes = ["tomate", "harina", "sal", "levadura", "agua"]
...
aRecipes = ["cebolla", "sal", "tomate", "aceite"]
...
aRecipes = ["ingrediente-1", "ingrediente-2", "ingrediente-n"]
Deseo saber si existe coincidencia 100% o un porcentaje, por ejemplo la receta del "pan" coincidiría con la receta de la pizza en algunos de sus ingredientes (las cantidades de momento no me interesan).
¿Cómo lo harían?
Shell 02-09-2022, 12:19
Buenas!.
Después de una respuesta de Shordi, que a el le gusta más TabPanel que TabStrip, estuve haciendo un ejemplo
con los dos controles y es que aunque son parecidos no funcionan igual y en algunas de sus propiedades difieren.
Por ejemplo:
- En TabStrip al usar la propiedad Count, le decimos cuantas pestañas queremos que contenga y ademas nos la puede mostrar al ejecutar.
- En TabPanel no las muestra directamente al ejecutar.
![[Imagen: hfl9EkC.png]](https://i.imgur.com/hfl9EkC.png)
- En TabStrip podemos usar para nombrar las pestaña, la propiedad Caption o Text
- En TabPanel solo podemos usar la propiedad Text.
En el caso de este ejemplo tuve que centrarme en la propiedad que ambos tienen. Text.
![[Imagen: j9Qwp6Y.png]](https://i.imgur.com/j9Qwp6Y.png)
Fijaros ademas como se queda el foco en ambos controles.
Más observaciones que podáis destacar.
Saludos
Después de una respuesta de Shordi, que a el le gusta más TabPanel que TabStrip, estuve haciendo un ejemplo
con los dos controles y es que aunque son parecidos no funcionan igual y en algunas de sus propiedades difieren.
Por ejemplo:
- En TabStrip al usar la propiedad Count, le decimos cuantas pestañas queremos que contenga y ademas nos la puede mostrar al ejecutar.
- En TabPanel no las muestra directamente al ejecutar.
Código:
Const NUMP As Integer = 5
Public Sub Form_Open()
TabPanel1.Count = NUMP
TabStrip1.Count = NUMP
'Rellenar(TabStrip1)
'Rellenar(TabPanel1)
End
Public Sub Rellenar(uncontrol As Object)
Dim n As Integer
For n = 0 To NUMP - 1
uncontrol[n].Text = n + 1
Next
End- En TabStrip podemos usar para nombrar las pestaña, la propiedad Caption o Text
- En TabPanel solo podemos usar la propiedad Text.
En el caso de este ejemplo tuve que centrarme en la propiedad que ambos tienen. Text.
Código:
Const NUMP As Integer = 5
Public Sub Form_Open()
TabPanel1.Count = NUMP
TabStrip1.Count = NUMP
Rellenar(TabStrip1)
Rellenar(TabPanel1)
End
Public Sub Rellenar(uncontrol As Object)
Dim n As Integer
For n = 0 To NUMP - 1
uncontrol[n].Text = n + 1
Next
EndFijaros ademas como se queda el foco en ambos controles.
Más observaciones que podáis destacar.
Saludos
Archivos adjuntos
tincho 02-09-2022, 10:43
Hola a todos.
Alguien podria decirme como ordenar una coleccion simple, donde el indice es un texto y el valor también.
Dejo un ejemplo con una coleccion similar, donde el indice es un año, y está ordenado de menor a mayor, luego el texto, que es lo que deseo ordenar de menor a mayor es un texto alfanumérico cualquiera.
Primer planteo de solucion
Pero la salida no contempla los caracteres diacríticos
...
1879: Uso de tarjetas perforadas para el senso
1938: Z1 - Computadora electromecánica
1941: Z3 - Primera máquina programable y completamente automática
1617: Ábaco neperiano
1854: Álgebra boleana
Alguien podria decirme como ordenar una coleccion simple, donde el indice es un texto y el valor también.
Dejo un ejemplo con una coleccion similar, donde el indice es un año, y está ordenado de menor a mayor, luego el texto, que es lo que deseo ordenar de menor a mayor es un texto alfanumérico cualquiera.
Primer planteo de solucion
Código:
Public Function CSort(c As Collection) As Collection
Dim aTmp As New String[]
Dim cTemp As New Collection
Dim sText As String
For Each sText In c
aTmp.Add(sText & "\t" & c.Key)
Next
aTmp.Sort(gb.Ascent)
For Each sText In aTmp
cTemp[Split(sText, "\t")[1]] = Split(sText, "\t")[0]
Next
Return cTemp
EndPero la salida no contempla los caracteres diacríticos
...
1879: Uso de tarjetas perforadas para el senso
1938: Z1 - Computadora electromecánica
1941: Z3 - Primera máquina programable y completamente automática
1617: Ábaco neperiano
1854: Álgebra boleana
Archivos adjuntos
Bienvenido, Invitado
Últimos temas
GauchoCAD vuelve a las pi...
Foro: Aplicaciones/Fragmentos de CódigoÚltimo mensaje por: tercoide, Hace 2 horas
Respuestas: 14 - Vistas: 12,706
Archivos .ods
Foro: GeneralÚltimo mensaje por: tincho, 01-07-2025, 18:54
Respuestas: 8 - Vistas: 300
Publicidad
Foro: Sobre gambas-es.orgÚltimo mensaje por: tincho, 01-07-2025, 18:48
Respuestas: 6 - Vistas: 360
Web con gambas, a ver si ...
Foro: WebApp/WebFormsÚltimo mensaje por: tincho, 01-07-2025, 17:47
Respuestas: 41 - Vistas: 32,705
Un sistema de ayudas cont...
Foro: VideotutorialesÚltimo mensaje por: guizans, 22-06-2025, 19:55
Respuestas: 3 - Vistas: 324