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.

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
  • Recently Browsing   0 members

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