Msb12i Posted September 28, 2015 Share Posted September 28, 2015 (edited) Hi guy's,This is my second time I'm writing a script and this forum has a allot of smart guy's with helpfull hint en tricks. Learned allot since my first one. I've used the information and bit's and pieces of scripts found on this forum to suit my need. (If I would steal and commercialise them I would be Mark Zuckerberg)I would credit everyone but I didn't plan on asking help, so I didn't include the creator's name in my script. For that, I am sorry. Anyway I get the same error everytime => The strange thing is that if I extract everything under _Func Nodownload() into a seperate script, it runs like a sharm... According to the error, there is no Endfunc??? But as you can see there is an endfunc...Even entered EndFunc _check1ok() to see if EndFunc could search for the function it belongs to. No luck(hey I'm still a noob) Func _check1ok() $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\1.xls") EndFunc Can't seem to figure this out... If I delete func _check1ok () then it gives an error on Func _check2ok() (logicly because I copy, pasted them all ) expandcollapse popup#include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <StaticConstants.au3> #include <ProgressConstants.au3> #include <Excel.au3> #include <Misc.au3> #include <MsgBoxConstants.au3> If _Singleton("Downloader", 1) = 0 Then MsgBox($MB_SYSTEMMODAL, "Let op!", "Dit programma kan maar één keer geopend worden!") Exit EndIf Do $pass = InputBox ("Login", "Wachtwoord ingeven AUB","","*",175,120) If $pass <> "password" Then Exit EndIf Until $pass == "password" Opt("TrayMenuMode", 1) $Form1 = GUICreate("Downloader", 400, 170, -1, -1) $pb_File = GUICtrlCreateProgress(30, 30, 300, 20, $PBS_SMOOTH) $lbl_FilePercent = GUICtrlCreateLabel("0 %", 335, 32, 35, 16, $SS_RIGHT) $pb_Overall = GUICtrlCreateProgress(30, 80, 300, 20, $PBS_SMOOTH) $lbl_OverallPercent = GUICtrlCreateLabel("0 %", 335, 82, 35, 16, $SS_RIGHT) $but_Download = GUICtrlCreateButton("Download Starten", 45, 120, 125, 30) $but_Download2 = GUICtrlCreateButton("Download Overslaan", 195, 120, 125, 30) GUISetState(@SW_Show) While 1 $nMsg = GUIGetMsg() If $nMsg = $GUI_EVENT_CLOSE Then EXIT If $nMsg = $but_Download Then _Download() If $nMsg = $but_Download2 Then NoDownload() WEnd Func _Download() ; Disable the download button GUICtrlSetState($but_Download, $GUI_DISABLE) ; Reset total filesize to download $TotalToDownload = 0 Dim $DownloadArray[8][3] ; Setup the URL's to download $DownloadArray[1][0] = "link1" $DownloadArray[2][0] = "link2" $DownloadArray[3][0] = "link3" $DownloadArray[4][0] = "link4" For $i = 1 To UBound($DownloadArray)-1 ; Get the File size $FileSize = INetGetSize($DownloadArray[$i][0]) ; Current File Size $DownloadArray[$i][1] = $FileSize ; Cumulative Total $DownloadArray[$i][2] = $TotalToDownload ; Add the current file size to the total $TotalToDownload += $FileSize Next ; Do the Downloads For $i = 1 To UBound($DownloadArray)-1 ; Dow the download in the background $Download = INetGet($DownloadArray[$i][0], "C:\" & $i & ".XLS", 1, 1) ; Loop to update progress Do ; Get number of bytes read for current file $BytesDownloaded = INetGetInfo($Download, 0) ; Add this to the cumulative total $DownloadedSoFar = $DownloadArray[$i][2] + $BytesDownloaded ; Calculate the current file percentage $FileProgress = Floor(($BytesDownloaded / $DownloadArray[$i][1]) * 100) ; Calculate the overall percentage $OverallProgress = Floor(($DownloadedSoFar / $TotalToDownload) * 100) ; Update the Current FIle progress bar GUICtrlSetData($pb_File, $FileProgress) ; Only update the current file percent label if it has changed to avoid flickering If GUICtrlRead($lbl_FilePercent) <> $FileProgress & " %" Then GUICtrlSetData($lbl_FilePercent, $FileProgress & " %") ; Update the overall progress bar GUICtrlSetData($pb_Overall, $OverallProgress) ; Only update the overall file percent label if it has changed to avoid flickering If GUICtrlRead($lbl_OverallPercent) <> $OverallProgress & " %" Then GUICtrlSetData($lbl_OverallPercent, $OverallProgress & " %") ; Only update the title bar (overall) percent label if it has changed to avoid flickering If WinGetTitle($Form1, "") <> $OverallProgress & " % - Downloader" Then WinSetTitle($Form1, "", $OverallProgress & " % - Downloader") ; Continue loop until download is complete Until InetGetInfo($Download, 2) ; Set current file progress bar to 100% when complete GUICtrlSetData($pb_File, 100) ; Set current file percent label to 100% when complete GUICtrlSetData($lbl_FilePercent, "100 %") Next ; Set overall progress bar to 100% when complete GUICtrlSetData($pb_Overall, 100) ; Set overall percent label to 100% when complete GUICtrlSetData($lbl_OverallPercent, "100 %") ; Reset GUI WinSetTitle($Form1, "", "Downloader") GUICtrlSetData($pb_File, 0) GUICtrlSetData($lbl_FilePercent, "0 %") GUICtrlSetData($pb_Overall, 0) GUICtrlSetData($lbl_OverallPercent, "0 %") ; Enable the download button GUICtrlSetState($but_Download, $GUI_ENABLE) EndFunc Func _NoDownload() $hGUI = GUICreate("Cijfers", 130, 175) $hButton_1 = GUICtrlCreateButton("1", 10, 10, 110, 30) $hButton_2 = GUICtrlCreateButton("2", 10, 50, 110, 30) $hButton_3 = GUICtrlCreateButton("3", 10, 90, 110, 30) $hButton_4 = GUICtrlCreateButton("4", 10, 130, 110, 30) GUISetState() Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $hButton_1 If FileExists("C:\1.xls") Then _check1ok () Else MsgBox(4096, "1", "1 bestand is niet gedownload") EndIf Func _check1ok() $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\1.xls") EndFunc Case $hButton_2 If FileExists("C:\2.xls") Then _check2ok () Else MsgBox(4096, "2", "2 bestand is niet gedownload") EndIf Func _check2ok() $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\2.xls") EndFunc Case $hButton_3 If FileExists("C:\3.xls") Then _check3ok () Else MsgBox(4096, "3", "3 bestand is niet gedownload") EndIf Func _check3ok() $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\3.xls") EndFunc Case $hButton_4 If FileExists("C:\4.xls") Then _check4ok () Else MsgBox(4096, "4", "4 bestand is niet gedownload") EndIf Func _check4ok() $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\4.xls") EndFunc EndSwitch EndFunc Edited September 28, 2015 by Msb12i Link to comment Share on other sites More sharing options...
Moderators Melba23 Posted September 28, 2015 Moderators Share Posted September 28, 2015 Msb12i,Move the smaller functions outside the _NoDownload function - you cannot declare functions inside another.M23 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 Link to comment Share on other sites More sharing options...
Msb12i Posted September 28, 2015 Author Share Posted September 28, 2015 Msb12i,Move the smaller functions outside the _NoDownload function - you cannot declare functions inside another.M23 Tnx for the reply,I deleted the func inside _nodownload but then I loose the notification that the file does not exists. Because my Then command cannot find the _check1ok command. If FileExists("C:\1.xls") Then _check1ok ()Is there another command that I missed that can help my Then command execute the:$oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\1.xls") Link to comment Share on other sites More sharing options...
JohnOne Posted September 28, 2015 Share Posted September 28, 2015 You need to move the function, not delete it.Show new code with any further questions. AutoIt Absolute Beginners Require a serial Pause Script Video Tutorials by Morthawt ipify Monkey's are, like, natures humans. Link to comment Share on other sites More sharing options...
Moderators Melba23 Posted September 28, 2015 Moderators Share Posted September 28, 2015 Msb12i,I did not say "delete" the function, I said "move" it. Try this:expandcollapse popup#include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <StaticConstants.au3> #include <ProgressConstants.au3> #include <Excel.au3> #include <Misc.au3> #include <MsgBoxConstants.au3> If _Singleton("Downloader", 1) = 0 Then MsgBox($MB_SYSTEMMODAL, "Let op!", "Dit programma kan maar één keer geopend worden!") Exit EndIf Do $pass = InputBox("Login", "Wachtwoord ingeven AUB", "", "*", 175, 120) If $pass <> "password" Then Exit EndIf Until $pass == "password" Opt("TrayMenuMode", 1) $Form1 = GUICreate("Downloader", 400, 170, -1, -1) $pb_File = GUICtrlCreateProgress(30, 30, 300, 20, $PBS_SMOOTH) $lbl_FilePercent = GUICtrlCreateLabel("0 %", 335, 32, 35, 16, $SS_RIGHT) $pb_Overall = GUICtrlCreateProgress(30, 80, 300, 20, $PBS_SMOOTH) $lbl_OverallPercent = GUICtrlCreateLabel("0 %", 335, 82, 35, 16, $SS_RIGHT) $but_Download = GUICtrlCreateButton("Download Starten", 45, 120, 125, 30) $but_Download2 = GUICtrlCreateButton("Download Overslaan", 195, 120, 125, 30) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() If $nMsg = $GUI_EVENT_CLOSE Then Exit If $nMsg = $but_Download Then _Download() If $nMsg = $but_Download2 Then _NoDownload() WEnd Func _Download() ; Disable the download button GUICtrlSetState($but_Download, $GUI_DISABLE) ; Reset total filesize to download $TotalToDownload = 0 Dim $DownloadArray[8][3] ; Setup the URL's to download $DownloadArray[1][0] = "link1" $DownloadArray[2][0] = "link2" $DownloadArray[3][0] = "link3" $DownloadArray[4][0] = "link4" For $i = 1 To UBound($DownloadArray) - 1 ; Get the File size $FileSize = InetGetSize($DownloadArray[$i][0]) ; Current File Size $DownloadArray[$i][1] = $FileSize ; Cumulative Total $DownloadArray[$i][2] = $TotalToDownload ; Add the current file size to the total $TotalToDownload += $FileSize Next ; Do the Downloads For $i = 1 To UBound($DownloadArray) - 1 ; Dow the download in the background $Download = InetGet($DownloadArray[$i][0], "C:\" & $i & ".XLS", 1, 1) ; Loop to update progress Do ; Get number of bytes read for current file $BytesDownloaded = InetGetInfo($Download, 0) ; Add this to the cumulative total $DownloadedSoFar = $DownloadArray[$i][2] + $BytesDownloaded ; Calculate the current file percentage $FileProgress = Floor(($BytesDownloaded / $DownloadArray[$i][1]) * 100) ; Calculate the overall percentage $OverallProgress = Floor(($DownloadedSoFar / $TotalToDownload) * 100) ; Update the Current FIle progress bar GUICtrlSetData($pb_File, $FileProgress) ; Only update the current file percent label if it has changed to avoid flickering If GUICtrlRead($lbl_FilePercent) <> $FileProgress & " %" Then GUICtrlSetData($lbl_FilePercent, $FileProgress & " %") ; Update the overall progress bar GUICtrlSetData($pb_Overall, $OverallProgress) ; Only update the overall file percent label if it has changed to avoid flickering If GUICtrlRead($lbl_OverallPercent) <> $OverallProgress & " %" Then GUICtrlSetData($lbl_OverallPercent, $OverallProgress & " %") ; Only update the title bar (overall) percent label if it has changed to avoid flickering If WinGetTitle($Form1, "") <> $OverallProgress & " % - Downloader" Then WinSetTitle($Form1, "", $OverallProgress & " % - Downloader") ; Continue loop until download is complete Until InetGetInfo($Download, 2) ; Set current file progress bar to 100% when complete GUICtrlSetData($pb_File, 100) ; Set current file percent label to 100% when complete GUICtrlSetData($lbl_FilePercent, "100 %") Next ; Set overall progress bar to 100% when complete GUICtrlSetData($pb_Overall, 100) ; Set overall percent label to 100% when complete GUICtrlSetData($lbl_OverallPercent, "100 %") ; Reset GUI WinSetTitle($Form1, "", "Downloader") GUICtrlSetData($pb_File, 0) GUICtrlSetData($lbl_FilePercent, "0 %") GUICtrlSetData($pb_Overall, 0) GUICtrlSetData($lbl_OverallPercent, "0 %") ; Enable the download button GUICtrlSetState($but_Download, $GUI_ENABLE) EndFunc ;==>_Download Func _NoDownload() $hGUI = GUICreate("Cijfers", 130, 175) $hButton_1 = GUICtrlCreateButton("1", 10, 10, 110, 30) $hButton_2 = GUICtrlCreateButton("2", 10, 50, 110, 30) $hButton_3 = GUICtrlCreateButton("3", 10, 90, 110, 30) $hButton_4 = GUICtrlCreateButton("4", 10, 130, 110, 30) GUISetState() Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $hButton_1 If FileExists("C:\1.xls") Then _check1ok() Else MsgBox(4096, "1", "1 bestand is niet gedownload") EndIf Case $hButton_2 If FileExists("C:\2.xls") Then _check2ok() Else MsgBox(4096, "2", "2 bestand is niet gedownload") EndIf Case $hButton_3 If FileExists("C:\3.xls") Then _check3ok() Else MsgBox(4096, "3", "3 bestand is niet gedownload") EndIf Case $hButton_4 If FileExists("C:\4.xls") Then _check4ok() Else MsgBox(4096, "4", "4 bestand is niet gedownload") EndIf EndSwitch EndFunc ;==>_NoDownload Func _check1ok() $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\1.xls") EndFunc ;==>_check1ok Func _check2ok() $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\2.xls") EndFunc ;==>_check2ok Func _check3ok() $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\3.xls") EndFunc ;==>_check3ok Func _check4ok() $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\4.xls") EndFunc ;==>_check4okM23 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 Link to comment Share on other sites More sharing options...
Msb12i Posted September 28, 2015 Author Share Posted September 28, 2015 (edited) Msb12i,I did not say "delete" the function, I said "move" it. Try this:expandcollapse popup#include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <StaticConstants.au3> #include <ProgressConstants.au3> #include <Excel.au3> #include <Misc.au3> #include <MsgBoxConstants.au3> If _Singleton("Downloader", 1) = 0 Then MsgBox($MB_SYSTEMMODAL, "Let op!", "Dit programma kan maar één keer geopend worden!") Exit EndIf Do $pass = InputBox("Login", "Wachtwoord ingeven AUB", "", "*", 175, 120) If $pass <> "password" Then Exit EndIf Until $pass == "password" Opt("TrayMenuMode", 1) $Form1 = GUICreate("Downloader", 400, 170, -1, -1) $pb_File = GUICtrlCreateProgress(30, 30, 300, 20, $PBS_SMOOTH) $lbl_FilePercent = GUICtrlCreateLabel("0 %", 335, 32, 35, 16, $SS_RIGHT) $pb_Overall = GUICtrlCreateProgress(30, 80, 300, 20, $PBS_SMOOTH) $lbl_OverallPercent = GUICtrlCreateLabel("0 %", 335, 82, 35, 16, $SS_RIGHT) $but_Download = GUICtrlCreateButton("Download Starten", 45, 120, 125, 30) $but_Download2 = GUICtrlCreateButton("Download Overslaan", 195, 120, 125, 30) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() If $nMsg = $GUI_EVENT_CLOSE Then Exit If $nMsg = $but_Download Then _Download() If $nMsg = $but_Download2 Then _NoDownload() WEnd Func _Download() ; Disable the download button GUICtrlSetState($but_Download, $GUI_DISABLE) ; Reset total filesize to download $TotalToDownload = 0 Dim $DownloadArray[8][3] ; Setup the URL's to download $DownloadArray[1][0] = "link1" $DownloadArray[2][0] = "link2" $DownloadArray[3][0] = "link3" $DownloadArray[4][0] = "link4" For $i = 1 To UBound($DownloadArray) - 1 ; Get the File size $FileSize = InetGetSize($DownloadArray[$i][0]) ; Current File Size $DownloadArray[$i][1] = $FileSize ; Cumulative Total $DownloadArray[$i][2] = $TotalToDownload ; Add the current file size to the total $TotalToDownload += $FileSize Next ; Do the Downloads For $i = 1 To UBound($DownloadArray) - 1 ; Dow the download in the background $Download = InetGet($DownloadArray[$i][0], "C:\" & $i & ".XLS", 1, 1) ; Loop to update progress Do ; Get number of bytes read for current file $BytesDownloaded = InetGetInfo($Download, 0) ; Add this to the cumulative total $DownloadedSoFar = $DownloadArray[$i][2] + $BytesDownloaded ; Calculate the current file percentage $FileProgress = Floor(($BytesDownloaded / $DownloadArray[$i][1]) * 100) ; Calculate the overall percentage $OverallProgress = Floor(($DownloadedSoFar / $TotalToDownload) * 100) ; Update the Current FIle progress bar GUICtrlSetData($pb_File, $FileProgress) ; Only update the current file percent label if it has changed to avoid flickering If GUICtrlRead($lbl_FilePercent) <> $FileProgress & " %" Then GUICtrlSetData($lbl_FilePercent, $FileProgress & " %") ; Update the overall progress bar GUICtrlSetData($pb_Overall, $OverallProgress) ; Only update the overall file percent label if it has changed to avoid flickering If GUICtrlRead($lbl_OverallPercent) <> $OverallProgress & " %" Then GUICtrlSetData($lbl_OverallPercent, $OverallProgress & " %") ; Only update the title bar (overall) percent label if it has changed to avoid flickering If WinGetTitle($Form1, "") <> $OverallProgress & " % - Downloader" Then WinSetTitle($Form1, "", $OverallProgress & " % - Downloader") ; Continue loop until download is complete Until InetGetInfo($Download, 2) ; Set current file progress bar to 100% when complete GUICtrlSetData($pb_File, 100) ; Set current file percent label to 100% when complete GUICtrlSetData($lbl_FilePercent, "100 %") Next ; Set overall progress bar to 100% when complete GUICtrlSetData($pb_Overall, 100) ; Set overall percent label to 100% when complete GUICtrlSetData($lbl_OverallPercent, "100 %") ; Reset GUI WinSetTitle($Form1, "", "Downloader") GUICtrlSetData($pb_File, 0) GUICtrlSetData($lbl_FilePercent, "0 %") GUICtrlSetData($pb_Overall, 0) GUICtrlSetData($lbl_OverallPercent, "0 %") ; Enable the download button GUICtrlSetState($but_Download, $GUI_ENABLE) EndFunc ;==>_Download Func _NoDownload() $hGUI = GUICreate("Cijfers", 130, 175) $hButton_1 = GUICtrlCreateButton("1", 10, 10, 110, 30) $hButton_2 = GUICtrlCreateButton("2", 10, 50, 110, 30) $hButton_3 = GUICtrlCreateButton("3", 10, 90, 110, 30) $hButton_4 = GUICtrlCreateButton("4", 10, 130, 110, 30) GUISetState() Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $hButton_1 If FileExists("C:\1.xls") Then _check1ok() Else MsgBox(4096, "1", "1 bestand is niet gedownload") EndIf Case $hButton_2 If FileExists("C:\2.xls") Then _check2ok() Else MsgBox(4096, "2", "2 bestand is niet gedownload") EndIf Case $hButton_3 If FileExists("C:\3.xls") Then _check3ok() Else MsgBox(4096, "3", "3 bestand is niet gedownload") EndIf Case $hButton_4 If FileExists("C:\4.xls") Then _check4ok() Else MsgBox(4096, "4", "4 bestand is niet gedownload") EndIf EndSwitch EndFunc ;==>_NoDownload Func _check1ok() $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\1.xls") EndFunc ;==>_check1ok Func _check2ok() $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\2.xls") EndFunc ;==>_check2ok Func _check3ok() $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\3.xls") EndFunc ;==>_check3ok Func _check4ok() $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\4.xls") EndFunc ;==>_check4okM23OMG I feel so dumb.. Case $hButton_1 If FileExists("C:\1.xls") Then $oExcel = ObjCreate("Excel.Application") $oExcel.Visible = 1 $oExcel.WorkBooks.Open("C:\1.xls") If Not FileExists ("C:\1.xls") Then MsgBox(4096, "1", "1 bestand is niet gedownload") EndIfThis was I was trying to do So every func I define is usable in the whole script? I was looking for a solution since yesterday. In my next script I promised myself I will use the green explanation text, because I was kinda lost in my own script. Edited September 28, 2015 by Msb12i Link to comment Share on other sites More sharing options...
Moderators Melba23 Posted September 28, 2015 Moderators Share Posted September 28, 2015 Msb12i,So every func I define is usable in the whole script?Yes. I promised myself I will use the green explanation text, because I was kinda lost in my own scriptA very good idea!M23P.S. When you reply, please use the "Reply to this topic" button at the top of the thread or the "Reply to this topic" editor at the bottom rather than the "Quote" button - we know what we wrote and it just pads the thread unnecessarily. 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 Link to comment Share on other sites More sharing options...
Msb12i Posted September 29, 2015 Author Share Posted September 29, 2015 Ok Melba23, I'll keep that in mind. Thats for bringing me one step closer to being a pro Autoit3 user Link to comment Share on other sites More sharing options...
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