Jump to content

Valuater

MVPs
  • Posts

    11,103
  • Joined

  • Last visited

  • Days Won

    3

Valuater last won the day on October 31 2018

Valuater had the most liked content!

3 Followers

About Valuater

  • Birthday January 1

Profile Information

  • Location
    Riverside, CA USA
  • Interests

    ... Thats Valuaters Style... 8)

Recent Profile Visitors

8,250 profile views

Valuater's Achievements

  1. On 1/18/2018 at 4:27 PM, xteo007 said: For suorce code of XProTec.au3 not obfusced ? The download file un-obfuscated is located here... 8)
  2. Here is a stab at making it happen... #include <GUIConstantsEx.au3> #include <ProgressConstants.au3> #include <WindowsConstants.au3> #include <StaticConstants.au3> #include <ColorConstants.au3> Global $x = 0 Example() Func Example() $hGUI = GUICreate("Progress Test", 220, 70) Global $Progress = GUICtrlCreateLabel("", 10, 10, $x, 20) GUICtrlSetBkColor(-1, $COLOR_GREEN) Global $Label = GUICtrlCreateLabel("Text", 60, 13, 100, 20, $SS_CENTER, $WS_EX_TOPMOST) GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT) Global $Button = GUICtrlCreateButton("Click Me!", 10, 40, 200, 20) GUISetState() While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $Button _SomeRandomFuncTriggeredByAnEvent() Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd EndFunc ;==>Example Func _SomeRandomFuncTriggeredByAnEvent() $x += 20 If $x >= 220 Then Return $t = $x / 2 GUICtrlSetPos($Progress, 10, 10, $x, 20) GUICtrlSetData($Label, $t & " Percent") EndFunc ;==>_SomeRandomFuncTriggeredByAnEvent   You created a great example to review your problem... I always find a way!!! Good Luck... 8)
  3. Just a quick look... $oClose = _IEGetObjByName ($oIE, "ct100$bodyPlaceholder$btnFecharProcessamento") should be in the loop... that way the name will change and you will get the correct results.. 8)
  4. I am not sure of the complete plan here... But this works... #include <Array.au3> Local $aArray_Base[10][3] For $i = 0 To 9 For $j = 0 To 2 $aArray_Base[$i][$j] = $i & " - " & $j Next Next _ArrayDisplay($aArray_Base, "2D - Original") ; Insert single item in defined column $aArray = $aArray_Base $aArray[0][2] = "True" ;_ArrayInsert($aArray, 0, "True", 2) ; <- I want to add this data to Row 0, Column 3 but retain the data in Columns_ and 1. _ArrayDisplay($aArray);, "2D - Defined column") 8)
  5. The sleep is very large.. It is not required to be that high (251) Typically I use (10) 8)
  6. Create the radio 20 x 20 ( maybe 15 x 15) and place a text line separately on the left 8)
  7. $all_wmp = @ProgramFilesDir & "\windows media player\wmlpayer.exe" If FileExists( $all_wmp) Then Run ($all_wmp) Else MsgBox (0, "ERROR", "The File was not found " & @crlf & $all_wmp) ; do something else... find file etc... EndIf Maybe... 8)
  8. Since you are using an ini file Dim $chemin = $dossier & "\data.ini" Why not use iniread /inireadsection /etc.. 8)
  9. Glad you know how to use Autoit code tags!! Can you please give us the completed demo script... with errors is ok 8)
  10. You are asking for if "App" exits twice... Try this Func _Click() If WinExists("App") Then GUISetState(@SW_SHOW, $hGUI) TrayItemSetText($hTray_Show_Item, "Hide") ElseIf Not WinExists("App") Then GUISetState(@SW_HIDE, $hGUI) TrayItemSetText($hTray_Show_Item, "Show") Else MsgBox(0, "ERROR", "The App Window was not found") EndIf EndFunc ;==>_Click NOT TESTED BTW: You should have started a new thread. 8)
  11. When I moved over any number on Scite... It showed the same on the screen capture screen. unlocked i5, 16 gig, ssd hd.
  12. Maybe... #include <MsgBoxConstants.au3> Example() Func Example() ; Places the input box in the top left corner displaying the characters as they ; are typed. Local $sAnswer = InputBox("Question", "Where were you born?", "Planet Earth", "", _ - 1, -1, 0, 0) ; Display the result. MsgBox($MB_SYSTEMMODAL, "", $sAnswer) ; Asks the user to enter a password. Don't forget to validate it! Local $sPasswd = InputBox("Security Check", "Enter your password.", "", "*") ; Display the result. MsgBox($MB_SYSTEMMODAL, "", $sPasswd) ; Asks the user to enter a 1 or 2 character response. The M in the password ; field indicates that empty string is not accepted and the 2 indicates that the ; responce will be at most 2 characters long. Local $sValue = InputBox("Testing", "Enter the 1 or 2 character code.", "", " M2") ; Display the result. MsgBox($MB_SYSTEMMODAL, "", $sValue) EndFunc ;==>Example 8)
  13. Thanks guys... and jguinch for the extra effort... and I do understand your concept... a little more difficult to implement than that single user password on each individual computer. I will cook this over more... Note: All computers are individual and are connected to a network printer. Thanks for the ideas!!!
×
×
  • Create New...