Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 04/16/2013 in all areas

  1. CLSID_Shell is declared as {13709620-C279-11CE-A49E-444553540000} in <Shldisp.h>. You can use 'StringFromCLSID' or 'StringFromGUID2' to get the number.
    1 point
  2. Add #RequireAdmin to start of script This will then cause the script to request elevated UAC privileges. Send then will work fine..
    1 point
  3. water

    is object empty?

    Does this return a value? MsgBox(0, "", $Certificates.Count)
    1 point
  4. Melba23

    Finding a word?

    olo, Topics merged. Just one at a time in future please. M23
    1 point
  5. FireFox

    Finding a word?

    You have an edit button for that. Note that it's NOT a 24/24 support forum and furthermore you have to wait 1 day before bumping your topics. Please do not reply to this, I will answer to the other topic.
    1 point
  6. FireFox

    vertical label ?

    Hi, _WinAPI_RedrawWindow($hGUI) Br, FireFox.
    1 point
  7. kylomas

    For with array

    tlman12, Your code iterates the loop once and returns. It should probably look more like this (untested) Func IsTest($id) If $id = 25834 Then Return True For $i = 3675 To 3682 If $id = Hex($i, 8) Then Return True Next return false ; this needs to be outside of for loop EndFunc ;==>IsTest @asianqueen, It is difficult to understand what you are asking. The following example will update an array with true or false. #include <array.au3> local $aRET[1] $aRET[ubound($aRET) - 1] = IsTest(hex(3677)) ; set last element of array to value returned from function redim $aRET[ubound($aRET) + 1] ; increase array (presumably you are going to loop on this _arraydisplay($aRET) ; display array Func IsTest($id) For $i = 3675 To 3682 If $id = Hex($i) Then Return True Next Return False ; <-- this need to be outside of the for loop EndFunc As opposed to what? kylomas
    1 point
  8. 1. This topic is in violation of the forum rules, therefore will be closed and insisted that you do not start another topic similar/referencing/etc this topic or topics like it. 2. ileandros: You've been sited many times on this forum for game automation by Melba. Assisting/Encouraging others in breaking the rules that are in place is just as bad as breaking the rules directly. Because of this, you're out of here for an indeterminate period of time. I will leave it up to Melba to allow you to return if he feels so inclined to.
    1 point
  9. #include HotKeySet("{PAUSE}", "checkForImage") HotKeySet("{DEL}", "Terminate") // script starts here, you need to keep it alive else it will just exit. global $y = 0, $x = 0 whilw 1 sleep(100) wend Func checkForImage() while 1 mousemove(960,600,10) Local $search = _ImageSearch('FEM.bmp', 1, $x, $y, 0) I f $search = 1 Then MouseMove($x, $y, 10) sleep(2000) EndIf wend EndFunc while 1 sleep(200) WEnd Func Terminate() while 1 sleep(200) wend EndFunc
    1 point
  10. This selects the 1001st icon to display it, a dummy one. E.g. if you use these lines _GUICtrlListView_AddItem($hListView, $YourIP, 0) _GUICtrlListView_AddSubItem($hListView, 0, $YourCountry, 1, 0) you will see that the 1st and 2nd colums have the 1st icon, too. 1000 means simply select the 1001st icon (zero based) and display it. If there is no icon on that index display nothing. I hope it's clear now. Br, UEZ
    1 point
  11. I tried with Windows 8 Pro without UAC (really disabled, with registry keys), and Send() command works.
    1 point
  12. Just thought I'd contribute something simple. If you want simple version control, you can just do this at the beginning of your code. Source Versioning: #AutoIt3Wrapper_Res_Fileversion=1.0.0.0 #AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y #AutoIt3Wrapper_Run_After=mkdir "%scriptdir%\ver" #AutoIt3Wrapper_Run_After=copy /V /Y "%in%" "%scriptdir%\ver\%scriptfile%_%fileversion%.au3" Binary Versioning Add: #AutoIt3Wrapper_Run_After=copy /V /Y "%out%" "%scriptdir%\ver\%scriptfile%_%fileversion%.exe" The mkdir will only be used first time to create the versioning folder, then gets ignored in subsequent tries. I add this to all my code. Rick
    1 point
  13. UEZ

    vertical label ?

    Here a routine made by BugFix (I put it to a function): ;Thanks to BugFix Func Display_Rotated_Text($hGUI, $text, $px, $py, $angle = 90, $tw = 400, $th = 12, $tcolor = 0x000000, $bcolor = 0xF0F0F0, $font = 'Arial', $transparent = True) Local $tRect, $rotate, $RotateMe, $rFont, $hDC ; Create RECT-structure, fill data $tRect = DllStructCreate ($tagRECT) DllStructSetData ($tRect, 'Left', $px) DllStructSetData ($tRect, 'Top', $py) ; Set rotation $rotate = $angle * 10 ; Create structure for rotate text, fill data $RotateMe = DllStructCreate ($tagLOGFONT) DllStructSetData ($RotateMe, 'Escapement', $rotate) DllStructSetData ($RotateMe, 'Weight', $tw) DllStructSetData ($RotateMe, 'Height', $th) DllStructSetData ($RotateMe, 'FaceName', $font) ; Creates a logical font that has specific characteristics $rFont = _WinAPI_CreateFontIndirect ($RotateMe) ; Retrieves a handle of a display device context for the client area a window $hDC = _WinAPI_GetDC ($hGUI) ; Set text- and back color _WinAPI_SetTextColor ($hDC, $tcolor) _WinAPI_SetBkColor ($hDC, $bcolor) If $transparent Then _WinAPI_SetBkMode($hDC, $TRANSPARENT) ; Selects an object into the specified device context _WinAPI_SelectObject ($hdc, $rFont) ; Draws formatted text in the specified rectangle _WinAPI_DrawText ($hDC, $text, $tRect, $DT_NOCLIP + $DT_NOPREFIX) $tRect = 0 EndFunc Example: #include <GDIplus.au3> #include <GUIConstantsEx.au3> #include <ProgressConstants.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("[#] Form1 [#]", 633, 447, 192, 124) $Label1 = GUICtrlCreateLabel("Autoit team", 40, 112, 57, 17) $Progress1 = GUICtrlCreateProgress(104, 192, 177, 49, BitOR($PBS_SMOOTH,$PBS_VERTICAL)) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### Display_Rotated_Text($Form1, "Autoit team", 40, 260, 90, 400, 24) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func Display_Rotated_Text($hGUI, $text, $px, $py, $angle = 90, $tw = 400, $th = 12, $tcolor = 0x000000, $bcolor = 0xF0F0F0, $font = 'Arial', $transparent = True) Local $tRect, $rotate, $RotateMe, $rFont, $hDC ; Create RECT-structure, fill data $tRect = DllStructCreate ($tagRECT) DllStructSetData ($tRect, 'Left', $px) DllStructSetData ($tRect, 'Top', $py) ; Set rotation $rotate = $angle * 10 ; Create structure for rotate text, fill data $RotateMe = DllStructCreate ($tagLOGFONT) DllStructSetData ($RotateMe, 'Escapement', $rotate) DllStructSetData ($RotateMe, 'Weight', $tw) DllStructSetData ($RotateMe, 'Height', $th) DllStructSetData ($RotateMe, 'FaceName', $font) ; Creates a logical font that has specific characteristics $rFont = _WinAPI_CreateFontIndirect ($RotateMe) ; Retrieves a handle of a display device context for the client area a window $hDC = _WinAPI_GetDC ($hGUI) ; Set text- and back color _WinAPI_SetTextColor ($hDC, $tcolor) _WinAPI_SetBkColor ($hDC, $bcolor) If $transparent Then _WinAPI_SetBkMode($hDC, $TRANSPARENT) ; Selects an object into the specified device context _WinAPI_SelectObject ($hdc, $rFont) ; Draws formatted text in the specified rectangle _WinAPI_DrawText ($hDC, $text, $tRect, $DT_NOCLIP + $DT_NOPREFIX) $tRect = 0 EndFunc Another example here -> Fussball Chronograph (German only!) BR, UEZ
    1 point
×
×
  • Create New...