Visual Basic Foro
Programación => Visual Basic 6 => Mensaje iniciado por: Bazooka en Junio 18, 2011, 12:09:48 am
-
Puedo resolverlo con una variable que tome un valor o el nombre del control en cuestion pero quisiera saber si hay alguna funcion nativa que indique sin un control tiene el foco .
Gracias
Mike
-
Private Declare Function GetFocus Lib "user32" () As Long
Private Function IsFocused(ByRef objSrc As Object) As Boolean
On Local Error Resume Next ' handler si el objeto no tiene hwnd
IsFocused = (GetFocus = objSrc.hWnd)
End Function
llamalo con IsFocused (txtPrueba)
-
Buenisimo COCO!! recapo... Gracias !!!