msgboxes

lm1 · October 24, 2006

is there a command to put in with looping message boxes that will make the next box a random position on the screen?

Paulie · October 24, 2006

is there a command to put in with looping message boxes that will make the next box a random position on the screen?

Technically, No.

A msgbox Is always in the center of the screen, However there is one way

I Don't know who I got this code from, but i know it wasn't me :whistle:

It does what PaulIA suggests

Do
$xpos = Random(1, 500,1)
$ypos = Random(1, 500,1)
$TestValue = _MoveMsgBox(68, "Testing Move MsgBox", 'Would you like to continue?' & @CRLF & 'If you would like to continue click Yes, otherwise press No', 0, $xpos, $ypos, 1)
Until 2= 1


Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $MBTimeOut, $MBxPos, $MByPos, $MBContinue = 0)
    Local $MBFile = FileOpen(EnvGet("temp") & "\MiscMMB.txt", 2)
    Local $MBFile2 = FileOpen(EnvGet("temp") & "\MiscMMB2.txt", 2)
    If $MBFile = -1 Or $MBFile2 = -1 Then Return 0
   
    Local $LineDelimter = '', $MBPID1 = '', $MBPID2 = ''
   
    If UBound(StringSplit($MBText, @CRLF, 1)) - 2 > 0 Then
        $LineDelimter = @CRLF
    ElseIf UBound(StringSplit($MBText, @CR, 1)) - 2 > 0 Then
        $LineDelimter = @CR
    ElseIf UBound(StringSplit($MBText, @LF, 1)) - 2 > 0 Then
        $LineDelimter = @LF
    EndIf
   
    Local $SSpMB = StringSplit($MBText, $LineDelimter, 1)
    If UBound($SSpMB) - 2 > 0 And $LineDelimter <> '' Then
        Local $MBLine1 = '#NoTrayIcon'
        FileWriteLine($MBFile, $MBLine1)
       
        $MsgBoxLine1 = '#NoTrayIcon'
        FileWriteLine($MBFile2, $MsgBoxLine1)
       
        Local $MsgBoxLine[UBound($SSpMB)]
        Local $LinesToShow = ''
        For $iCount = 1 To UBound($SSpMB) - 1
            FileWriteLine($MBFile, '$MsgBoxLine' & $iCount & ' = "' & $SSpMB[$iCount] & '"')
            FileWriteLine($MBFile2, '$MsgBoxLine' & $iCount & ' = "' & $SSpMB[$iCount] & '"')
            If $iCount < UBound($SSpMB) - 1 Then
                $LinesToShow &= '$MsgBoxLine' & $iCount & ' & @CRLF & '
            Else
                $LinesToShow &= '$MsgBoxLine' & $iCount
            EndIf
        Next

        Local $MBLine2 = 'While 1'
        Local $MBLine3 = '    If WinExists("' & $MBTitle & '", ' & '$MsgBoxLine1' & ') Then'
        Local $MBLine4 = '        While WinExists("' & $MBTitle & '", ' & '$MsgBoxLine1' & ')'
        Local $MBLine5 = '            ControlMove("' & $MBTitle & '", ' & '$MsgBoxLine1' & ', "", ' & $MBxPos & ', ' & $MByPos & ')'
        Local $MBLine6 = '            $WinPos = WinGetPos("' & $MBTitle & '", ' & '$MsgBoxLine1' & ')'
        Local $MBLine7 = '            If IsArray($WinPos) And $WinPos[0] = ' & $MBxPos & ' And $WinPos[1] = ' & $MByPos & ' Then Exit'
        Local $MBLine8 = '        WEnd'
        Local $MBLine9 = '    EndIf'
        Local $MBLine10 = 'WEnd'
        FileWrite($MBFile, '$LinesToShow = ' & $LinesToShow & @CRLF & _
                $MBLine2 & @CRLF & _
                $MBLine3 & @CRLF & _
                $MBLine4 & @CRLF & _
                $MBLine5 & @CRLF & _
                $MBLine6 & @CRLF & _
                $MBLine7 & @CRLF & _
                $MBLine8 & @CRLF & _
                $MBLine9 & @CRLF & _
                $MBLine10)
        FileWriteLine($MBFile2, '$LinesToShow = ' & $LinesToShow)
       
        Local $MsgBoxLine2 = '$MsgBoxValue = MsgBox(' & $MBFlag & ', ''' & $MBTitle & ''', ' & '$LinesToShow' & ', ''' & $MBTimeOut & ''')'
        Local $MsgBoxLine3 = 'ConsoleWrite(' & "'MsgBoxSays'" & ' & $MsgBoxValue & ' & "'Return'" & ')'
        FileWriteLine($MBFile2, $MsgBoxLine2 & @CRLF & $MsgBoxLine3)
        FileClose($MBFile)
        FileClose($MBFile2)
    Else
        Local $MBLine1 = '#NoTrayIcon'
        ;Local $MBLine3 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
        Local $MBLine2 = 'While 1'
        Local $MBLine3 = '    If WinExists("' & $MBTitle & '", "' & $MBText & '"' & ') Then'
        Local $MBLine4 = '        While WinExists("' & $MBTitle & '", "' & $MBText & '"' & ')'
        Local $MBLine5 = '            ControlMove("' & $MBTitle & '", "' & $MBText & '"' & ', "", ' & $MBxPos & ', ' & $MByPos & ')'
        Local $MBLine6 = '            $WinPos = WinGetPos("' & $MBTitle & '", "' & $MBText & '")'
        Local $MBLine7 = '            If IsArray($WinPos) And $WinPos[0] = ' & $MBxPos & ' And $WinPos[1] = ' & $MByPos & ' Then Exit'
        Local $MBLine8 = '        WEnd'
        Local $MBLine9 = '    EndIf'
        Local $MBLine10 = 'WEnd'
        FileWrite($MBFile, $MBLine1 & @CRLF & _
                $MBLine2 & @CRLF & _
                $MBLine3 & @CRLF & _
                $MBLine4 & @CRLF & _
                $MBLine5 & @CRLF & _
                $MBLine6 & @CRLF & _
                $MBLine7 & @CRLF & _
                $MBLine8 & @CRLF & _
                $MBLine9 & @CRLF & _
                $MBLine10)
        FileClose($MBFile)
       
        Local $MsgBoxLine1 = '#NoTrayIcon'
        Local $MsgBoxLine2 = '$MsgBoxValue = MsgBox(' & $MBFlag & ', ''' & $MBTitle & ''', ''' & $MBText & ''', ''' & $MBTimeOut & ''')'
        Local $MsgBoxLine3 = 'ConsoleWrite(' & "'MsgBoxSays'" & ' & $MsgBoxValue & ' & "'Return'" & ')'
        FileWrite($MBFile2, $MsgBoxLine1 & @CRLF & $MsgBoxLine2 & @CRLF & $MsgBoxLine3)
        FileClose($MBFile2)
    EndIf
   
    $MBPID1 = Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MiscMMB.txt")
    $MBPID2 = Run(@AutoItExe & ' /AutoIt3ExecuteScript ' & EnvGet("temp") & "\MiscMMB2.txt", @WorkingDir, 0, 6)
   
    WinWait($MBTitle, $MBText, 60)
    While (Not FileDelete(EnvGet("temp") & "\MiscMMB.txt") Or Not FileDelete(EnvGet("temp") & "\MiscMMB2.txt"))
        Sleep(10)
    WEnd
   
    If $MBContinue Then
        While 1
            $StdOutReadValue = StdoutRead($MBPID2)
            If StringInStr($StdOutReadValue, 'MsgBoxSays') Then
                $a_Array = StringRegExp($StdOutReadValue, '(?:MsgBoxSays)(.*?)(?:Return)', 3)
                If Not @error Then Return $a_Array[0]
                Return 0
            EndIf
            Sleep(10)
        WEnd
    EndIf
    Return 0
EndFunc   ;==>_MoveMsgBox

Edited October 24, 2006 by Paulie

lm1 · October 24, 2006

hahaha, i really have no idea how to use Autoit, im trying to learn in just to start some programs with addons etc. Any tutorials or programs that you would recomend for learning. Along the lines of creating buttons, checkboxes, msgboxes, and copying files from folder to folder.??

SmOke_N · October 24, 2006

Technically, No.
A msgbox Is always in the center of the screen, However there is one way
I Don't know who I got this code from, but i know it wasn't me
It does what PaulIA suggests

Ahem

fu2m8 · October 24, 2006

hahaha, i really have no idea how to use Autoit, im trying to learn in just to start some programs with addons etc. Any tutorials or programs that you would recomend for learning. Along the lines of creating buttons, checkboxes, msgboxes, and copying files from folder to folder.??

check out Valuaters AutoIT 1-2-3 class. Found it a great introduction.

Valuaters AutoIT 1-2-3 Class

Thatsgreat2345 · October 24, 2006

Ahem

yes thank you for acknowledging my wonderful code Smoke

hahahaha I KID I KID smoke wrote it maybe you should give him the credit GOOODNESS

Paulie · October 24, 2006

Ahem

OH YEAH i remember now, thanks for the refresher.

SmOKe_N definatley made it in his awesome wonderness of spiderman incredibility!

*Bows Down to Spiderman*

Smoke get 99 Internets

Edited October 24, 2006 by Paulie

lm1 · October 24, 2006

so... no way to make it randomly choose place on the screen eh? Or at least set places?

herewasplato · October 24, 2006

You can see variations on that theme here:

http://www.autoitscript.com/forum/index.ph...showtopic=22531

including SmOke_N's fine code.

Yes, it can randomly move to a new place with each box...

Thatsgreat2345 · October 24, 2006

if you look the Random()'s set the x y positions of the message box if you get the coords of where u want it then it will go to the coords that u make the variables $xpos and $ypos equal to

Do
$xpos = Random(1, 500,1); change to something 
$ypos = Random(1, 500,1); change to something 
$TestValue = _MoveMsgBox(68, "Testing Move MsgBox", 'Would you like to continue?' & @CRLF & 'If you would like to continue click Yes, otherwise press No', 0, $xpos, $ypos, 1)
Until 2= 1


Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $MBTimeOut, $MBxPos, $MByPos, $MBContinue = 0)
    Local $MBFile = FileOpen(EnvGet("temp") & "\MiscMMB.txt", 2)
    Local $MBFile2 = FileOpen(EnvGet("temp") & "\MiscMMB2.txt", 2)
    If $MBFile = -1 Or $MBFile2 = -1 Then Return 0
   
    Local $LineDelimter = '', $MBPID1 = '', $MBPID2 = ''
   
    If UBound(StringSplit($MBText, @CRLF, 1)) - 2 > 0 Then
        $LineDelimter = @CRLF
    ElseIf UBound(StringSplit($MBText, @CR, 1)) - 2 > 0 Then
        $LineDelimter = @CR
    ElseIf UBound(StringSplit($MBText, @LF, 1)) - 2 > 0 Then
        $LineDelimter = @LF
    EndIf
   
    Local $SSpMB = StringSplit($MBText, $LineDelimter, 1)
    If UBound($SSpMB) - 2 > 0 And $LineDelimter <> '' Then
        Local $MBLine1 = '#NoTrayIcon'
        FileWriteLine($MBFile, $MBLine1)
       
        $MsgBoxLine1 = '#NoTrayIcon'
        FileWriteLine($MBFile2, $MsgBoxLine1)
       
        Local $MsgBoxLine[UBound($SSpMB)]
        Local $LinesToShow = ''
        For $iCount = 1 To UBound($SSpMB) - 1
            FileWriteLine($MBFile, '$MsgBoxLine' & $iCount & ' = "' & $SSpMB[$iCount] & '"')
            FileWriteLine($MBFile2, '$MsgBoxLine' & $iCount & ' = "' & $SSpMB[$iCount] & '"')
            If $iCount < UBound($SSpMB) - 1 Then
                $LinesToShow &= '$MsgBoxLine' & $iCount & ' & @CRLF & '
            Else
                $LinesToShow &= '$MsgBoxLine' & $iCount
            EndIf
        Next

        Local $MBLine2 = 'While 1'
        Local $MBLine3 = '    If WinExists("' & $MBTitle & '", ' & '$MsgBoxLine1' & ') Then'
        Local $MBLine4 = '        While WinExists("' & $MBTitle & '", ' & '$MsgBoxLine1' & ')'
        Local $MBLine5 = '            ControlMove("' & $MBTitle & '", ' & '$MsgBoxLine1' & ', "", ' & $MBxPos & ', ' & $MByPos & ')'
        Local $MBLine6 = '            $WinPos = WinGetPos("' & $MBTitle & '", ' & '$MsgBoxLine1' & ')'
        Local $MBLine7 = '            If IsArray($WinPos) And $WinPos[0] = ' & $MBxPos & ' And $WinPos[1] = ' & $MByPos & ' Then Exit'
        Local $MBLine8 = '        WEnd'
        Local $MBLine9 = '    EndIf'
        Local $MBLine10 = 'WEnd'
        FileWrite($MBFile, '$LinesToShow = ' & $LinesToShow & @CRLF & _
                $MBLine2 & @CRLF & _
                $MBLine3 & @CRLF & _
                $MBLine4 & @CRLF & _
                $MBLine5 & @CRLF & _
                $MBLine6 & @CRLF & _
                $MBLine7 & @CRLF & _
                $MBLine8 & @CRLF & _
                $MBLine9 & @CRLF & _
                $MBLine10)
        FileWriteLine($MBFile2, '$LinesToShow = ' & $LinesToShow)
       
        Local $MsgBoxLine2 = '$MsgBoxValue = MsgBox(' & $MBFlag & ', ''' & $MBTitle & ''', ' & '$LinesToShow' & ', ''' & $MBTimeOut & ''')'
        Local $MsgBoxLine3 = 'ConsoleWrite(' & "'MsgBoxSays'" & ' & $MsgBoxValue & ' & "'Return'" & ')'
        FileWriteLine($MBFile2, $MsgBoxLine2 & @CRLF & $MsgBoxLine3)
        FileClose($MBFile)
        FileClose($MBFile2)
    Else
        Local $MBLine1 = '#NoTrayIcon'
        ;Local $MBLine3 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
        Local $MBLine2 = 'While 1'
        Local $MBLine3 = '    If WinExists("' & $MBTitle & '", "' & $MBText & '"' & ') Then'
        Local $MBLine4 = '        While WinExists("' & $MBTitle & '", "' & $MBText & '"' & ')'
        Local $MBLine5 = '            ControlMove("' & $MBTitle & '", "' & $MBText & '"' & ', "", ' & $MBxPos & ', ' & $MByPos & ')'
        Local $MBLine6 = '            $WinPos = WinGetPos("' & $MBTitle & '", "' & $MBText & '")'
        Local $MBLine7 = '            If IsArray($WinPos) And $WinPos[0] = ' & $MBxPos & ' And $WinPos[1] = ' & $MByPos & ' Then Exit'
        Local $MBLine8 = '        WEnd'
        Local $MBLine9 = '    EndIf'
        Local $MBLine10 = 'WEnd'
        FileWrite($MBFile, $MBLine1 & @CRLF & _
                $MBLine2 & @CRLF & _
                $MBLine3 & @CRLF & _
                $MBLine4 & @CRLF & _
                $MBLine5 & @CRLF & _
                $MBLine6 & @CRLF & _
                $MBLine7 & @CRLF & _
                $MBLine8 & @CRLF & _
                $MBLine9 & @CRLF & _
                $MBLine10)
        FileClose($MBFile)
       
        Local $MsgBoxLine1 = '#NoTrayIcon'
        Local $MsgBoxLine2 = '$MsgBoxValue = MsgBox(' & $MBFlag & ', ''' & $MBTitle & ''', ''' & $MBText & ''', ''' & $MBTimeOut & ''')'
        Local $MsgBoxLine3 = 'ConsoleWrite(' & "'MsgBoxSays'" & ' & $MsgBoxValue & ' & "'Return'" & ')'
        FileWrite($MBFile2, $MsgBoxLine1 & @CRLF & $MsgBoxLine2 & @CRLF & $MsgBoxLine3)
        FileClose($MBFile2)
    EndIf
   
    $MBPID1 = Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MiscMMB.txt")
    $MBPID2 = Run(@AutoItExe & ' /AutoIt3ExecuteScript ' & EnvGet("temp") & "\MiscMMB2.txt", @WorkingDir, 0, 6)
   
    WinWait($MBTitle, $MBText, 60)
    While (Not FileDelete(EnvGet("temp") & "\MiscMMB.txt") Or Not FileDelete(EnvGet("temp") & "\MiscMMB2.txt"))
        Sleep(10)
    WEnd
   
    If $MBContinue Then
        While 1
            $StdOutReadValue = StdoutRead($MBPID2)
            If StringInStr($StdOutReadValue, 'MsgBoxSays') Then
                $a_Array = StringRegExp($StdOutReadValue, '(?:MsgBoxSays)(.*?)(?:Return)', 3)
                If Not @error Then Return $a_Array[0]
                Return 0
            EndIf
            Sleep(10)
        WEnd
    EndIf
    Return 0
EndFunc   ;==>_MoveMsgBox

SmOke_N · October 24, 2006

so... no way to make it randomly choose place on the screen eh? Or at least set places?

Did you try what Paulie showed you?

CODE

While 1

$xpos = Random(0, (@DeskTopWidth - 200), 1)

$ypos = Random(0, (@DeskTopHeight - 100), 1)

If _MoveMsgBox(68, "Testing Move MsgBox", 'Would you like to continue?' & @CRLF & _

'If you would like to continue click Yes, otherwise press No', 0, $xpos, $ypos, 1) = 7 Then ExitLoop

WEnd

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $MBTimeOut, $MBxPos, $MByPos, $MBContinue = 0)

Local $MBFile = FileOpen(EnvGet("temp") & "\MiscMMB.txt", 2)

Local $MBFile2 = FileOpen(EnvGet("temp") & "\MiscMMB2.txt", 2)

If $MBFile = -1 Or $MBFile2 = -1 Then Return 0

Local $LineDelimter = '', $MBPID1 = '', $MBPID2 = ''

If UBound(StringSplit($MBText, @CRLF, 1)) - 2 > 0 Then

$LineDelimter = @CRLF

ElseIf UBound(StringSplit($MBText, @CR, 1)) - 2 > 0 Then

$LineDelimter = @CR

ElseIf UBound(StringSplit($MBText, @LF, 1)) - 2 > 0 Then

$LineDelimter = @LF

EndIf

Local $SSpMB = StringSplit($MBText, $LineDelimter, 1)

If UBound($SSpMB) - 2 > 0 And $LineDelimter <> '' Then

Local $MBLine1 = '#NoTrayIcon'

FileWriteLine($MBFile, $MBLine1)

$MsgBoxLine1 = '#NoTrayIcon'

FileWriteLine($MBFile2, $MsgBoxLine1)

Local $MsgBoxLine[uBound($SSpMB)]

Local $LinesToShow = ''

For $iCount = 1 To UBound($SSpMB) - 1

FileWriteLine($MBFile, '$MsgBoxLine' & $iCount & ' = "' & $SSpMB[$iCount] & '"')

FileWriteLine($MBFile2, '$MsgBoxLine' & $iCount & ' = "' & $SSpMB[$iCount] & '"')

If $iCount < UBound($SSpMB) - 1 Then

$LinesToShow &= '$MsgBoxLine' & $iCount & ' & @CRLF & '

Else

$LinesToShow &= '$MsgBoxLine' & $iCount

EndIf

Local $MBLine3 = ' If WinExists("' & $MBTitle & '", ' & '$MsgBoxLine1' & ') Then'

Local $MBLine4 = ' While WinExists("' & $MBTitle & '", ' & '$MsgBoxLine1' & ')'

Local $MBLine5 = ' ControlMove("' & $MBTitle & '", ' & '$MsgBoxLine1' & ', "", ' & $MBxPos & ', ' & $MByPos & ')'

Local $MBLine6 = ' $WinPos = WinGetPos("' & $MBTitle & '", ' & '$MsgBoxLine1' & ')'

Local $MBLine7 = ' If IsArray($WinPos) And $WinPos[0] = ' & $MBxPos & ' And $WinPos[1] = ' & $MByPos & ' Then Exit'

Local $MBLine8 = ' WEnd'

Local $MBLine9 = ' EndIf'

Local $MBLine10 = 'WEnd'

FileWrite($MBFile, '$LinesToShow = ' & $LinesToShow & @CRLF & _

$MBLine2 & @CRLF & _

$MBLine3 & @CRLF & _

$MBLine4 & @CRLF & _

$MBLine5 & @CRLF & _

$MBLine6 & @CRLF & _

$MBLine7 & @CRLF & _

$MBLine8 & @CRLF & _

$MBLine9 & @CRLF & _

$MBLine10)

FileWriteLine($MBFile2, '$LinesToShow = ' & $LinesToShow)

Local $MsgBoxLine2 = '$MsgBoxValue = MsgBox(' & $MBFlag & ', ''' & $MBTitle & ''', ' & '$LinesToShow' & ', ''' & $MBTimeOut & ''')'

Local $MsgBoxLine3 = 'ConsoleWrite(' & "'MsgBoxSays'" & ' & $MsgBoxValue & ' & "'Return'" & ')'

FileWriteLine($MBFile2, $MsgBoxLine2 & @CRLF & $MsgBoxLine3)

FileClose($MBFile)

FileClose($MBFile2)

Else

Local $MBLine1 = '#NoTrayIcon'

;Local $MBLine3 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'

Local $MBLine2 = 'While 1'

Local $MBLine3 = ' If WinExists("' & $MBTitle & '", "' & $MBText & '"' & ') Then'

Local $MBLine4 = ' While WinExists("' & $MBTitle & '", "' & $MBText & '"' & ')'

Local $MBLine5 = ' ControlMove("' & $MBTitle & '", "' & $MBText & '"' & ', "", ' & $MBxPos & ', ' & $MByPos & ')'

Local $MBLine6 = ' $WinPos = WinGetPos("' & $MBTitle & '", "' & $MBText & '")'

Local $MBLine7 = ' If IsArray($WinPos) And $WinPos[0] = ' & $MBxPos & ' And $WinPos[1] = ' & $MByPos & ' Then Exit'

Local $MBLine8 = ' WEnd'

Local $MBLine9 = ' EndIf'

Local $MBLine10 = 'WEnd'

FileWrite($MBFile, $MBLine1 & @CRLF & _

$MBLine2 & @CRLF & _

$MBLine3 & @CRLF & _

$MBLine4 & @CRLF & _

$MBLine5 & @CRLF & _

$MBLine6 & @CRLF & _

$MBLine7 & @CRLF & _

$MBLine8 & @CRLF & _

$MBLine9 & @CRLF & _

$MBLine10)

FileClose($MBFile)

Local $MsgBoxLine1 = '#NoTrayIcon'

Local $MsgBoxLine2 = '$MsgBoxValue = MsgBox(' & $MBFlag & ', ''' & $MBTitle & ''', ''' & $MBText & ''', ''' & $MBTimeOut & ''')'

Local $MsgBoxLine3 = 'ConsoleWrite(' & "'MsgBoxSays'" & ' & $MsgBoxValue & ' & "'Return'" & ')'

FileWrite($MBFile2, $MsgBoxLine1 & @CRLF & $MsgBoxLine2 & @CRLF & $MsgBoxLine3)

FileClose($MBFile2)

EndIf

$MBPID1 = Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MiscMMB.txt")

$MBPID2 = Run(@AutoItExe & ' /AutoIt3ExecuteScript ' & EnvGet("temp") & "\MiscMMB2.txt", @WorkingDir, 0, 6)

WinWait($MBTitle, $MBText, 60)

While (Not FileDelete(EnvGet("temp") & "\MiscMMB.txt") Or Not FileDelete(EnvGet("temp") & "\MiscMMB2.txt"))

Sleep(10)

WEnd

If $MBContinue Then

While 1

$StdOutReadValue = StdoutRead($MBPID2)

If StringInStr($StdOutReadValue, 'MsgBoxSays') Then

$a_Array = StringRegExp($StdOutReadValue, '(?:MsgBoxSays)(.*?)(?:Return)', 3)

If Not @error Then Return $a_Array[0]

Return 0

EndIf

Sleep(10)

WEnd

EndIf

Return 0

EndFunc ;==>_MoveMsgBox

Edit:

Changed to codebox

Edited October 24, 2006 by SmOke_N

lm1 · October 24, 2006

like i said i am new to autoit, that whole script is making me go cross-eyed.:s

SmOke_N · October 24, 2006

like i said i am new to autoit, that whole script is making me go cross-eyed.:s

Copy the script into a new.au3 file, and run it from within scite. You don't need to concern yourself with the UDF of the function, you just need to include it. Then treat the call to it _MoveMsgBox() just like you would with a regular msgbox but with the x and y coords.

Just look at the first 5 or 6 lines of pasted code to see how to make it run.

herewasplato · October 24, 2006

Copy the script into a new.au3 file, and run it from within scite...

You might warn a person new to the forum that copy/paste from a codebox might not work if using IE. FYI - IE7 still has this problem. Firefox 2 does not.

herewasplato · October 24, 2006

@ Paulie and thatsgreat2345,

lm1 is new to AutoIt and there is no exitloop in this version of the code.

Do
;<snipped>
Until 2= 1
;<snipped>

You must kill it manually? :-)

@lm1,

Welcome!

Edit added Paulie

Edited October 24, 2006 by herewasplato

SmOke_N · October 24, 2006

You might warn a person new to the forum that copy/paste from a codebox might not work if using IE. FYI - IE7 still has this problem. Firefox 2 does not.

That's true, should be a warning in the header of codebox lol.

If think most copy it to word if they have issues, but don't quote me on it, I won't open IE to find out :whistle:

Thatsgreat2345 · October 24, 2006

@ Paulie and thatsgreat2345,
lm1 is new to AutoIt and there is no exitloop in this version of the code.
Do
;<snipped>
Until 2= 1
;<snipped>
You must kill it manually? :-)
@lm1,
Welcome!
Edit added Paulie

didnt even look at the script just copied paulies :whistle:

herewasplato · October 24, 2006

didnt even look at the script just copied paulies

Silly me, I actually ran that code... and ran it... and ran it... and ran it... and ran it... then I noticed that Until line.

Probably not SmOke_N's version :-)

He has an exitloop.

msgboxes

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members