Oberfläche auf Veränderung prüfen

*wudu*

Hallo Forum,

ich suche ein Möglichkeit, einen festgelegten Bereich (Koordinaten 7,515 linke Ecke bis 39,530 rechte untere Ecke) auf Veränderung zu prüfen.
Wenn eine Veränderung stattgefunden hat, möchte ich etwas mit ImageSearch suchen.

Welche Möglichkeiten gibt es ?

Schöne Grüße

**alpines**

Wonach möchtest du denn suchen und was möchtest du denn machen? Wir können dir viel bessere Lösungsvorschläge geben, wenn du uns verrätst was du wo machen möchtest.

Crusoe

Hallo
Hast du die Mal die Funktion PixelSearch angeschaut?
Viel hast du ja nicht verraten.
Ich vermute, dass die Änderung die du suchst auch mit einer Farbänderung einhergeht.

Wenn es ein Text ist, der irgendwann erscheint (so richtiger Text, kein Bild mit einer Aufschrift), kannst du auch mit WinExists experimentieren.

BLinz

Zitat von Crusoe

Hallo
Hast du die Mal die Funktion PixelSearch angeschaut?
Viel hast du ja nicht verraten.
Ich vermute, dass die Änderung die du suchst auch mit einer Farbänderung einhergeht.

PixelChecksum könnte da noch einfacher sein - das berechnet ja einen Prüfsumme aus einem angegebenen Bereich - und wenn sich dort etwas ändert, ändert sich auch die Prüfsumme.
Nutze ich gerade für mein Projekt "App-Performance-Monitoring" um Veränderungen am Bildaufbau zu finden (bzw. ob ein bekanntes Symbol erscheint)

*wudu*

Hi,

@ alpines

ich möchte in einen Programm nach einen Text (Wort) suchen. Da aber von diesem Programm(sehr alten Programm) kein Quelltext vorhanden ist, bin ich auf die Idee gekommen mittels imagesearch nach diesen Wort zu suchen.
Da ich aber nicht konstant nach diesem Bild suchen möchte, möchte ich Imagesearch erst auslösen wenn sich hier

[Blockierte Grafik: http://www16.picfront.org/picture/BpjhQ5X4vvk/thb/Bereich.jpg]

etwas ändert. Ist das ganze geeignet, oder gibt es bessere Ansätze ?

**alpines**

Benutz mal das AutoIt Window Info Tool und zeig uns mal was es dir anzeigt.
Wenn es sich um Windows Standardcontrols handelt, kannst du das ganze VIEL VIEL VIEL besser und sicherer lösen als mit ImageSearch.

*wudu*

Ok, danke für die Info.
Komme leider erst wieder am Montag an den Rechner. Läuft das Info Tool vom USB Stick aus, oder muss ich installieren ?
Welche Infos sind wichtig ?

**alpines**

Das Tool ist bei der AutoIt Installation mitgeliefert und kann als eigenständige Exe vom Stick aus laufen.
Zieh mal den Finder im Fenster auf einer der Labels die du ablesen möchtest und poste uns mal das Ergebnis was unter "Summary" steht.

BLinz

Zitat von *wudu*

Ok, danke für die Info.
Komme leider erst wieder am Montag an den Rechner. Läuft das Info Tool vom USB Stick aus, oder muss ich installieren ?
Welche Infos sind wichtig ?

Findest du im Startmenü bei AutoIt ("AutoIt Window Info") als x64 und x86.
Oder direkt im Installationsordner von AutoIt:

C:\Program Files (x86)\AutoIt3
und dort die

Au3Info.exe
Au3Info_x64.exe

Zieh nach dem Start das Fadenkreuz (Kasten "Finder Tool") auf den Text in dem anderen Programm.
Wenn du im Tool dann eine anzeige bekommst, ggf. sogar schon den Text, dann kannst du die Daten direkt auslesen.
Dann kannst du mit

WinGetHandle dir einen Zeiger auf das Fenster des anderen Programs holen,
ControlGetHandle dir danach einen Zeiger auf das Control holen mit dem Text (Name des Controls verrät dir das Info Tool),
GuiCtrlRead um den Text auszulesen.

Je nachdem was für ein Control-Typ das ist musst ggf. eine andere Frunktion zum auslesen nehmen,
schau die in der Hilfe den Teil mit den Befehlen an die mit _GuiCtrl.... beginnen.

*wudu*

Ok, wie gesagt bin an einer besseren Lösung auch interessiert. Aber das erst Montagabend.

Mein jetziger code für die imagesearch:

#include 'ImageSearch.au3'

Dim $x = 1, $y = 1
_ImageSearch(@ScriptDir & "\fz.jpg", 1,$x, $y, 70)
if $x = 1 Then Exit
MsgBox(64, 'Vorsicht', 'Aufpassen' )

Sleep(200)

Exit

Benötigt man für PixelChecksum auch eine dll ?
oder hat jemand ein Beispiel. Bin halt leider mit der Autoit Syntax nicht vertraut.

**alpines**

Nein, es ist eine built-in Funktion von AutoIt und benötigt keine extra DLL.

*wudu*

#include 'ImageSearch.au3'

$checksum = PixelChecksum(7,515,39,530)

While $checksum = PixelChecksum(7,515,39,530)
Sleep(100)
WEnd

MsgBox(64, "Achtung", "Es hat sich was geändert!")

Dim $x = 1, $y = 1

_ImageSearch(@ScriptDir & "\suche.jpg", 1,$x, $y, 70)
if $x = 1 Then Exit
MsgBox(64, 'Vorsicht', 'Aufpassen' )

Sleep(200)

Exit

Ok, das ganze funktioniert soweit gut.
Leider kommt die MsgBox nicht in den Vordergrund. Gibt es eine Möglichkeit die MsgBox in den Vordergrund zu bekommen ?
Und wie bekomme ich das ganze in eine Endlosschleife, nachdem die MsgBox quittiert ist ?

Crusoe · Bildschirmfoto 2017-05-13 um 21.30.18.png

Hi *wudu*,

bitte setze deinen Code in das entsprechende Fenster (Siehe Bild im Anhang), dann kann man den besser lesen

Versuch es Mal damit:

AutoIt

#include 'ImageSearch.au3'
#include <MsgBoxConstants.au3>


While -1
  $checksum = PixelChecksum(7,515,39,530)


  While $checksum = PixelChecksum(7,515,39,530)
    Sleep(100)
  WEnd


  MsgBox($MB_SETFOREGROUND, "Achtung", "Es hat sich was geändert!")


  Dim $x = 1, $y = 1


  _ImageSearch(@ScriptDir & "\suche.jpg", 1,$x, $y, 70)
  if $x = 1 Then Exit
  MsgBox(64, 'Vorsicht', 'Aufpassen' )


  Sleep(200)


WEnd

Alles anzeigen

"While -1" und das "WEnd" am Ende sorgen dafür, dass die Schleife ewig läuft.
Das ist natürlich mit Vorsicht zu genießen.
Du solltest dann ggf. die Funktion "HotKeySet" benutzen, damit du das Programm schnell beenden kannst, ohne das TrayIcon benutzen zu müssen.

*wudu*

C

#include 'ImageSearch.au3'
#include <MsgBoxConstants.au3>




func _stop()
   Exit
endFunc
HotKeySet("^{F9}","_stop")


Dim $x = 1, $y = 1


While true
$checksum = PixelChecksum(7,515,39,530)


While $checksum = PixelChecksum(7,515,39,530)
  Sleep(100)
WEnd


MsgBox(64, "Achtung", "Es hat sich was geändert!")


_ImageSearch(@ScriptDir & "\suche.jpg", 1,$x, $y, 70)
if $x = 1 Then Exit
   MsgBox(64, 'Achtung', 'Aufpassen' )


Sleep(200)


WEnd

Alles anzeigen

Ok, MsgBox ist jetzt sichtbar.
Aber ich bekomme bei jedem Durchlauf auch die zweite MsgBox obwohl die suche.jpg nicht vorhanden ist.

Crusoe

Hm...
Ich habe die "ImageSearch.au3" Datei nicht.
Ich habe nur Links gefunden, bei denen ich mich erst irgendwo registrieren muss.
Da soll es auch noch ein DLL dazu geben.
Kannst du beides Mal hochladen? Am besten in einer *.zip oder *.rar Datei.
Ich könnte mir vorstellen, dass nackte *.dll Dateien nicht hochgeladen werden können.

Ich habe zwar eine "ImageSearch.au3" im Netz gefunden, die scheint aber fehlerbehaftet zu sein.

*wudu*

Hier mal die Dateien

**autoiter**

Hallo @*wudu*,
ändere mal den Code von:

AutoIt

_ImageSearch(@ScriptDir & "\suche.jpg", 1,$x, $y, 70)
if $x = 1 Then Exit

zu:

AutoIt

$iSearch = _ImageSearch(@ScriptDir & "\suche.jpg", 1,$x, $y, 70)
If iSearch <> 1 Then Exit

**Bitnugger**

Zitat von BLinz

GuiCtrlRead um den Text auszulesen.

Das geht nur bei selbst erstellten Controls... da du hier ja nur die controlID angibst - für fremde Controls musst du ControlGetText nehmen.

*wudu*

Ich hätte mal eine kleine Testoberfläche gebastelt, weil es einfach nicht sauber läuft.

**Bitnugger**

Zitat von *wudu*

Ich hätte mal eine kleine Testoberfläche gebastelt, weil es einfach nicht sauber läuft.

Eine *exe zum Testen hochzuladen... nicht gerade die feine Art!