I can't seem to find bitmaps. I tried changing the bitmaps to something else just to get it to work but it never detects itheres the code:
I shouldn't need tolerance right? because the desktop stays the same....Code:program New; procedure searchBTMP; var firefox, i, x, y : integer; tryNumber : String; begin firefox := BitmapFromString(13, 12, 'beNpjYFhnwrNYjuWpD+' + 'P3cMbVaebxu28DUdmtHwWXP2Vf+Jhy7mPMiY8MDAzX0uRP57r9vzz' + 'l8pKqgOzuoI2PgSjx6IeYA++CNj/1WHzHdeVzoLLXTXrvp/jUljYo' + '+LVplWwK2vISiAK3vvLb/Npx9k394k265TuAyr72Gr3oNBcLnGgy/' + 'ZbziidOSx8Bkf38u8b1ew3r96llLJOLnAlUdrDC7kmPtXL0ZN3uC8' + 'YTL5tMAqPJVzSLNsmHTJYJniTl3wdUxm1RJe9YIhMyQbnqgHr9UY1' + 'GCDqmWrFHNn6hZOAEMfc24pXJZawRTNsuk7lBoXCnXNEeicIDQCSS' + 'f0CqYK9iyV7J0BnCdrVAZXMK/JSSl/IkbedL2SGftiYwrxuIMus67' + 'EsWCsetEXZpFbQoBwVIufjJUr22rKjmzJg9+cbPa2WB6Mt0gx9H4k' + 'o6OjmdJ/AaFgCV7XEVuJst/rZC9E2l6LMS0YeZAkB0Kpy/L84hJLa' + 'Aw76bUyuDgUgAAEzVt6o='); for i:=0 to 9 do begin tryNumber := intToStr(i+1); Writeln('Looking for Play Bitmap.....Try '+ tryNumber +' out of 10'); if(FindBitmap(firefox, x, y)) then begin Writeln('Found Firefox'); break; end else begin Writeln('Firefox not found'); wait(1500); end; end; end; begin searchBTMP; end.


heres the code:
Reply With Quote










