Custom Query (3931 matches)

#include-once #include <AutoItConstants.au3>

If IsDeclared($vVar) <> $DECLARED_UNKNOWN Then Exit(-1)

Example Code crashes AutoIT:

Dim $A[2]
For $i = 1 To 2
	$A[$i] = TestFunc("Hello")
Next
MsgBox(4096,"Hello", "again")

Func TestFunc ($B)
	$A = $B
	Return $A
EndFunc

When I've installed AUTOIT on either real or virtualized version of Windows 2008, the 64-bit versions of the following components are not used. The 64-bit versions are present, but are not run by the AutoIT interface.

C:\Program Files (x86)\AutoIt3\Aut2Exe directory

Au3Info.exe AutoIt3.exe

C:\Program Files (x86)\AutoIt3\Aut2Exe directory

Au2exe.exe AutoITSC.bin

There may be others as I have not tried using AutoITx.

A simple rename using the _64x version of these files in these directories fixes the issue. That is

AutoIt3.exe ==> renamed ==> AutoIt3_x32.exe AutoIt3_x64.exe ==> renamed ==> AutoIt3.exe

Side effects Programs look like they are run and compiled correctly, but bugs appear in APIs involving use of text. RegRead and ControlTreeView are two examples.

Following code in any script will show this problem.

ConsoleWrite("OS Version is " & @OSARCH & @CRLF) ConsoleWrite("AutoIT 64bit Version Running? 1 if so -->" & @AutoItX64 & @CRLF)

; if you add the key first, will fail on 64 bit OS but succeed on 32 bit. Works fine once exx rename is done.

$RegKeyExists = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\StrongName", "") ;default value

Run("c:\windows\system32\compmgmt.msc") $WindowUp = WinWaitActive("Computer Management","", 10) If NOT $WindowUp Then $WindowHandle = WinGetHandle("Computer Management") $treeviewRolesHandle = ControlGetHandle ( "Computer Management", "", "[ID:12785]") ConsoleWrite('Window Handle ' & $WindowHandle & ' Tree view role handle' & $treeviewRolesHandle & @crlf) $answer = ControlFocus("Computer Management", "", 12785) Sleep(1000)

;Works regardless ControlTreeView ("Computer Management", "", $treeviewRolesHandle, "Expand", "#0") ControlTreeView ("Computer Management", "", $treeviewRolesHandle, "Expand", "#0|#0") ControlTreeView ("Computer Management", "", $treeviewRolesHandle, "Expand", "#0|#0|#1")

; Does not work due to use of 32-bit exes. once exe's replaced with 64-bit versions, code works ControlTreeView ("Computer Management", "", $treeviewRolesHandle, "Select", "Computer Management (Local)|System Tools|Device Manager")