thesnow

new version obsession. i have report bug and new feature report.i know trac is where. i love this tool,but it's long time have no new version

first.thanks developer and autoitscript community. waitting for long long long long long time to release new version. please send me a beta,dev version,any new version... even if have big bug. my mail: thegfw@gmail.com

have remember ?

have remember ? wait for you.

how to load text resource from dll or exe? autoit crashed #AutoIt3Wrapper_useansi=y $Filehwnd=_API_LoadLibraryEx("shell32.dll",2) MsgBox(32,"",$Filehwnd) $te = _LoadString($Filehwnd,4184) MsgBox(32,"",$te) Func _API_LoadLibraryEx($sFileName, $iFlags=0) Local $aResult $aResult = DllCall("Kernel32.dll", "hwnd", "LoadLibraryExA", "str", $sFileName, "hwnd", 0, "int", $iFlags) Return $aResult[0] EndFunc Func _LoadString($File,$id) Local $aResult $aResult = DllCall("user32.dll","string","LoadStringA","hwnd",$File,"uint",$id,"int",100,"int",255) Return $aResult EndFunc

see this url: http://www.autoitscript.com/forum/index.php?showtopic=51302

127 Is Chinese used ,if $string is other language,please use sendx($string,0)

#include-once ;====================================================== ; ; Func name: SendX("string",flag) ; Description: Send non-english string. ; $string: $string ,you text ; $flag: 0 ClipPut mode,1 send ASC mode ; Return Value : none ; Author: thesnow(rundll32@126.com) ; web: www.autoit.net.cn ; ;====================================================== Func SendX($string,$flag) Local $char Local $code Local $Clip if $flag <> 1 then $flag=0 Switch $flag Case 0 $clup=ClipGet() ClipPut($string) Send("+{ins}") ClipPut($clup) Case 1 For $i = 1 to StringLen($string) $char = StringMid($string, $i, 1) $code = Asc($char) If $code > 127 Then $code = $code * 256 $i = $i + 1 $char = StringMid($string, $i, 1) $code = $code + Asc($char) EndIf Send("{ASC " & $code & "}") Next EndSwitch EndFunc ;==>SendX