base:FreeDisplay()

You can post your code snippets here for others to use and learn from
Post Reply
djrikki
Posts: 682
Joined: Wed Apr 06, 2011 12:26 am

base:FreeDisplay()

Post by djrikki » Wed Apr 15, 2015 11:25 pm

Free a Hollywood Display and return whether it succeeded or not.

Code: Select all

Global base
base = {}

Function base:FreeDisplay(window)
    Local err

    ExitOnError(False)
    If GetAttribute(#DISPLAY,window,#ATTRSTATE) <> #DISPSTATE_CLOSED
        Err = False
        FreeDisplay(window)
    Else
        Err = True
    EndIf
    ExitOnError(True)
    
    Return (err)
EndFunction
Evolve - Rapid GUI Development tool for MUI Royale and RapaGUI
http://myevolve.wordpress.com

Post Reply