Super, dass scheint schonmal zu funktionieren, jedoch funktioniert die Rückgabe der Koordianten x und y noch nicht richtig, habe die Variablen Global definiert, jedoch bleiben sie leer.
Hier meine erweiterte Funktion:
Delphi-Quellcode:
function _ImageSearch(findImage: string; tolerance: Integer): Boolean;
var
ergebnis : PChar;
begin
if (tolerance > 0) then findImage := '*' + inttostr(tolerance) + ' ' + findImage;
ergebnis := ImageSearch(0,0,Screen.Width,Screen.Height,PCHAR(findImage));
if ergebnis[0] = '1' then
begin
showmessage('found' + inttostr(x) + ' ' + inttostr(y));
result := true;
end
else
begin
result := false
end;
end;
Danke schon einmal für die Super Hilfe.
gruß,
Fredyy