haripurnanto Posted December 18, 2021 Posted December 18, 2021 Hi Everyone, I have Splitter App as attached. I want to ask, how do I close some pop ups that appear and their positions always move. Thank you for your attention and cooperation. Regards, Hari Swift Splitter Incoming 3.0.jfif
Moderators Melba23 Posted December 18, 2021 Moderators Posted December 18, 2021 (edited) Moved to the appropriate forum. And this is the second time we have had to do this - please post in the correct section in future. Moderation Team Edited December 18, 2021 by Melba23 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Spoiler ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area
ad777 Posted December 18, 2021 Posted December 18, 2021 expandcollapse popupGlobal $aListe; Global $ADD Global $data Global $xw Global $sae = 1 ? 1;;true Global $st Global $Prev,$Preva; ;SWIFT Splitter 3.0 (incoming) <- title of window ;MessageBox Text <- "MT9xx Parser Canceled!" _NoMessage("SWIFT Splitter 3.0 (incoming)","MT9xx Parser Canceled!") ;this code made by Ad777 ;$TextIn; the text inside MessageBox ;$Window Title :the title of window(not MessageBox Title) Func _NoMessage($WindowTitle,$TextIn,$class = "Static") WinWaitActive($WindowTitle) While 1 if WinActive($WindowTitle) Then $aListe = WinList(); For $iae = 1 To $aListe[0][0] Step 1 If $aListe[$iae][0] <> "" And BitAND(WinGetState($aListe[$iae][1]), 2) Then if $aListe[$iae][0] = $WindowTitle Then $ADD &= $aListe[$iae-1][0] EndIf $Preva &= $aListe[$iae][0];; $xw =$ADD For $i = 0 To 15 Step 1 if ControlGetText($xw,"",$class&$i) = $TextIn And WinActive($xw) Then WinKill($xw) EndIf Next EndIf Next if $sae = 1 Then $Prev = $Preva ;;; $sae = 1 ? 0;false EndIf if _WindowIn($WindowTitle) = 1 Then if $Preva = $Prev Then ;;;if it's equal do stufff EndIf EndIf ; $state = "off" $iae = 0 $Preva = "" $ADD = "" if _WindowIn($WindowTitle) = 0 Then $Prev = ""; Local $aList = WinList() For $i = 1 To $aList[0][0] If $aList[$i][0] <> "" And BitAND(WinGetState($aList[$i][1]), 2) Then $Prev &= $aList[$i][0] EndIf Next EndIf EndIf WEnd EndFunc Func _WindowIn($MainGui) $PX = MouseGetPos()[0] $WX = WinGetPos($MainGui)[0] $PY = MouseGetPos()[1] $WY = WinGetPos($MainGui)[1] local $Wd = WinGetClientSize($MainGui)[0]+$WX+2 local $Wh = WinGetClientSize($MainGui)[1]+$WY+25 local $Wh2 = WinGetClientSize($MainGui)[1]-$Wh if $PX >= $WX and $PY >= $WY+26 and $PY < $Wh And $PY > $Wh2 and $PX <= $Wd then; And $WY <$PY Then Return 1 Else Return 0 EndIf EndFunc none
Danp2 Posted December 18, 2021 Posted December 18, 2021 @haripurnantoHow is this question different from your prior one? Latest Webdriver UDF Release Webdriver Wiki FAQs
haripurnanto Posted December 18, 2021 Author Posted December 18, 2021 Hi Danp2, I'm sorry before, that the previous question was not quite right and this second question is correct. Regards, Hari
haripurnanto Posted December 18, 2021 Author Posted December 18, 2021 Hi ad777, Thank you very much for helping me in making AutoIT scripts, when I tried it, the error still appeared. Regards, Hari
ad777 Posted December 18, 2021 Posted December 18, 2021 (edited) srry the code was little mistake (winactive): here it's fixed! make sure the title & text in correct! expandcollapse popupGlobal $aListe; Global $ADD Global $data Global $xw Global $sae = 1 ? 1;;true Global $st Global $Prev,$Preva; ;SWIFT Splitter 3.0 (incoming) <- title of window ;MessageBox Text <- "MT9xx Parser Canceled!" _NoMessage("SWIFT Splitter 3.0 (incoming)","MT9xx Parser Canceled!") ;this code made by Ad777 ;$TextIn; the text inside MessageBox ;$Window Title :the title of window(not MessageBox Title) Func _NoMessage($WindowTitle,$TextIn,$class = "Static") ;WinWaitActive($WindowTitle) While 1 ; if WinActive($WindowTitle) Then $aListe = WinList(); For $iae = 1 To $aListe[0][0] Step 1 If $aListe[$iae][0] <> "" And BitAND(WinGetState($aListe[$iae][1]), 2) Then if $aListe[$iae][0] = $WindowTitle Then $ADD &= $aListe[$iae-1][0] EndIf $Preva &= $aListe[$iae][0];; $xw =$ADD For $i = 0 To 15 Step 1 if ControlGetText($xw,"",$class&$i) = $TextIn And WinActive($xw) Then WinKill($xw) EndIf Next EndIf Next if $sae = 1 Then $Prev = $Preva ;;; $sae = 1 ? 0;false EndIf if _WindowIn($WindowTitle) = 1 Then if $Preva = $Prev Then ;;;if it's equal do stufff EndIf EndIf ; $state = "off" $iae = 0 $Preva = "" $ADD = "" if _WindowIn($WindowTitle) = 0 Then $Prev = ""; Local $aList = WinList() For $i = 1 To $aList[0][0] If $aList[$i][0] <> "" And BitAND(WinGetState($aList[$i][1]), 2) Then $Prev &= $aList[$i][0] EndIf Next EndIf ; EndIf WEnd EndFunc Func _WindowIn($MainGui) $PX = MouseGetPos()[0] $WX = WinGetPos($MainGui)[0] $PY = MouseGetPos()[1] $WY = WinGetPos($MainGui)[1] local $Wd = WinGetClientSize($MainGui)[0]+$WX+2 local $Wh = WinGetClientSize($MainGui)[1]+$WY+25 local $Wh2 = WinGetClientSize($MainGui)[1]-$Wh if $PX >= $WX and $PY >= $WY+26 and $PY < $Wh And $PY > $Wh2 and $PX <= $Wd then; And $WY <$PY Then Return 1 Else Return 0 EndIf EndFunc Edited December 18, 2021 by ad777 none
Danp2 Posted December 18, 2021 Posted December 18, 2021 Ok. But instead of abandoning the prior thread, you could have replied to the forum members that tried to assist you and provided additional details. 🙂 ad777 1 Latest Webdriver UDF Release Webdriver Wiki FAQs
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now