Я юзаю Delphi 7
вот мой код:
Код:
Run("setup.exe")
WinWaitActive('Borland Delphi 7 Enterprise Edition - Installation Wizard','Welcome to Borland Delphi 7, Enterprise Edition')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button1')
WinWaitActive('Borland Delphi 7 Enterprise Edition - Installation Wizard','Serial Number')
Sleep(500) ; Обязательно нужна задержка!
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button1')
WinWaitActive('Borland Delphi 7 Enterprise Edition - Installation Wizard','License Agreement')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button3')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button5')
WinWaitActive('Borland Delphi 7 Enterprise Edition - Installation Wizard','Important Installation Information')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button1')
WinWaitActive('Borland Delphi 7 Enterprise Edition - Installation Wizard','Setup Type')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button1')
WinWaitActive('Borland Delphi 7 Enterprise Edition - Installation Wizard','Choose VisiBroker')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button4')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button1')
WinWaitActive('Borland Delphi 7 Enterprise Edition - Installation Wizard','Microsoft Office Controls')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button1')
WinWaitActive('Borland Delphi 7 Enterprise Edition - Installation Wizard','Install Additional Components')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button3')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button1')
WinWaitActive('Borland Delphi 7 Enterprise Edition - Installation Wizard','Destination Folder')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button1')
WinWaitActive('Borland Delphi 7 Enterprise Edition - Installation Wizard','Save Installation Database')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button1')
WinWaitActive('Borland Delphi 7 Enterprise Edition - Installation Wizard','Ready to Install the Program')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button1')
WinWaitActive('Borland Delphi 7 Enterprise Edition - Installation Wizard','Installation Wizard Completed')
ControlClick('Borland Delphi 7 Enterprise Edition - Installation Wizard','','Button1')
А в Setup.ini делаю вот такие изменения в секции [startup]:
Код:
[Startup]
CmdLine= PRODUCT_ID=6AKD-PD29Q9-RDF?JQ-X65Z AUTH_KEY=QX8-EEC
Я просто не пользуюсь InterBase и VisiBroker, поэтому в своей установке я их не устанавливаю.
