这是针对 Delphi (7) 的。
我一直在尝试为屏幕寻找像素搜索器,但没有太多帮助。我最多找到了一些可以截取整个屏幕截图并将其存储在画布中的东西,但我不确定这是否真的有必要,因为唯一的目的是检查给定的协调。
我基本上只需要一些可以使它起作用的东西:
procedure TForm1.Button1Click(Sender: TObject);
begin
if(Checkcolor(1222,450) == 000000) then
showmessage('Black color present at coordinates');
end;
Run Code Online (Sandbox Code Playgroud)