[SeMgA]

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


http://www.rapidshare.ru/1511273

[Страдалецъ]

А зачем вы именно TMemo для этих целей использовали? Есть-же хороший компонент TShape. За каким кубиком курсор мыши должен "следить", их у вас там с 10 появляется.

[SeMgA]

Сделано для удобства
Делал на скорую руку какой компонент используется не имеет значения главное чтоб курсор следил и кликал именно на определенный цвет
Если знаете как помочь выберете любой цвет и приведите пример пожалуйста
Забыл уточнить
Клик мышки должен быть внешней программой
спс

[NIch]

Клик мышки должен быть внешней программой

Хм, ишь чего хочешь...
Потом появляются всякие обманавалки, наё...авалки и прочая нечисть...

[SeMgA]

Я не понимаю одного
я попросил помощи, а не того чтоб за меня написали
ЗАЧЕМсоздавать раздел помощь новичкам когда народ который вроде что то знает издевается ?????????????????

[Страдалецъ]

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

Код:

for i := 0 to ComponentCount - 1
 do if Components[i].ClassType = TMemo
    then if TMemo(Components[i]).Color = clRed
         then Mouse_Event(MOUSEEVENTF_MOVE,TMemo(Components[i]).Left,TMemo(Components[i]).Top,0,0);