Autor
|
Tema: Enlace en vb (Leído 3,526 veces)
|
Wdeah
Desconectado
Mensajes: 76
|
hola, antes que nada perdon por lo que voy a preguntar, pero soy nuevo en esto :S lo que quiero hacer es como si fuera un <a href=""... en html osea, un label que diga algo, y al pasar el mouse por encima se subraye el contenido y aparezca la "manito" como puntero.. y al hacer click valla hacia una url, lo de la url ya lo pude hacer, pero que se subraye y aparezca la manito no encima busque todos los iconos que hay en la propiedad MouseIcon y no aparecio la manito.. saludos
|
|
|
En línea
|
|
|
|
Ironhorse
Desconectado
Mensajes: 150
|
En la propiedad MousePointer selecciona 'Custom' y en la propiedad MouseIcon carga el icono que quieras.
Saludos
|
|
|
En línea
|
Pégense una vuelta por Cracton
|
|
|
Wdeah
Desconectado
Mensajes: 76
|
si, eso se como hacerlo, pero lo que yo quiero es que el pasar sobre el label, el cursor sea el predefinido por el usuario para ese tipo de evento.. me explico??
|
|
|
En línea
|
|
|
|
Vitrox
Desconectado
Mensajes: 190
|
estoy intentando entenderte, pero noo... si te explicaras,como se dijo en el post anterior, esa forma te diria yo, pero parece que quieres ir mas lejor, explicate mejo... salu2
|
|
|
En línea
|
El Conocimiento es poder, el poder es Superioridad
|
|
|
dPix
Desconectado
Mensajes: 222
¬_¬ - ¬O.o
|
Hola, espero que esto te sirva (adjunto el cursor): Private Sub Form_Load() 'Tan solo tienes que cargar harrow.cur en MouseIcon de las propiedades 'del label. End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.MousePointer = 0 Label1.FontUnderline = False End Sub
Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.FontUnderline = True Label1.MousePointer = 99 End Sub Pincha aquí para descargar el cursor.
|
|
« Última modificación: 17 Febrero 2006, 01:19 am por dPix »
|
En línea
|
|
|
|
Vitrox
Desconectado
Mensajes: 190
|
dPix, claro!, ese código es el que busca el chaboncito creador del tema, orale, tu si que sabes de VB ! salu2
|
|
|
En línea
|
El Conocimiento es poder, el poder es Superioridad
|
|
|
dPix
Desconectado
Mensajes: 222
¬_¬ - ¬O.o
|
Vitrox, gracias! Me ha supuesto 30 segundos de programación, jajaja, espero que al menos sea eso lo que busca, ya nos contará el mismo!
Salu2,
dPix
|
|
|
En línea
|
|
|
|
Wdeah
Desconectado
Mensajes: 76
|
sisisis pero como hago para que cuando el mouse sale fuera del label salga el subrayado? no encontre la el atributo mouseover, intente con mouseup y down pero no funco
|
|
|
En línea
|
|
|
|
Ironhorse
Desconectado
Mensajes: 150
|
No hay un evento para cuando el cursor 'sale' del control, lo que puedes hacer es 'mirar' si está sobre otro objeto, por eso te postearon este codigo: Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.MousePointer = 0 Label1.FontUnderline = False End Sub
|
|
|
En línea
|
Pégense una vuelta por Cracton
|
|
|
|
|
Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
enlace
Materiales y equipos
|
elzar
|
3
|
3,273
|
26 Marzo 2011, 20:00 pm
por c0d3rSh3ll
|
|
|
Ocultar enlace con php y descargar
PHP
|
erikcatala
|
7
|
7,111
|
5 Febrero 2014, 23:08 pm
por MeTaD
|
|
|
¿Qué es este enlace de bustler.net?
Análisis y Diseño de Malware
|
1mpuls0
|
5
|
6,480
|
15 Febrero 2014, 18:32 pm
por x64core
|
|
|
Me enviaron un enlace por FaceB que aparentemente era un enlace de Googlre Drive
Dudas Generales
|
cxrlos
|
2
|
4,219
|
18 Junio 2016, 03:54 am
por Br1ant
|
|
|
Compartir enlace temporalm
Foro Libre
|
huerto123
|
3
|
2,102
|
6 Enero 2017, 09:25 am
por huerto123
|
|