keen Posted January 14, 2007 Posted January 14, 2007 Guys i need to know how to get a spash image to close after the sleep time is over. Any help: expandcollapse popup#include <GUIConstants.au3> #include <Xskin.au3> #Include <File.au3> $splash = SplashImageOn("","S:\My Documents\JORDANS STUFF\Amp Music\images\Loading.gif","700","500","-1","-1",5) sleep (1000) $skin_folder = @ScriptDir & "\images\skin" XskinGUICreate("Amp Music", 1085,850, $skin_folder) GUISetBkColor (0xffffff) $Pic1 = GUICtrlCreatePic(@ScriptDir & "\images\BG.gif", 73, 80, 937, 697 ) $butto = GUICtrlCreateButton ( "<", 255, 60,20,20) $butto2 = GUICtrlCreateButton ( ">", 280, 60,20,20) $Pic2 = GUICtrlCreatePic(@ScriptDir & "\images\Knobs.gif", 249, 110, 81, 81 ) $Pic3 = GUICtrlCreatePic(@ScriptDir & "\images\Volume.gif", 249, 197, 81, 25 ) $lab = GUICtrlCreateLabel ("50", 277,130,20,20) $Pic4 = GUICtrlCreatePic(@ScriptDir & "\images\input.gif", 91, 122, 59, 59 ) $Pic4 = GUICtrlCreatePic(@ScriptDir & "\images\songs.gif", 450, 320, 70, 38 ) $fileread = FileRead ("E:\ ") $list = GUICtrlCreateList( $fileread , 550, 250,300,500) $FileList =_FileListToArray("E:") for $x = 1 to UBound($FileList) - 1 GUICtrlSetData( $list, $FileList[$x], 1) Next if $list <> "" Then $Pic5 = GUICtrlCreatePic(@ScriptDir & "\images\No-CD.gif", 81, 184, 80, 68) Else $Pic6 = GUICtrlCreatePic(@ScriptDir & "\images\CD.gif", 81, 184, 80, 68) EndIf $sound = SoundSetWaveVolume ( "50" ) $Pic6 = GUICtrlCreatePic(@ScriptDir & "\images\non-play.gif", 825, 105, 102, 102) $button = GUICtrlCreateButton ( "Play", 820, 65,60,20) $button2 = GUICtrlCreateButton ( "Pause", 880, 65,60,20) $read = GUICtrlRead ($button) GUISetState(@SW_SHOW) While 1 $msg = GUIGetMsg() Switch $msg Case $GUI_EVENT_CLOSE Exit Case $button GUICtrlSetImage($Pic6, @ScriptDir & "\images\play.gif") Case $button2 GUICtrlSetImage($Pic6, @ScriptDir & "\images\non-play.gif") Case $butto GUICtrlSetData ($lab,GUICtrlRead($lab)-1) GUICtrlSetData ($sound,GUICtrlRead($sound)-1) Case $butto2 GUICtrlSetData ($lab,GUICtrlRead($lab)+1) GUICtrlSetData ($sound,GUICtrlRead($sound)+1) EndSwitch WEnd [center]Kesne's Bar & Grill[/center]
RyanPotter Posted January 14, 2007 Posted January 14, 2007 Try SplashOff()... I know it makes almost no sense, but it just might work...
Valuater Posted January 14, 2007 Posted January 14, 2007 1I tend to use the splash until i am ready to show my GUI...SplashOff()GUISetState(@SW_SHOW)2You haveif $list <> "" Then$Pic5 = GUICtrlCreatePic(@ScriptDir & "\images\No-CD.gif", 81, 184, 80, 68)Else$Pic6 = GUICtrlCreatePic(@ScriptDir & "\images\CD.gif", 81, 184, 80, 68)EndIfmaybe.... you wantif $list <> "" Then$Pic5 = GUICtrlCreatePic(@ScriptDir & "\images\No-CD.gif", 81, 184, 80, 68)Else$Pic5 = GUICtrlCreatePic(@ScriptDir & "\images\CD.gif", 81, 184, 80, 68)EndIf8)
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now