Pregunta: | 36669 - DETERMINAR FORMULARIO ACTIVO |
Autor: | Marta Ojeda |
como saber cuando una ventana (form) esta activo o inactiva. |
Respuesta: | OSCAR CABRERA |
HOLA MARTA ESPERO QUE TE SIRVA ESTE CODIGO, LO CONSEGUI EN LA PAGINA "members.tripod.com/VBEspaniol/".., manejando las api's de windows..
Declaración: Declare Function FlashWindow Lib "user32" Alias "FlashWindow" (ByVal hwnd As Long, ByVal bInvert As Long) As Long Descripción: La función FlashWindow devuelve un valor si la ventana que indica si la ventana está activada o desactivada, también cambiando el parametro bInvert podemos invertir su estado como para llamar la atención del usuario. Parámetros: ByVal hwnd As Long Aquí se indica la ventana. ByVal bInvert As Long Sirve para invertir el estado de la ventana, si colocamos 1 o True invierte el estado, 0 o False para dejarla como estaba. Valor de retorno: Si devuelve 0 está desactivada la ventana, 1 si está activada la ventana. Uso: Dim ValorRetorno As Long ValorRetorno = FlashWindow(Form1.hwnd, 1) 'Invierte el estado del Form1 'Para llamar la atención del usuario coloque este codigo dentro de un Timer, y la ventana parpadeara. OJALA QUE TE SIRVA...SUERTE... |