Jump to content

Anyone figure out IconPackager 3.0a Silently?


Recommended Posts

  • 1 month later...

  • 2 weeks later...
Posted

Bring back an old topic... :D

True, it's not a new version, but with the Autoit script for 2.5, the theme doesn't get installed. So I was wondering if anyone has gotten a them to install using Autoit?

Here is the Autoit code that doesn't work correctly...

; Install New Default Theme
$search = FileFindFirstFile ( @ScriptDir & "\Theme\*.iptheme" )
If $search = -1 Then $search = FileFindFirstFile ( @ScriptDir & "\Theme\*.ip" )
If $search = -1 Then $search = FileFindFirstFile ( @ScriptDir & "\Theme\*.theme" )
If $search <> -1 Then
Do
Sleep ( 250 )
Until FileExists( $DL_1 & "\IconPackager.exe" ) = 1

Run ( $DL_1 & "\IconPackager.exe" )
WinWaitActive ( "IconPackager" )
WinSetTitle ( "IconPackager" , "" , "IP Menu" )
While 1
$theme = FileFindNextFile ( $search )
If @error Then ExitLoop

ControlClick ( "IP Menu" , "" , "Button7" )
Send ( '{DOWN}{ENTER}' )

WinWaitActive ( "Install Package" )
Send ( @ScriptDir & "\Theme\" & $theme & "{ENTER}" )

WinWaitActive ( "IP Menu" )
ControlClick ( "IP Menu" , "" , "Button5" )
Sleep ( 250 )
If WinExists ( "IconPackager" ) Then
ControlClick ( "IconPackager" , "" , "Button2" )
ControlClick ( "IconPackager" , "" , "Button1" )
EndIf
$Title_1 = WinGetTitle("")
ControlClick ( $Title_1 , "" , "Button1" )
Sleep ( 250 )
If WinExists ( "IconPackager" ) Then
ControlClick ( "IconPackager" , "" , "Button3" )
ControlClick ( "IconPackager" , "" , "Button1" )
EndIf
Wend
FileClose ( $search )
EndIf

Wish I was better at Autoit, but I just can't figure this out.

Posted

hmm its not silent...its automated. ;)

Well here is a more up to date version MHz made mention that it along with many other of my Stardock scripts need some TLC.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...