WEB форумы на jedi
[Форум] [Помощь] [Поиск] [Выйти]
Добро пожаловать, [info]User

WEB форумы на jedi [ПОИСК] [Архив до 03.2006]

Тема Delphi Определить цвет пикселя на экране К предыдущему сообщению На следующее сообщение Программирование

Отправил PoмaнP в 09:15 05.08.2005[Ответить]
Как в Delphi определить цвет пикселя в любой части экрана (по координатам). В форме ясно    a:=Canvas.Pixels[x,y];  ,а как узнать в любой части экрана не ясно. Или хотя бы цвет пикселя на который указывает мышка.


Отправил Academic в 11:16 05.08.2005[Ответить]
function GetDeskTopColor(x, y: Integer): TColor;
Var
cnv: TCanvas;
begin
cnv:=TCanvas.Create;
cnv.Handle:=GetDC(0);
Result:=cnv.Pixels[x, y];
cnv.Free;
end;


куда указывает мышка:

Var
p: TPoint;
MyColor: TColor;
begin
GetCursorPos(p);
MeColor:=GetDeskTopColor(p.x, p.y);
end;


Отправил GoodMaker в 12:47 05.08.2005[Ответить]
Academic
этот метод быстрее чем апи винды GetPixel(hdc,XPos,YPos)?


Отправил O3 в 14:42 05.08.2005[Ответить]
Принт Скрин и в Шопе пипеткой :)


Отправил GoodMaker в 15:24 05.08.2005[Ответить]
написано же на делфи определить цвет пикселя, значит если использовать фотошоп, то без winexec не обойтись :) и надо както оперативно на делфи получать цвет точки под пипеткой, есть идеи на этот счет? Мне кажется надо будет задействовать FineReader для распознования цифр :)


Отправил Sleep-Walker в 21:51 05.08.2005[Ответить]
Дэн, конструктивно мыслишь!!))
ибо файнридер крут)))