Unload / Destroy Gui Object

[Emerica]

Im looking for a gui object destroy command or something similar.

I've been messing with another application I am working on which loaded different media players.

The problem i am running into is that I cant seem to remove the player once loaded. So additionnal players just overlap.

Here is an examle using a button.

#include <GUIConstants.au3>
; == GUI generated with Koda ==
$loaded = False
$Form1 = GUICreate("AForm1", 300, 340, 192, 125)
$Button2 = GUICtrlCreateButton("Load / Unload", 104, 256, 75, 25)
GUISetState(@SW_SHOW)

While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $msg = $Button2
        onoff()
    Case Else
;;;;;;;
    EndSelect
WEnd
Exit

Func onoff()
    If $loaded ==False Then
        $Button1 = 0
        $Button1 = GUICtrlCreateButton("AButton1", 64, 24, 169, 81)
        $loaded=True
    ElseIf $loaded ==True Then
        $Button1 = 0
;;WHY WONT IT GO AWAY!
        $loaded = False
    EndIf
EndFunc

Edited May 2, 2006 by Emerica

[greenmachine]

GUIDelete($Form1)? GUISetState(@SW_HIDE)?

[Valuater]

maybe

#include <GUIConstants.au3>
; == GUI generated with Koda ==

Dim $AButton1

$loaded = False
$Form1 = GUICreate("AForm1", 300, 340, 192, 125)
$Button2 = GUICtrlCreateButton("Load / Unload", 104, 256, 75, 25)
GUISetState(@SW_SHOW)

While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $msg = $Button2
        onoff()
    Case Else
;;;;;;;
    EndSelect
WEnd
Exit

Func onoff()
    If $loaded ==False Then
        $Button1 = 0
        $AButton1 = GUICtrlCreateButton("AButton1", 64, 24, 169, 81)
        $loaded=True
    ElseIf $loaded ==True Then
        $Button1 = 0
        GUICtrlDelete($AButton1)
;;WHY WONT IT GO AWAY!
        $loaded = False
    EndIf
EndFunc

8)

[Emerica]

Ok.. I went for a walk around the building... and you guys made it happen.

Kudos!

Now to apply that to the media player

Thanks.