高手帮忙**安装au3后编辑页面不能显示汉语
跪求高手帮助:今天下了个au3的安装包,安装后发现编辑页面不能显示汉字。
如Run("notepad.exe")
WinActivate("无标题 -记事本")
Send("希望显示汉语")
F5编译后出现
Run("notepad.exe")
WinActivate("无标题 -记事本")
Send("希望显示汉语")
?£í??……?ooó?
保存运行时
发现仅打开txt文档。
如果把
Send("希望显示汉语")
改成
Send("this is a txt")
同样仅打开txt文档
但在au3中F5时显示
Run("notepad.exe")
WinActivate("无标题 -记事本")
Send("this is a txt")
this is a txt
这到底怎么回事啊,我下了安,安了又下。每次安装前都把注册表的au3注册表项删除了,还是不行。
老大们帮帮小弟吧。
[ 本帖最后由 zhh912 于 2008-12-11 10:52 编辑 ] 你帮助也没看,那怎么能帮助你啊!
SEND()是不支持发送中文的! 原帖由 zhh912 于 2008-12-10 16:02 发表 http://www.autoitx.com/images/common/back.gif
跪求高手帮助:
今天下了个au3的安装包,安装后发现编辑页面不能显示汉字。
如Run("notepad.exe")
WinActivate("无标题 -记事本")
Send("希望显示汉语")
F5编译后出现
Run("notepad.exe")
WinActivate(" ...
Run("notepad.exe")
WinWaitActive("无标题 - ")
SendC("希望显示汉语")
Func SendC($Str, $Flag = 0)
If $Flag Then
Local $Clip = ClipGet()
ClipPut($Str)
Send('+{ins}')
ClipPut($Clip)
Else
Local $Nul = Chr(0)
For $i = 1 To StringLen($Str)
Send('{ASC ' & StringToBinary(StringMid($Str, $i, 1) & $Nul) & '}')
Next
EndIf
EndFunc ;==>SendC
回复 2# liongodmien 的帖子
谢谢提醒哦。新手不怎么熟悉。:face (29):我终于解决了:face (33):
回复 3# robin.von 的帖子
谢谢啊,老大。崇拜你那!:face (29):
高手就是高手。多多向您学习。
我还得多多努力啊
页:
[1]