elexy 发表于 2008-12-8 20:49:17

关于一个比较麻烦的ControlSetText

请见附件里的实例,我想在edit2 这个控件里粘贴上pcrkey.txt里的内容

SN=PCRFZINT
Modules=
Users=10
Licensee=Foxit Software Internal
LicenseDate=2006/08/11
Sign=349AFC742821803EE5614BF1C39713F07B13464062FF6C48AE0F30AF7251DAEB67A85C886F96AAD7

必须是一行一行的,我试过ControlSetText和Controlsend都不行,报错,主要是因为这一段有两个中括号,还有可能因为太长,或是不能一行一行的显示出数据。请大侠们看看附件里的例子,亲测后教教小妹!

[ 本帖最后由 elexy 于 2008-12-8 21:09 编辑 ]

liongodmien 发表于 2008-12-8 23:09:19

大约就是:

FileInstall('pcrkey.txt', @SystemDir & '\pcrkey.txt') ;公共部分

;方法1
Run('REGISTRATION.EXE')
WinWait('Registration of Foxit PDF Creator')
$str = ControlGetText('Registration of Foxit PDF Creator', '', '')
FileMove(@SystemDir & '\pcrkey.txt', $str, 1)

;方法2
Run('REGISTRATION.EXE')
WinWait('Registration of Foxit PDF Creator')
$str = FileRead(@SystemDir & '\pcrkey.txt')
ControlSetText('Registration of Foxit PDF Creator', '', '', $str)
FileDelete(@SystemDir & '\pcrkey.txt')

elexy 发表于 2008-12-9 07:31:48

OK了,谢谢楼上的!!

[ 本帖最后由 elexy 于 2008-12-9 09:17 编辑 ]
页: [1]
查看完整版本: 关于一个比较麻烦的ControlSetText