¿Cómo hacer una ventana cuando el mouse está sobre el cuadro y la ventana se destruirá automáticamente cuando el mouse salga del cuadro?
Primero, mira la descripción del componente:
1. Crea una etiqueta transparente. Recuerde, primero cree una etiqueta transparente.
2. Luego crea un marco de imagen.
3. Ajuste el tamaño de la etiqueta transparente para que sea más grande que el marco de la imagen (20 de alto y 20 de ancho son suficientes).
4. Coloca el marco de fotos en el medio de la etiqueta transparente.
Descargo de responsabilidad: este código es sólo para darle ideas. Por favor, perdone las deficiencias.
Bien, el código es el siguiente:
Versión 2
Especificación de biblioteca de soporte
. La variable de ensamblaje salta, tipo lógico.
Subrutina_cuadro de imagen 1_movimiento de posición del mouse, tipo lógico
. Parámetro posición horizontal, tipo entero
. Posición vertical del parámetro entero
Estado de la tecla de función del parámetro, tipo entero
Rebote = verdadero
Comience a juzgar si se cumple el tiempo de enfoque (1000) p>
La subrutina comienza a determinar si se cumple el tiempo de enfoque.
Parámetro tiempo, tipo entero
. Variable local ci, tipo entero
. Contar el inicio del bucle (tiempo, ci)
Retraso (tiempo × ci)
Inicio del juicio (salto = verdadero)
Saltar del bucle ()
. Valor predeterminado
Fin de prueba
HandleEvent()
. Cola del ciclo de conteo()
Ventana 1. Visible = Verdadero
. Subrutina_ _Iniciar Ventana_Creada
Verificar que el mouse esté sobre el marco de la foto()
Cargar(Ventana1, false)
Subrutina_Transparent Etiqueta 1_Posición del mouse movimiento, tipo lógico
. Parámetro posición horizontal, tipo entero
. Posición vertical del parámetro entero
Estado de la tecla de función del parámetro, tipo entero
Ventana 1. visible=falso