Autor
|
Tema: Como funciona de la API Enumchildproc ?????? (Leído 5,774 veces)
|
olve
Desconectado
Mensajes: 55
|
Alguien puede orientarme de como funciona de la API Enumchildproc para vb 6.0
Saludos y Gracias.
|
|
|
En línea
|
|
|
|
seba123neo
|
Hola, que yo sepa esa api no existe la que existe se llama EnumChildWindows y la funcion que la implementa se llama EnumChildProc...bajate el api-guide ahi hay un ejempo simple y basico de como se usa..
saludos.
|
|
|
En línea
|
|
|
|
|
olve
Desconectado
Mensajes: 55
|
Gracias,
Alguna funcion de la cual pueda obtener el ID del objeto
|
|
|
En línea
|
|
|
|
LeandroA
|
Hola a que te referis con el ID del objecto, que es lo que queres hacer, si buscas el hwnd tambien tenes el api Findwindow y FindWindowEx.
cualquier cosa explica un poco mas detallado lo que andas buscando.
Saludos.-
|
|
|
En línea
|
|
|
|
Dessa
Desconectado
Mensajes: 624
|
Hola a que te referis con el ID del objecto, que es lo que queres hacer, si buscas el hwnd tambien tenes el api Findwindow y FindWindowEx.
cualquier cosa explica un poco mas detallado lo que andas buscando.
Saludos.-
Hola Leandro: Quiere modificar 4 texbox en una aplicación externa, sin ver como se progamó la ventana seria adivinar, hasta donde pude entender (Y para que evitar el WindowName) creo que lo mejor en su caso seria recorrer los controles con GetWindow (GW_CHILD y GW_HWNDNEXT) e ir enviando el SendMessage (WM_SETTEXT). Pero te repito sin ver como se programó la aplicación externa seria adivinar si conviene llegar con FindWindowEx o con GetWindow Hola, que yo sepa esa api no existe la que existe se llama EnumChildWindows y la funcion que la implementa se llama EnumChildProc...bajate el api-guide ahi hay un ejempo simple y basico de como se usa..
Seba, el error fue mio. Alguien puede orientarme de como funciona de la API Enumchildproc para vb 6.0 Saludos y Gracias.
http://foro.elhacker.net/programacion_vb/listar_nombre_de_ventana_de_los_procesos_no_lo_consigo-t248082.0.html;msg1195299;topicseen#msg1195299
|
|
« Última modificación: 12 Octubre 2009, 13:59 pm por Dessa »
|
En línea
|
Adrian Desanti
|
|
|
olve
Desconectado
Mensajes: 55
|
alguien q me oriente com funciona FindWindowLike
SALUDOA
|
|
|
En línea
|
|
|
|
BlackZeroX
Wiki
Desconectado
Mensajes: 3.158
I'Love...!¡.
|
alguien q me oriente com funciona FindWindowLike
SALUDOA
Esta pagina te orientara mas de lo nesesario, y si no entiendes nada de ingles usa un traductor como por ejemplo el de google: http://allapi.mentalis.org/apilist/igual esta: http://support.microsoft.com/kb/147659y por si fuera porco aun que sea revisa la MSDN de la pagina de microsoft
|
|
« Última modificación: 13 Octubre 2009, 04:10 am por ░▒▓BlackZeroҖ▓▒░ »
|
En línea
|
The Dark Shadow is my passion.
|
|
|
olve
Desconectado
Mensajes: 55
|
Hola, Dessa me marca un error al ejecutar este ejemplo espero me puedan apoyar http://support.microsoft.com/kb/113475/eseste es el error "No se ha encontrado el archivo: User" Gracias, saludos
|
|
|
En línea
|
|
|
|
Dessa
Desconectado
Mensajes: 624
|
olve, crea un proyecto nuevo con este code (solo con un button) , debes cambiar "Alberto Olvera" por el titulo de la aplicacion externa y decime si se modifica algun textbox de ella . Option Explicit
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal Msg As Long, wParam As Any, lParam As Any) As Long Private Const WM_SETTEXT = &HC Private Const WM_GETTEXT = &HD
Private Sub Command1_Click()
Dim Hwndl As Long Dim hwT1 As Long Dim hwT2 As Long Dim hwT3 As Long Dim hwT4 As Long
Hwndl = FindWindow(vbNullString, "Alberto Olvera") hwT1 = FindWindowEx(Hwndl, 0, "ThunderRT6TextBox", vbNullString)
Call SendMessage(hwT1, WM_SETTEXT, 0, ByVal "Mensaje1")
End Sub
|
|
« Última modificación: 13 Octubre 2009, 12:23 pm por Dessa »
|
En línea
|
Adrian Desanti
|
|
|
|
|