| |||
Hola primero obten su classname y o el titulo de la ventana luego asi sacas su luego con FindWindow obtienes su hwnd y luego con ShowWindow le asignas la vista(en este caso 0 osea invisible) Este ejemplo es para el explore su class name es "ExploreWClass" Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Sub Command1_Click() Dim hwnd As Long hwnd = FindWindow("ExploreWClass", vbNullString) 'MsgBox hwnd ShowWindow hwnd, 0& End Sub Saludos |
| |||
Lo puedes hacer con el api setparent fijate este ejemplo tambien con el explorer Cita: Claro que de esta forma primero deve estar ejecutandose el explorer(la ventana)Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long Private Sub Form_Load() Dim hwnd As Long hwnd = FindWindow("ExploreWClass", vbNullString) SetParent hwnd, Me.hwnd ShowWindow hwnd, vbMaximizedFocus End Sub si no tuvieras que ejecuarlo y mediante su pid puedes y un par de apis mas puedes conseguir su hwnd |
| |||
Cita: Muchas Gracias por el ejemplo :) pero como obtengo el classname de la ultima aplicaccion o ventana k tuvo el foco antes de esta?
Iniciado por LeandroA Lo puedes hacer con el api setparent fijate este ejemplo tambien con el explorer Claro que de esta forma primero deve estar ejecutandose el explorer(la ventana) si no tuvieras que ejecuarlo y mediante su pid puedes y un par de apis mas puedes conseguir su hwnd |