Цитата Cuba:
самому интересно, что можно поправить »
|
если из интереса, то можно так:
Код:
Run("qip8092.exe")
WinWait("[CLASS:TSelectLanguageForm]")
ControlClick("[CLASS:TSelectLanguageForm]","","TNewButton1")
WinWait("[CLASS:TWizardForm]","QIP 2005 8092")
ControlClick("[CLASS:TWizardForm]","","TNewButton1")
WinWait("[CLASS:TWizardForm]","\Program Files\")
ControlClick("[CLASS:TWizardForm]","","TNewButton3")
WinWait("[CLASS:TWizardForm]","Выберите дополнительные задачи")
ControlClick("[CLASS:TWizardForm]","","TNewCheckListBox1","left",1,10,56)
ControlClick("[CLASS:TWizardForm]","","TNewCheckListBox1","left",1,10,120)
ControlClick("[CLASS:TWizardForm]","","TNewCheckListBox1","left",1,10,142)
ControlClick("[CLASS:TWizardForm]","","TNewButton3")
WinWait("[CLASS:TWizardForm]","Скачать и установить QIP.Online")
ControlClick("[CLASS:TWizardForm]","","TCheckBox1")
ControlClick("[CLASS:TWizardForm]","","TNewButton3")
WinWait("[CLASS:TWizardForm]","Программа QIP 2005 установлена")
ControlClick("[CLASS:TWizardForm]","","TNewCheckListBox1","left",1,10,10)
ControlClick("[CLASS:TWizardForm]","","TNewButton3")
...а если из практики, то я бы ставил так:
Код:
qip8092.exe /SILENT /LOADINF="qip8092.inf"
где
qip8092.inf:
Код:
[Setup]
Lang=russian
Dir=C:\Program Files\QIP
Group=QIP 2005
NoIcons=0
Tasks=desktopicon
FYI: http://forum.oszone.net/thread-60604.html