Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
- Loading branch information
1 parent
b20df8b
commit 0553071
Showing
137 changed files
with
17,582 additions
and
10,831 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,36 @@ | ||
#Region ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
#AutoIt3Wrapper_UseUpx=n | ||
;#AutoIt3Wrapper_Run_AU3Check=n | ||
#AutoIt3Wrapper_Run_Before=ShowOriginalLine.exe %in% | ||
#AutoIt3Wrapper_Run_After=ShowOriginalLine.exe %in% | ||
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
|
||
#include "./_AutoItErrorTrap.au3" | ||
|
||
If Not @Compiled Then | ||
; MsgBox(4096, "Note:", "You need to compile first!") | ||
; Exit | ||
EndIf | ||
|
||
; Custom title and text... | ||
_AutoItErrorTrap("AutoItErrorTrap", "Hi!" & @CRLF & @CRLF & "An error was detected in the program, you can try again," & _ | ||
" cancel to exit or continue to see more details of the error." & @CRLF & @CRLF & "Sorry for the inconvenience!") | ||
|
||
_Example() | ||
|
||
Func _Example() | ||
Local $asArray[4] = ["JScript", "Jonatas", "AutoIt", "Brasil"] | ||
|
||
Local $iOption = MsgBox(262180, "Error detection test!", "Hi!" & @CRLF & @CRLF & "Let's try to catch the AutoIt error window?" & _ | ||
@CRLF & @CRLF & "Answer [Yes] to generate an array error, [No] to exit...") | ||
Select | ||
Case $iOption = 6 ;Yes | ||
; Error in array value! | ||
MsgBox(4096, "Erro!", $asArray[5]) | ||
|
||
Case $iOption = 7 ;No | ||
Exit | ||
Case Else | ||
Exit | ||
EndSelect | ||
EndFunc ;==>_Example |
Binary file not shown.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,31 @@ | ||
#Region ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
#AutoIt3Wrapper_UseUpx=n | ||
#AutoIt3Wrapper_Run_AU3Check=n | ||
#AutoIt3Wrapper_Run_Before=ShowOriginalLine.exe %in% | ||
#AutoIt3Wrapper_Run_After=ShowOriginalLine.exe %in% | ||
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
|
||
#include "_AutoItErrorTrap.au3" | ||
|
||
If Not @Compiled Then | ||
MsgBox(4096, "Note:", "You need to compile first!") | ||
Exit | ||
EndIf | ||
|
||
; Default messages... | ||
_AutoItErrorTrap() | ||
|
||
_Example() | ||
|
||
Func _Example() | ||
Local $iOption = MsgBox(262180, "Error detection test!", "Hi!" & @CRLF & @CRLF & "Let's try to catch the AutoIt error window?" & _ | ||
@CRLF & @CRLF & "Answer [Yes] to generate an syntaxe error, [No] to exit...") | ||
Select | ||
Case $iOption = 6 ;Yes | ||
; Sybtaxe error |LoL|! | ||
MsgBox(4096, "Erro!",) | ||
|
||
Case $iOption = 7 ;No | ||
Exit | ||
EndSelect | ||
EndFunc ;==>_Example |
Binary file not shown.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,22 @@ | ||
#AutoIt3Wrapper_Change2CUI=y | ||
#Region ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
#AutoIt3Wrapper_UseUpx=n | ||
#AutoIt3Wrapper_Run_AU3Check=n | ||
#AutoIt3Wrapper_Run_Before=ShowOriginalLine.exe %in% | ||
#AutoIt3Wrapper_Run_After=ShowOriginalLine.exe %in% | ||
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
|
||
#include <_AutoItErrorTrap.au3> | ||
|
||
If Not @Compiled Then | ||
MsgBox(4096, "Note:", "You need to compile first!") | ||
Exit | ||
EndIf | ||
|
||
; Default messages... | ||
_AutoItErrorTrap() | ||
|
||
ConsoleWrite("Hello CMD world!" & @CRLF) | ||
ConsoleWrite("Wait..." & @CRLF) | ||
Sleep(1000) | ||
ConsoleWrite("Variable error:" & $sVar & @CRLF) |
Binary file not shown.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,92 @@ | ||
#Region ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
#AutoIt3Wrapper_UseUpx=n | ||
#AutoIt3Wrapper_Run_AU3Check=n | ||
#AutoIt3Wrapper_Run_Before=ShowOriginalLine.exe %in% | ||
#AutoIt3Wrapper_Run_After=ShowOriginalLine.exe %in% | ||
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
|
||
; Skip Global and Local variables. | ||
#ShowOriginalLine_Param=/SV | ||
|
||
#include <GUIConstantsEx.au3> | ||
#include <StaticConstants.au3> | ||
|
||
#include "_AutoItErrorTrap.au3" | ||
|
||
#ShowLine_Off | ||
If Not @Compiled Then | ||
MsgBox(4096, "Note:", "You need to compile first!") | ||
Exit | ||
EndIf | ||
|
||
; Default messages. | ||
_AutoItErrorTrap() | ||
|
||
_Example() | ||
#ShowLine_On | ||
|
||
Func _Example() | ||
Local $hForm, $iOption, $sDefaultStatus = "Ready", $iFileMenu, $iFileItem | ||
Local $iHelpMenu, $iInfoItem, $iExitItem, $iRecentFilesMenu, $iViewMenu | ||
Local $iViewStatusItem, $iStatusLabel, $sFileName | ||
Local $asArray[4] = ["JScript", "Jonatas", "AutoIt", "Brasil"] | ||
|
||
#ShowLine_Off | ||
$hForm = GUICreate("My GUI menu", 480, 360) | ||
|
||
$iFileMenu = GUICtrlCreateMenu("&File") | ||
$iFileItem = GUICtrlCreateMenuItem("Open", $iFileMenu) | ||
GUICtrlSetState(-1, $GUI_DEFBUTTON) | ||
$iHelpMenu = GUICtrlCreateMenu("?") | ||
GUICtrlCreateMenuItem("Save", $iFileMenu) | ||
GUICtrlSetState(-1, $GUI_DISABLE) | ||
$iInfoItem = GUICtrlCreateMenuItem("Info", $iHelpMenu) | ||
$iExitItem = GUICtrlCreateMenuItem("Exit", $iFileMenu) | ||
$iRecentFilesMenu = GUICtrlCreateMenu("Recent Files", $iFileMenu, 1) | ||
|
||
GUICtrlCreateMenuItem("", $iFileMenu, 2) ; create a separator line | ||
|
||
$iViewMenu = GUICtrlCreateMenu("View", -1, 1) ; is created before "?" menu | ||
$iViewStatusItem = GUICtrlCreateMenuItem("Statusbar", $iViewMenu) | ||
GUICtrlSetState(-1, $GUI_CHECKED) | ||
|
||
$iStatusLabel = GUICtrlCreateLabel($sDefaultStatus, 0, 325, 480, 16, BitOR($SS_SIMPLE, $SS_SUNKEN)) | ||
|
||
GUISetState() | ||
|
||
$iOption = MsgBox(262180, "Error detection test!", "Hi!" & @CRLF & @CRLF & "Let's try to catch the AutoIt error window?" & _ | ||
@CRLF & @CRLF & "Answer [Yes] to generate an array error, [No] to exit...") | ||
#ShowLine_On | ||
|
||
Select | ||
Case $iOption = 6 ;Yes | ||
; Error in array value! | ||
For $i = 1 To 5 | ||
GUICtrlSetData($iStatusLabel, $asArray[$i]) | ||
Next | ||
Case $iOption = 7 ;No | ||
; | ||
EndSelect | ||
|
||
#ShowLine_Off | ||
While 1 | ||
Switch GUIGetMsg() | ||
Case $GUI_EVENT_CLOSE, $iExitItem | ||
Exit | ||
Case $iInfoItem | ||
MsgBox(4096, "Info", "Only a test...", 0, $hForm) | ||
Case $iFileItem | ||
$sFileName = FileOpenDialog("Choose file...", @TempDir, "All (*.*)") | ||
If @error <> 1 Then GUICtrlCreateMenuItem($sFileName, $iRecentFilesMenu) | ||
Case $iViewStatusItem | ||
If BitAND(GUICtrlRead($iViewStatusItem), $GUI_CHECKED) = $GUI_CHECKED Then | ||
GUICtrlSetState($iViewStatusItem, $GUI_UNCHECKED) | ||
GUICtrlSetState($iStatusLabel, $GUI_HIDE) | ||
Else | ||
GUICtrlSetState($iViewStatusItem, $GUI_CHECKED) | ||
GUICtrlSetState($iStatusLabel, $GUI_SHOW) | ||
EndIf | ||
EndSwitch | ||
WEnd | ||
#ShowLine_On | ||
EndFunc ;==>_Example |
Binary file not shown.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,25 @@ | ||
#Region ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
#AutoIt3Wrapper_UseUpx=n | ||
#AutoIt3Wrapper_Run_AU3Check=n | ||
#AutoIt3Wrapper_Run_Before=ShowOriginalLine.exe %in% | ||
#AutoIt3Wrapper_Run_After=ShowOriginalLine.exe %in% | ||
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** | ||
|
||
; Skip Global and Local variables. | ||
#ShowOriginalLine_Param=/SV | ||
|
||
#include "_AutoItErrorTrap.au3" | ||
|
||
; Default messages. | ||
_AutoItErrorTrap("", "", False) ; Will use "StdOut" to read the error, but will not be compatible with CUI application! | ||
|
||
Global $iToolTip = 0 | ||
|
||
_Recursion() | ||
|
||
Func _Recursion() | ||
$iToolTip +=1 | ||
ToolTip("Recursion number: " & $iToolTip, Default, Default, "Recursion") | ||
;Sleep(10) | ||
Return _Recursion() | ||
EndFunc |
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Oops, something went wrong.