Hola este tema ya se hablo en el foro si buscas seguramente vas a encontrar la solución, así a la ligera puedo decirte que también esta el usercontrol de esta clase en el cual podes utilizar array, y también creo que el autor creo una clase especialmente para poder trabajar de forma dinámica.

Busca un poco que vas a encontrar tu solución.

Saludos

No creo que puedas usarlo con hotmail. saludos

Hola si,  funciona de 10 , yo lo porove con el WinHex y tampoco la muestra.

Saludos

si en realidad esta funcion devuelve un valor afirmativo ya que los borde de los formularios aplican los theme pero no en los controles.

Saludos

Hola Seba gracias por los link los estuve chequeando y las funciones solo devuelven si estan corriendo los theme en el systema pero lo que yo quiero saber es si en mi aplicacion estan corriendo los theme , lo unico que pude ver revisando la memoria es que si estan corriendo si o si esta dll esta cargada "Shlwapi.dll", pero bien puede que esta dll este cargada y no estar corriendo los theme en mi aplicacion.

if GetModuleHandle("Shlwapi.dll") then
     msgbox "probablemente si..."
else
    msgbox "Segurisimo que no"
end if

no encontre otra cosa que indique esto.

Muy bueno, como le estas dando masa a estos movimientos de memoria, una pregunta un poco fuera de este ejemplo, de esta forma se podra obtener si la aplicacion esta aplicando los temas de xp, UxTheme.dll, no encontre ninguna api que me informe de esto pero capas que mirando en la memoria del ejecutable se pueda¿?¿?

Saludos

Dios!!! y yo que me preocupaba por mi ortografía. 

Este tema es una tarea pendiente que tengo y algún día voy a concretar, pero haciendolo bien, no es cuestión de enviar toda la pantalla completa, sino sólo los fragmentos que fueron modificados.

Zaludos 

hola mirate alguna documentacion de como usar el api GetPixel y SetPixel

Private Declare Function GetPixel Lib "gdi32.dll" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long

Private Declare Function SetPixel Lib "gdi32.dll" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long) As Long

por lo menos para empezar te va a servir.

Saludos

hola fijate esto puede que te sirva.

Private Sub Command1_Click()
 
On Error Resume Next
 
With Label1
    .Caption = ""
    .AutoSize = True
    .LinkTopic = "IExplore|WWW_GetWindowInfo"
    .LinkItem = &HFFFFFFFF
 
    .LinkMode = 2
    .LinkRequest
End With
 
DoEvents
 
With Label2
    .Caption = ""
    .AutoSize = True
    .LinkTopic = "Firefox|WWW_GetWindowInfo"
    .LinkItem = &HFFFFFFFF
    .LinkMode = 2
    .LinkRequest
End With
 
 
 
End Sub

Saludos

Hola Lixkeu el tema quizas es si la pieza estara exactamente en la misma posición siempre, y que digamos la tuerca no gire, porque sino podrias utilizar regiones, y con GetRegionData podrias ir sacando una comparativa. o sino  obtener el array de bits de la imagen y hacer la comparativa con algun patron.

Saludos