Jump to content
Sign in to follow this  
waltzie

simply modal dialog/windows

Recommended Posts

waltzie

FYI

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Opt('MustDeclareVars', 1)

    Local $msg, $parentgui

    $parentgui=GUICreate("My GUI") ; will create a dialog box that when displayed is centered
    GUISetState(@SW_SHOW)     ; will display an empty dialog box

    Local $gui, $background, $pic, $basti_stay, $msg
    Local $sFile = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\AutoIt v3\AutoIt", "InstallDir") & "\Examples\GUI\logo4.gif"
    
    $gui = GUICreate("Background", 400, 100,-1,-1,-1,$DS_MODALFRAME, $parentgui)
; background picture
    $background = GUICtrlCreatePic(@SystemDir & "\oobe\images\mslogo.jpg", 0, 0, 400, 100)
    GUISetState(@SW_SHOW)

    GUISetState(@SW_DISABLE,$parentgui)

; transparent child window
    $pic = GUICreate("", 169, 68, 0, 0, $WS_POPUP, $WS_EX_LAYERED + $WS_EX_MDICHILD  + $DS_MODALFRAME, $parentgui)
; transparent pic
    $basti_stay = GUICtrlCreatePic($sFile, 0, 0, 169, 68)
    GUISetState(@SW_SHOW)

    Do
        $msg = GUIGetMsg()

    Until $msg = $GUI_EVENT_CLOSE
    
    GUIDelete ( $gui )

    GUISetState(@SW_ENABLE,$parentgui)
    
    Do
        $msg = GUIGetMsg()

    Until $msg = $GUI_EVENT_CLOSE
        
Exit

Share this post


Link to post
Share on other sites

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
Sign in to follow this  

×