¿Cómo hacer una ventana que se cargue cuando el mouse está en el cuadro de imagen y se destruya automáticamente cuando el mouse salga del cuadro de imagen?

Primero, lea la descripción del componente:

1.1. Cree una etiqueta transparente. Recuerde, primero cree una etiqueta transparente.

2. Luego, cree un cuadro de imagen.

3. Cambie el tamaño de la etiqueta transparente a un poco más grande que el cuadro de imagen (alto 20 grande, ancho 20 lo suficientemente grande)

4. Coloque el cuadro de imagen en el medio del transparente label

Descargo de responsabilidad: este código es solo para darle ideas, perdóneme por cualquier defecto

Bueno, el código es el siguiente:

.Versión 2

Especificación de biblioteca de soporte

Salto de variables de ensamblaje, lógica

Subroutine_PictureBox1_MousePositionMoved, valor lógico

. Nivel de parámetro Posición, entero.

. Posición vertical del parámetro, número entero

Estado de la tecla de función del parámetro, número entero

Rebote = verdadero

Comience a determinar si se cumple el tiempo de enfoque (1000)<. /p>

. La subrutina "Inicio" determina si se cumple el tiempo de enfoque

. Tiempo del parámetro, número entero

. Variable local ci, número entero

. Primer bucle de conteo (tiempo, ci)

Retraso (tiempo × ci)

. Confirmar el inicio (saltar = verdadero)

Saltar del bucle ()

.Predeterminado

.Juzgar el final

Procesa el evento ()

. El bucle de conteo termina ()

Ventana 1.visible = true

.Subrutina __Iniciar ventana_Creada

>' Verifique si el mouse está ubicado Cuadro de imagen ()

Cargar (Ventana 1, , false)

Subrutina _TransparentLabel1_MousePositionMoved, tipo lógico

. posición, número entero

. Parámetros posición vertical, número entero

. Estado de la tecla de función del parámetro, tipo entero

Ventana1.visual = false.