|
Найти цвет - Вопросы и ответы, обсуждения - Ваши вопросы по Pascal/Delphi только в данном разделе |
01.09.2012, 13:42
|
#1
|
|
|
|
Пехотинец
|
Регистрация: 02.04.2011
Сообщений: 66
Популярность: 9953
Сказал(а) спасибо: 898
Поблагодарили 412 раз(а) в 209 сообщениях
|
Найти цвет
Помогите пожалуйста.
Нужно что бы сканировался экран на наличие нужного цвета. Если найден заданный цвет , то тыкнуть по ТЕМ КООРДИНАТАМ , ГДЕ ОН НАЙДЕН
Никак не могу найти реализации такого.
(гугл не совсем понимает меня )
|
|
|
01.09.2012, 14:03
|
#2
|
|
|
|
Старший сержант
|
Регистрация: 25.12.2011
Сообщений: 191
Популярность: 5259
Сказал(а) спасибо: 31
Поблагодарили 235 раз(а) в 135 сообщениях
|
Re: Найти цвет
|
Цитата: |
|
|
|
|
Сообщение от =^PaLeTiZaToR^= |
|
|
|
|
|
|
|
Помогите пожалуйста.
Нужно что бы сканировался экран на наличие нужного цвета. Если найден заданный цвет , то тыкнуть по ТЕМ КООРДИНАТАМ , ГДЕ ОН НАЙДЕН
Никак не могу найти реализации такого.
(гугл не совсем понимает меня )
|
|
|
|
|
|
Этот пример не совсем подходит под условие, поскольку сканирует только 1 точку, но я думаю воткнуть цикл поиска цвета по экрану для тебя не составит проблем)
var
DC: HDC;
Color: Cardinal;
x,y:integer;
begin
DC := CreateDC('MONITOR', nil, nil, nil);
Color := GetPixel(DC, x, y); //получаем цвет в точке x,y
if color такой то then begin
SetCursorPos(X,Y);
Mouse_Event(MOUSEEVENTF_LEFTDOWN, x, y, 0, 0);
Mouse_Event(MOUSEEVENTF_LEFTUP, x, y, 0, 0);
end;
end;
|
|
|
Пользователь сказал cпасибо:
|
|
01.09.2012, 16:08
|
#3
|
|
|
|
Пехотинец
|
Регистрация: 02.04.2011
Сообщений: 66
Популярность: 9953
Сказал(а) спасибо: 898
Поблагодарили 412 раз(а) в 209 сообщениях
|
Re: Найти цвет
|
Цитата: |
|
|
|
|
|
|
|
|
|
Этот пример не совсем подходит под условие, поскольку сканирует только 1 точку, но я думаю воткнуть цикл поиска цвета по экрану для тебя не составит проблем)
var
DC: HDC;
Color: Cardinal;
x,y:integer;
begin
DC := CreateDC('MONITOR', nil, nil, nil);
Color := GetPixel(DC, x, y); //получаем цвет в точке x,y
if color такой то then begin
SetCursorPos(X,Y);
Mouse_Event(MOUSEEVENTF_LEFTDOWN, x, y, 0, 0);
Mouse_Event(MOUSEEVENTF_LEFTUP, x, y, 0, 0);
end;
end;
|
|
|
|
|
|
Спасибо , но слишком долго. Неужели нет быстрого способа, просто найти на экране нужный цвет и тыкнуть туда
|
|
|
01.09.2012, 16:41
|
#4
|
|
|
|
Фельдмаршал
|
Регистрация: 13.08.2009
Сообщений: 1,004
Популярность: 25098
Золото Zhyk.Ru: 350
Сказал(а) спасибо: 110
Поблагодарили 830 раз(а) в 395 сообщениях
|
Re: Найти цвет
Ответ был дан несколькими темами ниже.
________________
Ни одно доброе дело не остается безнаказанным.
Программы:
PW: Флудобот, Девизхак, OutFocusBot, OutFocusBot ver 3 (freepvp), PWMultiHack ver 3, AutoRespawn.
JD: JDMultiHack, JDFlooder, JDBot.
Статьи: Отключаем UAC, Ищем базовый адрес Perfect World, "Патчер памяти" или "Пишем флайхак", "Патчер памяти 2" или "Пишем Джампхак", "Поиск инжектов" или "Наш код в чужом процессе"
|
|
|
Ваши права в разделе
|
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
HTML код Выкл.
|
|
|
Похожие темы
|
Тема |
Автор |
Раздел |
Ответов |
Последнее сообщение |
цвет прицела
|
Novi4okk |
Общение и обсуждение Counter-Strike |
7 |
25.02.2011 23:03 |
Цвет чата
|
XagenMaster |
Вопросы и ответы: RF Online |
0 |
04.01.2011 21:28 |
[Помогите!] Цвет
|
igor_bastov |
Общение и обсуждение Perfect World |
22 |
22.11.2010 16:54 |
[Помогите!] цвет
|
SIMsim1 |
Общение и обсуждение Perfect World |
10 |
22.10.2010 08:08 |
Заявление об ответственности / Список мошенников
Часовой пояс GMT +4, время: 13:51.
|
|