Jump to content

Leaderboard

Popular Content

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

  1. Really? Nobody see the disappearing pixels? ‌@TheDcoder The pixels with alpha in them goes fully transparent when the button is disabled. I don't know why so I can't suggest a fix other than removing them. Like so: grass_arrow2.ico Or create your own custom button...
    2 points
  2. JohnOne

    Tesseract Simple Example

    There has been many questions about using tesseract of late. Here is a very basic example which works for me, along with the exact version of standalone tesseract executable and English language data used I found it some time ago at a time I thought I needed it, I do not recall from where. $ImageToReadPath = @ScriptDir & "\image.bmp" $ResultTextPath = @ScriptDir & "\Result" $OutPutPath = $ResultTextPath & ".txt" $TesseractExePath = @ScriptDir & "\Tesseract.exe" ShellExecuteWait($TesseractExePath, '"' & $ImageToReadPath & '" "' & $ResultTextPath & '"', "", "", @SW_HIDE) If @error Then Exit MsgBox(0, "Error", @error) EndIf MsgBox(0, "Result", FileRead($OutPutPath)) FileDelete($OutPutPath)Some Answers: The files contained in the download, only support English language. From the only documentation I got with this version... Original Binaries and Source can be found here: http://code.google.com/p/tesseract-ocr/I do not know where to get other languages support. I do not know if there is a later standalone version. I do not know why it does not read your image accurately. It does not have a virus in it. You can search the forums or internet to learn how to create / cut / copy / paste, or otherwise manipulate your own images. TesseractExample.zip
    1 point
  3. This site (https://msdn.microsoft.com/en-us/library/windows/desktop/aa394603(v=vs.85).aspx) is even more specific how to solve the problem. Search for "0x80070005"
    1 point
  4. Google translate tells me that the first message means: Access is denied. Maybe this site describes what's going on.
    1 point
  5. For a generalized way of sorting with a user defined comparison function, see #7 in this thread for the attachment ArraySortCustom.au3 Edit: In fact the example compare function is for dot separated version strings
    1 point
  6. Please add a COM error handler to the script so we can see why ObjGet doesn't return an object. Please see ObjEvent in the help file for an example.
    1 point
  7. Use _VersionCompare and write the largest version into a variable. After the end of the loop the variable holds the largest version.
    1 point
  8. Melba23

    Advanced Pause

    Timppa, Create a little wrapper Pause function like this: #include <GUIConstantsEx.au3> #include <MsgBoxConstants.au3> $hGUI = GUICreate("Test", 500, 500) $cRadio_On = GUICtrlCreateRadio("On", 10, 10, 200, 20) GUICtrlSetState($cRadio_On, $GUI_CHECKED) $cRadio_Off = GUICtrlCreateRadio("Off", 10, 40, 200, 20) $cLabel = GUICtrlCreateLabel("On", 10, 100, 200, 40) GUICtrlSetFont($cLabel, 18) $cPause = GUICtrlCreateButton("Pause", 10, 200, 80, 30) GUISetState() While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $cPause ConsoleWrite("Paused" & @CRLF) _Advanced_Pause(5000) ConsoleWrite("Unpaused" & @CRLF) Case $cRadio_On GUICtrlSetData($cLabel, "On") Case $cRadio_Off GUICtrlSetData($cLabel, "Off") EndSwitch WEnd Func _Advanced_Pause($iDelay) $nBegin = TimerInit() Do Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $cRadio_On GUICtrlSetData($cLabel, "On") Case $cRadio_Off GUICtrlSetData($cLabel, "Off") EndSwitch Until TimerDiff($nBegin) > $iDelay EndFuncAs you can see, the radios work all the time. M23
    1 point
  9. You want to start from Computer 1 a program on Computer 2? Then PSExec seems to be the tool for you.
    1 point
  10. TheDcoder, If all you want is to read the combo when it changes than just set a case for it: #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> $hGUI = GUICreate("Test", 500, 500) $cCombo = GUICtrlCreateCombo("", 10, 10, 200, 25) GUICtrlSetData($cCombo, "Combo1|Test", "Combo1") GUISetState(@SW_SHOW) While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $cCombo ConsoleWrite(GUICtrlRead($cCombo) & @CRLF) EndSwitch WEndYou really do need to give more explanation of what you require when you post - far too often lately you have just thrown out a snippet and expected the community to work out what it is that you want to happen. Explaining in more detail means that others will not waste their time posting possible solutions which turn out not to be what you require. M23
    1 point
  11. CuongVN, Welcome to the AutoIt forum. Unfortunately you appear to have missed the Forum rules on your way in. Please read them now - particularly the bit about not discussing game automation - and then you will understand why you will get no help and this thread will now be locked. And please do not double post in future - I have deleted the other thread. See you soon with a legitimate question I hope. M23
    1 point
  12. You can try something like this: #include <ComboConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <GuiListBox.au3> Global $bSelChanged = True #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 366, 115, 301, 138) $Combo1 = GUICtrlCreateCombo("Combo1", 104, 24, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL)) GUICtrlSetData($Combo1, "Test") GUIRegisterMsg($WM_COMMAND, "WM_COMMAND") GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch If $bSelChanged Then ConsoleWrite(GUICtrlRead($Combo1) & @CRLF) $bSelChanged = False EndIf WEnd Func WM_COMMAND($hWnd, $iMsg, $wParam, $lParam) #forceref $hWnd, $iMsg Local $hWndFrom, $iIDFrom, $iCode, $hWndListBox ;If Not IsHWnd($g_hListBox) Then $hWndListBox = GUICtrlGetHandle($g_hListBox) $hWndFrom = $lParam $iIDFrom = BitAND($wParam, 0xFFFF) ; Low Word $iCode = BitShift($wParam, 16) ; Hi Word ;Switch $hWndFrom ;Case $g_hListBox, $hWndListBox Switch $iCode Case $LBN_SELCHANGE ; Sent when the selection in a list box has changed $bSelChanged = True ; no return value EndSwitch ;EndSwitch Return $GUI_RUNDEFMSG EndFunc
    1 point
  13. For $Ui = 0 To UBound($TexansUsernames)should be: For $Ui = 0 To UBound($TexansUsernames) - 1
    1 point
  14. argumentum

    MS Access UDF

    the UDF you made say that it can: 1. _Start_Connection 2. _Close_Connection 3. _Create_Table 4. _Delete_Table 5. _Alter_Table 6. _Delete_FromTable 7. _Insert_Data - You can use this to update or delete data 8. _Get_Recordsand I needed the _AccessFieldsList() from this UDF, which I expanded to include details. ( and later found the .accdb support for that, can be added with 4 extra lines of code )
    1 point
  15. Or you could mimic what every c standard library qsort has done for decades. Pass in a pointer to a custom comparison function. I use a string as that's how it is done in .au3 ArraySortCustom.au3
    1 point
×
×
  • Create New...