Hallo zusammen,
ich bastel mir mal wieder was zusammen und stosse mal wieder an meine Grenzen ;o)
Ich möchte ein AutoIT Script im Hintergrund laufen lassen, das solange wartet, bis ein bestimmes Fenster aktiv ist. Dann soll eine GUI (in dem Fall nur ein Button) über das aktive Fenster gelegt werden.
Mein Script macht das zwar, aber das aktive Fenster und der Button flackert nur (sieht aus wie aktiv, nicht aktiv, aktiv, nicht aktiv) und der der Button lässt sich aus dem Grund auch nicht betätigen. Wie sollte ich dieses Thema richtig angehen ??
Spoiler anzeigen
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <array.au3>
$x=1
$y=1
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 244, 244, $x, $y,$WS_POPUP)
$Button1 = GUICtrlCreateButton("Button1", 1, 1, 244, 244,$BS_BITMAP)
GUICtrlSetImage (-1, "SPSconnectD3.bmp")
GuiSetState(@SW_HIDE, $Form1)
WinSetOnTop ( "Form1", "", 1)
#EndRegion ### END Koda GUI section ###
[/autoit] [autoit][/autoit] [autoit]DIM $temp[4]
$showButton =0
While 1
[/autoit] [autoit][/autoit] [autoit]If WinActive("WAK Service Store - WAK Bestellübersicht") Then _ShowButton()
[/autoit] [autoit][/autoit] [autoit]If NOT WinActive("WAK Service Store - WAK Bestellübersicht") Then _HideButton()
[/autoit] [autoit][/autoit] [autoit]$nMsg = GUIGetMsg()
Switch $nMsg
Case $Button1
ProgressOn("SPSconnectD3", "Bitte warten ...")
For $i = 1 to 100
ProgressSet( $i, $i & " Prozent")
Sleep(5)
Next
sleep(500)
ProgressOff()
MsgBox(0,"","DANKE")
Exit
EndSwitch
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]WEnd
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]Func _ShowButton()
If $showButton =0 Then
GuiSetState(@SW_SHOW, $Form1)
$showButton =1
EndIf
$temp = WinGetPos("WAK Service Store - WAK Bestellübersicht")
$x = $temp[2] + $temp[0] -252
$y = $temp[3] + $temp[1] -252
WinMove("Form1","",$x,$y)
EndFunc
[/autoit] [autoit][/autoit] [autoit]Func _HideButton()
If $showButton =1 Then
GuiSetState(@SW_HIDE, $Form1)
$showButton =0
EndIf
EndFunc
[/autoit]Bin für jeden Tip dankbar.
