Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 07/07/2015 in all areas

  1. This UDF has been rewritten - the new version can be found here. ---------------------------------------------------------------------------------------------- [New version] - 28 Aug 16 Added: The UDF is now RTL sensitive. Thanks to shai for the request. New UDF and examples below. Details of previous versions: The GUIExtender UDF allows you to have multiple sections within your GUIs which can be either static or extendable. The extendable sections can be extended and retracted either by UDF created buttons or programmatically by other controls or HotKeys. The controls on the sections are fully functional and there is no overlap problem when retracted (see the details section if you want to know how). The UDF can be used in both MessageLoop and OnEvent modes and with both native and UDF created controls, as well as embedded objects and child GUIs. Details of how the UDF works for those who are interested: The UDF and plenty of commented examples are in the attached zip: As always, happy to receive brickbats or bouquets. M23
    1 point
  2. AutoItx does not allow the use of au3 UDFs.
    1 point
  3. You will have to write your own java code.
    1 point
  4. From my limited understanding of tesseract OCR, all AutoIt does is pass the executable some command line arguments. If Java can do that, which I'm quite sure it can, then I'm certain it will be fine.
    1 point
  5. So going back to what I said earlier and with the help of Melba23 posting the error, you might do something like... If @error = 420 Then FileDelete("decrypted.txt") ;deal with whatever you need to EndIf
    1 point
  6. jdelaney

    if statements

    I'm not following...but if you check all are true first, then if that's not the case, check the individual checks: If guictrlread($checkbox1) = $gui_checked And guictrlread($checkbox2) = $gui_checked And guictrlread($checkbox3) = $gui_checked Then Do Until False ElseIf Not guictrlread($checkbox1) = $gui_checked Then ElseIf Not guictrlread($checkbox2) = $gui_checked Then ElseIf Not guictrlread($checkbox3) = $gui_checked Then EndIfor I guess you can cover every permutation Local $checkbox1, $checkbox2, $checkbox3 If guictrlread($checkbox1) = $gui_checked And guictrlread($checkbox2) = $gui_checked And guictrlread($checkbox3) = $gui_checked Then ElseIf guictrlread($checkbox1) = $gui_checked And guictrlread($checkbox2) = $gui_checked Then ElseIf guictrlread($checkbox2) = $gui_checked And guictrlread($checkbox3) = $gui_checked Then ElseIf guictrlread($checkbox1) = $gui_checked And guictrlread($checkbox3) = $gui_checked Then ElseIf guictrlread($checkbox1) = $gui_checked Then ElseIf guictrlread($checkbox2) = $gui_checked Then ElseIf guictrlread($checkbox3) = $gui_checked Then EndIfsimplified $1 = (guictrlread($checkbox1) = $gui_checked) $2 = (guictrlread($checkbox2) = $gui_checked) $3 = (guictrlread($checkbox3) = $gui_checked) If $1 And $2 And $3 Then ElseIf $1 And $2 Then ElseIf $2 And $3 Then ElseIf $1 And $3 Then ElseIf $1 Then ElseIf $2 Then ElseIf $3 Then Else ConsoleWrite("All False" & @‌CRLF) EndIf; same as Select Case $1 And $2 And $3 Case $1 And $2 Case $2 And $3 Case $1 And $3 Case $1 Case $2 Case $3 Case Else EndSelect
    1 point
  7. maybe also look at _INetGetSource rather than using send, as send is super unreliable. If that captures the desired text then you could probably use dany's same syntax and do something like if StringInStr(_INetGetSource('URL'),'hello') then MsgBox(0,'','Hello world found')
    1 point
  8. Sure. Brewman The idea here is to select the server from the combobox. Then a WMI Query happens, populating some needed information to an array. (this part I have done) The point of my question is so that if I select a different server from the combo, a different array gets populated. That way, if I go back and select the first server, I can simply display the info rather than having to scan for it again
    1 point
  9. Arrays were not displaying for me. The following line under ";dynamic variable display" Return StringFormat('Execute(Dbug(%s, -7, Execute("%s"), IsDeclared("%s")))', $lnr, $var, StringTrimLeft($var,1))Was evaluating to: Execute(Dbug(48, -7, Execute("$arr1[2][4]"), IsDeclared("arr1[2][4]"))) "Execute("$arr1[2][4]")" would then be detected as a String within _Value() I have addressed this by checking and removing the square brackets. If StringLeft($var, 1) = "$" Then ;display variable     $bracket = StringInStr($var, "[")     if $bracket > 0 Then         $var = StringLeft($var, $bracket -1)     EndIf     Return StringFormat('Execute(Dbug(%s, -7, Execute("%s"), IsDeclared("%s")))', $lnr, $var, StringTrimLeft($var,1))Maybe there is a better way to fix this. Anyone else have this problem? Btw, for anyone interested I've attached some code that will let you place breakpoints within the margin (of scite) by clicking. Line numbers must be on. It's not perfect and open to improvements. Lastly, Heron I just wanna say thanks for making this, good job. EDIT: I've made some small changes to Dbug so that it behaves more like a background process. Dbug will now begin minimized, with no task bar icon unless GUI is activated (by clicking tray icon). Hotkeys now work outside of the Dbug window. F5 resume, F7 step in, F8 step over. I noticed step over would resume when stepping out of a function, I changed this to step to the next line instead. Disabled 1st line automatic breakpoint. Added sleep(50) to _CreateAndRun as to fix strange issue of target script not exiting correctly (could still see icon in tray). Have also made small fix to SciteBreakpoint. SciteBreakpoint.au3 Dbug.au3
    1 point
  10. Local $coord = PixelSearch(942 [X], 517 [Y], 977 [X], 558[Y],0xBA0714,80[Variance]) XY _ _ _ _ _ _ l l l _ _ _ _ _ _l XY The coordinates of the box ...
    1 point
  11. I'm sorry, where? I was googleing this exact issue before asking the exact same question, but your "here" doesn't link anywhere anymore... EDIT For all those wondering, I think I found where he showed it here: https://www.autoitscript.com/forum/topic/146290-ctrl-a-does-not-work-on-edit-controls/?do=findComment&comment=1035269 TL:DR make a dummy ctrl to use as a kind of "button", when that dummy is clicked set the selection of the edit, and then use GUISetAccelerators to make a hot key for that dummy. I also must say I'm not liking the last forum update. there are a LOT of dead and missing links now...
    1 point
  12. zemkor, Only 2 lines need changing - is the concept that hard to grasp? #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <MsgBoxConstants.au3> $Form1 = GUICreate("TEST read and write", 301, 500, 224, 170) $text = GUICtrlCreateEdit("Text", 20, 165, 200, 300) $load = GUICtrlCreateButton("Load", 170, 41, 121, 33) $save = GUICtrlCreateButton("Save", 170, 89, 121, 33) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $save save() Case $load load() EndSwitch WEnd Func load() ;natiahne nastavenia z .ini Local $ini_file, $workingdir ; save workingdir $workingdir = @WorkingDir ; open file dialog $ini_file = FileOpenDialog('Open', @ScriptDir, 'Ini (*.ini)|All (*.*)', 1, 'Config.ini', $Form1) ; check if return is valid If @error Or $ini_file == '' Then FileChangeDir($workingdir) Return SetError(1, 0, '') EndIf ; read from ini file GUICtrlSetData($text, StringReplace(IniRead($ini_file, "Data", "Text", ""), "{ENTER}", @CRLF)) ; <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< ; restore workingdir FileChangeDir($workingdir) EndFunc ;==>load Func save() Local $ini_file, $workingdir ; save workingdir $workingdir = @WorkingDir ; save file dialog $ini_file = FileSaveDialog('Save', @ScriptDir, 'Ini (*.ini)|All (*.*)', 10, 'Config.ini', $Form1) ; check if return is valid If @error Or $ini_file == '' Then FileChangeDir($workingdir) Return SetError(1, 0, '') EndIf IniWrite($ini_file, "Data", "Text", StringReplace(GUICtrlRead($text), @CRLF, "{ENTER}")) ; <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< FileChangeDir($workingdir) EndFunc ;==>saveM23
    1 point
×
×
  • Create New...