Ayuda con esta aplicacion que no logro acabarla

Iniciado por B@RTY, 19 Abril 2006, 23:01 PM

0 Miembros y 1 Visitante están viendo este tema.

B@RTY

hola a todos no es la primera vez que escribo pidiendo ayuda para este programa, el caso es que en una ocasion abandone el proyecto pero ahora me arrepiento :-\ y quiero terminarlo de una vez por todas.

Primero describire mi programa ya que es un poco raro.
Lo que pretendo que haga mi programa esque envie una secuencia de teclas cuando algo determinado pase en la pantalla.
La idea es poner el raton en un sitio de la pantalla y si lo que hay debajo del puntero camvia de color,entonces se activan las teclas.

Vale espero que se entienda 

Por ahora e conseguido activar las teclas con el comando sendkeys pero no se como hacer para que el programa detecte si lo que hay debajo del puntero cambia de color.
Me dijeron de hacerlo con la api getpixel (o algo asi) el problema es que no es un color normal lo que hay debajo del raton sino una textura.
aqui les dejo una imagen de la textura.
http://img119.imageshack.us/my.php?image=imagen9vu.jpg
El enviar las teclas se a de producir simplemente cuando la textura camvie de color da igual a cual simplemente cuando cambie.

wno espero a verme explicado con claredad.
gracias por adelantado

salu2.....

yalosabes

uhmmm lo veo algo complikado, o weno la verdad rekontra-complikado, podrias hacer una secuencia de imagenes y compararlas con un timer, claro dependiendo , para que aplikacion kieras usarlo, lo veo algo imposible ya que los matices siempre kambian, kisiera que des una nocion mas amplia, nos vemos

B@RTY

ok lo intento.
Simplemente tengo una ventana con la textura que e posteado anteriormente.
esta textura pertenece a un programa
entonces si camvia de color necesito que se envie la secuencia de teclas.
yo planteaba la opcion de comparar los pixeles que hay debajo del puntero pero si no se puede pues no se a alguien se le ocurre otra manera de comparar?.
para aclararlo mejor os pongo las imagenes:

esta es como esta la pantalla normal.
http://img122.imageshack.us/my.php?image=antes5zb.png

y cuando se ponga asi se deveran enviar las teclas.
http://img122.imageshack.us/my.php?image=despues0li.png


espero a verme explicado un poquito mejor ^^"

salu2


yalosabes

sorry no puedo ayudarte, demasiado level para mi, uhmmm kisas  seas mejor o kisas no listar los procesos y si la ventana esta activa entonces mandar una secuencia de teclas.

Ironhorse

Este código captura el color del pixel en que esta posicionado el cursor:


Private Declare Function GetCursorPos Lib "user32" (lpPoint As PointAPI) As Long
Private Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function GetPixel Lib "gdi32" (ByVal hDC As Long, ByVal X As Long, ByVal Y As Long) As Long

Private Type PointAPI
        X As Long
        Y As Long
End Type

Private Sub timer1_Timer()
Dim DeskTopWindow As Long
Dim CurPos As PointAPI, ScreenPixel As Long
  Call GetCursorPos(CurPos)
  ScreenPixel = GetPixel(GetDC(0), CurPos.X, CurPos.Y)
  Label1 = ScreenPixel
End Sub



Lo guardas en una variable y lo vas comparando si cambia...

Saludos
Pégense una vuelta por Cracton :)

B@RTY

muchas gracias por el codigo funciona muy bien pero el problema esta en que las teclas se me activan todo el rato ya que al ser una textura y no un color normal el pixel que hay debajo del raton siempre es diferente y eso hace activar las teclas

noob_Setup

para el tibia debes estar adelante del monitor, ahora ya tengo tu char, cuando te vea te mato por afk. jeje