Apagar Timer con GetPixelColor

[igustin]

Hola vengo programando hace bastante. Estoy en un proyecto y quiero apagar un timer cuando el pixel cambia de color negro a otro (ej: rojo). Lo que hice fue esto y supuestamente tendria que funcionar pero no anda.

El Timer1 esta encendido y quiero apagarlo.

Código [Seleccionar] Expandir

If GetPixelColor(100, 100) = RGB(255, 0, 0) Then 'Color Rojo
    Timer1.Enabled = False 
End If

Tambien probe con este codigo, por si era que el color era distinto en la pestaña:

Código [Seleccionar] Expandir

If PixelGetColor(100, 100) =  Not RGB(0, 0, 0) Then   'Color Negro
    Timer1.Enabled = False 
End If

Alguna solucion y/o idea?
Gracias

[MCKSys Argentina]

Hola!

Suponiendo que GetPixelColor(x, y) devuelve un valor de la misma forma que RGB(r, g, b), puedes probar con:

Código (vb) [Seleccionar] Expandir

Timer1.Enabled = GetPixelColor(100, 100) = RGB(255, 0, 0) 'Si es rojo ==> enabled, sino disabled

Saludos!

[igustin]

Listo gracias. Pueden cerrar.