 Autor
|
Tema: No logro encontrar handle a SysListView32 de taskmanager (Leído 5,223 veces)
|
x64core
 Desconectado
Mensajes: 1.908
|
Estoy chequeando que el Tab Control es 1 (procesos)
el de Aplicaciones por ejemplo sería 0 (cero)
If SendMessage(HwTab, &H1300 + 11, 0, 0) = 0 Then
Private Const TCM_FIRST = &H1300
Private Const TCM_GETCURSEL = (TCM_FIRST + 11)
gracias  yo lo unico que no entendi muy bien fue la ultima parte: HwTab = FindWindowEx(HwndTask, 0, "SysTabControl32", vbNullString)
If SendMessage(HwTab, &H1300 + 11, 0, 0) = 1 Then
HwLv = FindWindowEx(HwndTask, 0, "#32770", vbNullString)
HwLv = FindWindowEx(HwLv, 0, "SyslistView32", vbNullString)
End If todo lo anterior y todas las demas funciones las entendi bien solo esta parte porq yo utilizaba esto: HwLv = FindWindowEx(HwndTask, 0, "#32770", vbNullString)
HwLv = FindWindowEx(HwLv, 0, "SyslistView32", vbNullString) por eso no entiendo bien que hace esto: HwTab = FindWindowEx(HwndTask, 0, "SysTabControl32", vbNullString)
If SendMessage(HwTab, &H1300 + 11, 0, 0) = 1 Then
|
|
|
|
|
En línea
|
|
|
|
Hasseds
Desconectado
Mensajes: 145
|
por eso no entiendo bien que hace esto: HwTab = FindWindowEx(HwndTask, 0, "SysTabControl32", vbNullString)
If SendMessage(HwTab, &H1300 + 11, 0, 0) = 1 Then Estoy chequeando que el Tab Control es 1 (procesos)
el de Aplicaciones por ejemplo sería 0 (cero)
If SendMessage(HwTab, &H1300 + 11, 0, 0) = 0 Then
Private Const TCM_FIRST = &H1300
Private Const TCM_GETCURSEL = (TCM_FIRST + 11)
' Este es el Hwnd del TabControl (Pestañas de Aplicaciones, Procesos, rendimiento, Funciuones de Red, Usuarios) HwTab = FindWindowEx(HwTask, 0, "SysTabControl32", vbNullString)Y aquí chequeas que la Pestaña activa del TabControl sea igual a uno (la de procesos, que es la que contiene el SyslistView32 que te interesa,) If SendMessage(HwTab, &H1300 + 11, 0, 0) = 1 Thenhttp://msdn.microsoft.com/en-us/library/bb760583(v=vs.85).aspxAclaracion: seria mas facil usar FindWindow en lugar de la Function HwndTask Dim HwTask As Long Dim HwChild As Long Dim HwTab As Long Dim HwLv As Long HwTask = FindWindow("#32770", vbNullString) ' FindWindow en lugar de la Function HwndTask If HwTask <> 0 Then HwTab = FindWindowEx(HwTask, 0, "SysTabControl32", vbNullString) If SendMessage(HwTab, &H1300 + 11, 0, 0) = 1 Then HwChild = FindWindowEx(HwTask, 0, "#32770", vbNullString) HwLv = FindWindowEx(HwChild, 0, "SyslistView32", vbNullString) End If End If
Pero como hay mas ventanas en el sistema con la misma Disposición, (Por ejemplo Propiededes de Pantalla en XP), esto podría prestarse a errores y darte una mala información. Por eso en este caso es preferible usar la la Function HwndTask. http://foro.elhacker.net/programacion_visual_basic/no_logro_encontrar_handle_a_syslistview32_de_taskmanager-t332950.0.html;msg1636759#msg1636759
|
|
|
|
« Última modificación: 9 Julio 2011, 18:45 pm por Hasseds »
|
En línea
|
Sergio Desanti
|
|
|
|
|
|
|
|
| Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
|
duda con mi app dentro del TaskManager
Programación Visual Basic
|
Anteros
|
0
|
881
|
10 Marzo 2007, 14:36 pm
por Anteros
|
|
|
|
ayuda con comandos de msdos y taskmanager
Programación Visual Basic
|
Proxy Lainux
|
3
|
3,677
|
31 Mayo 2008, 00:12 am
por Ch3ck
|
|
|
|
Como desactivar los tooltips de los SysListView32??
Programación Visual Basic
|
<[(x)]>
|
2
|
1,960
|
10 Julio 2009, 23:17 pm
por <[(x)]>
|
|
|
|
Ayuda, no logro encontrar el nombre de administrador.
Nivel Web
|
Kaosk.
|
2
|
2,994
|
19 Agosto 2010, 09:54 am
por Kaosk.
|
|
|
|
problema para encontrar el handle de una ventana
.NET (C#, VB.NET, ASP)
|
CH4ØZ
|
3
|
3,382
|
10 Septiembre 2010, 02:08 am
por CH4ØZ
|
 |
