Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - Calcu

Páginas: [1]
1
Visual Basic 6 / Re:ucImage y ángulo
« en: Junio 05, 2024, 12:18:48 pm »
Bueno... parece que usando la propiedad ucImage1.ScaleMode = eScale, y NO redimensionando el control ni antes ni despues, lo hace correcto, me apaño xD

Gracias!

2
Visual Basic 6 / ucImage y ángulo
« en: Junio 05, 2024, 08:54:48 am »
Buenas a todos, estoy experimentando con el ucimage y me encuentro un problema (creo que tonto, pero no se solucionarlo)

Tengo una imagen rectangular :

ucimage1.pictureheight = 3120
ucimage1.picturewidth = 4160

he montado un botón para rotar la imagen, porque a veces sale horizontal y la quiero vertical:

Código: [Seleccionar]
If ucImage1.Angle = 270 Then
        ucImage1.Angle = 0
    Else
        ucImage1.Angle = ucImage1.Angle + 90
    End If

Y efectivamente gira la imagen, pero la corta, no vuelve a hacer la escala para que cuando la pongo en vertical, se haga "mas pequeña" y así se vea entera.

Podeis guiarme un poco ?

gracias!


3
Visual Basic 6 / Re:Problema con el control ucAutocomplete
« en: Marzo 16, 2024, 07:31:15 pm »
último post, prometido :-)

Cambiar en cargarArray:
Código: [Seleccionar]
If Left(sTList, Len(sText)) = sText Then
por esto:

Código: [Seleccionar]
If sTList Like "*" & sText & "*" Then
y en WndProc comentar esto:

Código: [Seleccionar]
' SendMessage m_hEdit, WM_SETTEXT, 0&, mArray(0)
' SendMessage m_hEdit, EM_SETSEL, Len(sText), Len(mArray(0))

Para que no pinte el resultado en el textbox.


Gracias de nuevo a todos  :P :P

4
Visual Basic 6 / Re:Problema con el control ucAutocomplete
« en: Marzo 16, 2024, 07:13:00 pm »
Perdon por el monólogo :-)

Sería muy complicado hacer que en vez de buscar por orden de escritura, buscara por "contiene" ?

Por ejemplo, si tengo un valor buscado de "Pontevedra", que al escribir "ev"  también mostrara esta posibilidad ?

Esto si que ya se me escapa a mis conocimientos, de ahí mi consulta / petición.

Muchas gracias de nuevo!

5
Visual Basic 6 / Re:Problema con el control ucAutocomplete
« en: Marzo 16, 2024, 06:50:34 pm »
Arreglado!  (para quien le pueda interesar)

No puedo usar el valor del campo recordset directamente.... necesito un objeto...

en vez de:
Código: [Seleccionar]
Do While Not rz.EOF
    ucAutoComplete1.List.Add rz!nombre
    rz.MoveNext
Loop

Hay que usar:

Código: [Seleccionar]
Dim xnombre As String

Do While Not rz.EOF
    xnombre = rz!nombre
    ucAutoComplete1.List.Add xnombre
    rz.MoveNext
Loop


Gracias !

6
Visual Basic 6 / Problema con el control ucAutocomplete
« en: Marzo 16, 2024, 04:22:11 pm »
Muy buenas a todos.
Acabo de bajarme este control para probarlo, pero tengo un problema... en el ejemplo funciona bien, pero cuando lo quiero poner en mi programa, no consigue funcionar.

Trabajo con un formulario MDI, y el  problema está en que al llegar a "CargarArray" tengo este error:



m_List.count me devuelve 4 (los 4 valores que he cargado de prueba), pero m_List(i) ya no funciona ¿?

porque justo la linea de arriba marca los 4 en el m_list.count y la siguiente tiene ese error ?  por mas que le doy vueltas, no encuentro la razon
Alguna idea?
Gracias!


Edito:

parando cada vez que hago un:    ucauto1.List.Add rz!nombre

veo que si he añadido 3 nombres (Luis, Pedro, Juan), veo que list(1) = juan, list(2) = juan y list(3) = juan.

Cual puede ser la razon para que List en vez de añadir uno (como en el ejemplo del zip original), se repita ¿?


Efectivamente:

Código: [Seleccionar]
?m_List.Count
 3
?m_List(1)
PEDRO
?m_List(2)
PEDRO
?m_List(3)
PEDRO

Y  he cargado 3 totalmente diferentes, está repitiendo el último en todos...

Es algo de la colección ?

7
Visual Basic 6 / Re:ucTabMdi
« en: Junio 14, 2023, 01:02:11 pm »
Buenas de nuevo.

Es posible saber cual es la ficha activa?  (el índice me refiero), por mucho que busco no veo una propiedad ya montada.

8
Visual Basic 6 / Re:Utilizar una fuente (.ttf) contenida en un .RES en vb6
« en: Marzo 17, 2023, 04:47:16 am »
Listo!

No hay que hacer nada más que llamar al recurso con LoadResourceFont "BC39", sin asignarlo a ninguna variable ni nada, y automáticamente la fuente queda disponible en el sistema para su uso, llamándola por su nombre completo, claro.

Gracias !

9
Visual Basic 6 / Re:Utilizar una fuente (.ttf) contenida en un .RES en vb6
« en: Marzo 16, 2023, 03:55:04 pm »
Buenas, se qué es un tema antiguo, pero el fichero del Dropbox ya no existe.

Alguien podría guiarme en el paso final?

He grabado la fuente en el archivo de recursos
Lo he grabado

La cargo con

Dim fuente as long
fuente = LoadResourceFont("bc39")   (la he llamado así en ttf1)

Pero cobein dice que hay que saber el nombre de la fuente, así que antes de:

label1.font = fuente

Tengo que cambiar eso por el nombre, pero no doy con la tecla.

Una ayudita?

Muchas gracias!

10
Visual Basic 6 / Re:ucTabMdi
« en: Febrero 27, 2023, 04:04:33 pm »
Muchas gracias, por intentarlo, que no quede :-)

Intentaré aver si soy capaz de hacer algo.

Gracias!

11
Visual Basic 6 / Re:ucTabMdi
« en: Febrero 26, 2023, 09:27:52 am »
Buenas!

Gracias por la respuesta.

La idea es que el control mdi con fichas, este:  http://leandroascierto.com/blog/mdi-con-fichas/  ,  que si no me equivoco, sí es de Leandro, lo actualice un poco visualmente.

El control funciona genial, pero sería perfecto poder hacer que las fichas fueran redondeadas, o añadirle colores personalizados por fichas, imagenes sin texto, o.. algo visualmente mas nuevo (actualizar el control, porque funcionar, funciona perfecto)

Pasar de esto:


a esto:



(por ejemplo).

12
Visual Basic 6 / ucTabMdi
« en: Febrero 19, 2023, 06:22:14 pm »
Muy buenas.

Me encanta ver que la comunidad Vb6 sigue activa :-), muchas gracias Leandro por todo tu código, me ha servido muuuuchas veces para muchos proyectos.

Mi consulta es:

Podrias adaptar el control: http://leandroascierto.com/blog/newtab-control-de-pestanas-para-vb6/

Al funcional (pero anticuado) http://leandroascierto.com/blog/mdi-con-fichas/  ?

Estaría genial tener esas fichas con aspecto mas moderno en el control de los formularios MDI.

MUCHISIMAS gracias por todo.

Páginas: [1]