Автоматическое управление мышью

[JIM88]

Помогите создать программу в delphi для управления мышью по алгоритму:
-даны два цвета а и в
-проверяем есть ли цвет а на экране
-если есть то мышь должна кликнуть по нему дважды левой кнопкой если цвет отсутствует то возвращаемся в начало
-задержка 5 мин
-проверяем есть ли на экране цвет в
-если цвет присутствует то мышь должна кликнуть по нему дважды левой кнопкой если цвет отсутствует то возвращаемся в начало
-задержка 1 мин
-возвращаемся в начало

Подскажите пожалуйста как это можно реализовать или подкиньте литературу а то весь интернет перешерстил ничего конкретного не нашел

[ArtGrek]

если цвет отсутствует то возвращаемся в начало

начало чего? мышь сама бегает по екрану и сканирует на наличие цвета?

[JIM88]

ну я так думаю в начало этой же программы которая будет сканировать экран на наличие цвета, оба цвета будут появляться поочередно в разное время

[VadikV]

получаешь доступ к экрану

dtCanvas = new TCanvas;
   dtCanvas->Handle = GetDC(0);

проверяешь цвет в нужном месте
идея клика мышью (двойной клик уже сам додумаешь):

mouse_event(MOUSEEVENTF_ABSOLUTE+MOUSEEVENTF_MOVE, Pos.x, Pos.y, 0, 0);
   Sleep(50);
   mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
   Sleep(50);
   mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
   Sleep(50);