Prüfen, ob ein Fenster offen ist, ohne goto

AutoMit

Hallo Freunde der automatisierten Schritte,

In Autoit gibt es keinen Rücksprung (goto) – wie löst man dann folgendes Problem?

Solange das Fenster „speichern unter“ offen ist, soll es aktiviert und mit der Escape-Taste geschlossen werden.

Soweit zur Theorie:

Manchmal funktioniert es, manchmal nicht – daher wollte ich eine extra Fensterprüfung einbauen und die sollte so lange durchlaufen werden, bis das Fenster wirklich geschlossen ist.

So funktioniert es nicht:

Code

$Fenster_aktuell = "Speichern unter"
If WinActivate ($Fenster_aktuell) Then
WinActivate($Fenster_aktuell)						
Send({ESC}")
Sleep(200)
EndIf


... an dieser Stelle müsste ich wieder das Fenster prüfen.
per Schleifenbefehl würde ich zur ersten Zeile des Scripts gehen.


Wie löst man das eleganter, da es in Autoit keine Schleifen gibt?

Alles anzeigen

PS: Woran kann es liegen, dass über das Script das Fenster per ESC zum Teil geschlossen wird und teilweise nicht? Per Tastatur funktioniert ESC immer.

Viele Grüße
AutoMit

**chesstiger**

Wo hast du denn den Unsinn her?
Natürlich gibt es in AutoIt Schleifen, vier Stück sogar:

While ... WEnd
Do ... Until
For ... To ... Next
For ... In ... Next

Hier würde sich ein Konstrukt mit Do ... Until anbieten.

**Mars**

Hier gibt es keine If-Schleifen und kein goto. Ansonsten aber alles was das Herz begehrt.

AutoMit

Das war ein freudscher Fehlgriff - ich meinte natürlich Goto (habe es oben edit - sorry).

Ich hätte obiges so gelöst, wenn das Fenster offen ist, beende es.

Nur - wenn es jetzt immer noch offen ist, wie prüfe ich dann erneut darauf, ob das Fenster offen ist, ohne den Code erneut schreiben zu müssen?

Mit Goto würde ich einfach über die Zeile mit Goto springen:
If WinActivate ($Fenster_aktuell) Then
und den Block erneut abarbeiten lassen, bis das Fenster wirklich geschlossen ist.

**Oscar**

Und warum benutzt Du dafür keine Schleife?

BinDannMalWeg

Vermutlich kennt der TE das Konstrukt einer Schleife noch gar nicht. Daher würde ich dazu raten erst einmal ein Grundlagentutorial durchzuarbeiten, bevor weiter drauf los programmiert wird.
Links zu verschiedenen Tutorials gibts bei Tante Google, auf der Autoit.de Startseite oder ohne umwege direkt hier https://autoit.de/wiki/index.php/Tutorial

Runa

AutoIt

; Kopfprüfung (= Es wird vor dem erste Ablauf geprüft, ob die Bedingung zutrifft)


While WinExists("Mein Fenster")
    WinClose("Mein Fenster")
WEnd


; Fussprüfung (= Es wird die Befehlsfolge der Schleife mind. einmal durchlaufen und dann geprüft ob die Bedingung zutreffend ist. Falls ja, wird die Schleife verlassen


Do
    WinClose("Mein Fenster")
Until Not WinExists("Mein Fenster")

Alles anzeigen

AutoMit

Vielen Dank Bioshade. Das ist eine gute Lösung. Habe viele Jahre mit goto Konstruktionen gearbeitet, und da ist der Umstieg auf While-Schleifen nicht einfach.
PS: Mag noch sagen, wo allgemein die do ... until Konstruktion ihre Vorteile gegenüber while ... wend hat?

CentuCore

Do-Until Schleifen garantieren mindensten einen Durchlauf.
While-WEnd wird dagegen nur durchlaufen, wenn die Bedingung von Anfang an wahr ist.