Sign in to follow this  
Followers 0
Zedna

Maximize/Restore invoked programatically - demo

Started by Zedna,

3 posts in this topic

#1 ·  Posted (edited)

In this demo example GUI window can be maximized/restored programatically by:

- system menu

- button

- hotkey F11

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

$gui = GUICreate("Maximize/restore demo", 300, 200, -1, -1, BitOr($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
$max_id = GUICtrlCreateDummy()
$b1 = GUICtrlCreateButton("maximize/restore", 10, 10, 120, 20 )
GUICtrlCreateLabel("F11: maximize/restore", 10, 50, 120, 20 )
GUISetState(@SW_SHOW, $gui)
 
Dim $Form1_AccelTable[1][2] = [["{F11}",$max_id]]
GUISetAccelerators($Form1_AccelTable, $gui)
 
Do
    $msg = GUIGetMsg()
    If $msg = $max_id Or $msg = $b1 Then Maximize()
Until $msg = $GUI_EVENT_CLOSE
 
Func Maximize()
    If BitAnd(WinGetState($gui), 32) = 0 Then ; not maximized
        _SendMessage($gui, $WM_SYSCOMMAND, $SC_MAXIMIZE, 0)
    Else
        _SendMessage($gui, $WM_SYSCOMMAND, $SC_RESTORE, 0)
    EndIf
    Return $GUI_RUNDEFMSG
EndFunc

EDIT: fixed list of includes for (standard) latest beta

Edited by Zedna

Resources UDF   ResourcesEx UDF   AutoIt Forum Search

Share this post

Link to post
Share on other sites



#2 ·  Posted (edited)

Which version of AutoIt are you using? As some constants aren't available e.g. you're using GUIConstants.

This works on the latest beta of AutoIt.

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

Local $hGUI
Local $iButton, $iControl

$hGUI = GUICreate("Demo - by Zedna", 300, 200, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
$iControl = GUICtrlCreateDummy()
$iButton = GUICtrlCreateButton("Maximise/Restore", 10, 10, 120, 35)
GUICtrlCreateLabel("F11: Maximise/Restore", 15, 50, 120, 35)
GUISetState(@SW_SHOW, $hGUI)

Local $aHotKey[1][2] = [["{F11}", $iControl]]
GUISetAccelerators($aHotKey, $hGUI)

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit

        Case $iControl, $iButton
            Maximize()

    EndSwitch
WEnd

Func Maximize()
    Local Const $SC_MAXIMIZE = 0xF030, $SC_RESTORE = 0xF120
    Local $sState
    If BitAND(WinGetState($hGUI), 32) = 0 Then ; Not Maximised
        $sState = $SC_MAXIMIZE
    Else
        $sState = $SC_RESTORE
    EndIf
    Return _SendMessage($hGUI, $WM_SYSCOMMAND, $sState)
EndFunc   ;==>Maximize
Edited by guinness

_AdapterConnections() • _AlwaysRun() • _AppMon() • _AppMonEx() • _BinaryBin() • _CheckMsgBox() • _CmdLineRaw() • _ContextMenu() • _ConvertLHWebColor()/_ConvertSHWebColor() • _DesktopDimensions() • _DisplayPassword() • _DotNet_Load()/_DotNet_Unload() • _Fibonacci() • _FileCompare() • _FileCompareContents() • _FileNameByHandle() • _FilePrefix/SRE() • _FindInFile() • _GetBackgroundColor()/_SetBackgroundColor() • _GetConrolID() • _GetCtrlClass() • _GetDirectoryFormat() • _GetDriveMediaType() • _GetFilename()/_GetFilenameExt() • _GetHardwareID() • _GetIP() • _GetIP_Country() • _GetOSLanguage() • _GetSavedSource() • _GetStringSize() • _GetSystemPaths() • _GetURLImage() • _GIFImage() • _GoogleWeather() • _GUICtrlCreateGroup() • _GUICtrlListBox_CreateArray() • _GUICtrlListView_CreateArray() • _GUICtrlListView_SaveCSV() • _GUICtrlListView_SaveHTML() • _GUICtrlListView_SaveTxt() • _GUICtrlListView_SaveXML() • _GUICtrlMenu_Recent() • _GUICtrlMenu_SetItemImage() • _GUICtrlTreeView_CreateArray() • _GUIDisable() • _GUIImageList_SetIconFromHandle() • _GUIRegisterMsg() • _GUISetIcon() • _Icon_Clear()/_Icon_Set() • _IdleTime() • _InetGet() • _InetGetGUI() • _InetGetProgress() • _IPDetails() • _IsFileOlder() • _IsGUID() • _IsHex() • _IsPalindrome() • _IsRegKey() • _IsStringRegExp() • _IsSystemDrive() • _IsUPX() • _IsValidType() • _IsWebColor() • _Language() • _Log() • _MicrosoftInternetConnectivity() • _MSDNDataType() • _PathFull/GetRelative/Split() • _PathSplitEx() • _PrintFromArray() • _ProgressSetMarquee() • _ReDim() • _RockPaperScissors()/_RockPaperScissorsLizardSpock() • _ScrollingCredits • _SelfDelete() • _SelfRename() • _SelfUpdate() • _SendTo() • _ShellAll() • _ShellFile() • _ShellFolder() • _SingletonHWID() • _SingletonPID() • _Startup() • _StringCompact() • _StringIsValid() • _StringRegExpMetaCharacters() • _StringReplaceWholeWord() • _StringStripChars() • _Temperature() • _TrialPeriod() • _UKToUSDate()/_USToUKDate() • _WinAPI_Create_CTL_CODE() • _WinAPI_CreateGUID() • _WMIDateStringToDate()/_DateToWMIDateString() • Au3 script parsing • AutoIt Search • AutoIt3 Portable • AutoIt3WrapperToPragma • AutoItWinGetTitle()/AutoItWinSetTitle() • Coding • DirToHTML5 • FileInstallr • FileReadLastChars() • GeoIP database • GUI - Only Close Button • GUI Examples • GUICtrlDeleteImage() • GUICtrlGetBkColor() • GUICtrlGetStyle() • GUIEvents • GUIGetBkColor() • Int_Parse() & Int_TryParse() • IsISBN() • LockFile() • Mapping CtrlIDs • OOP in AutoIt • ParseHeadersToSciTE() • PasswordValid • PasteBin • Posts Per Day • PreExpand • Protect Globals • Queue() • Resource Update • ResourcesEx • SciTE Jump • Settings INI • SHELLHOOK • Shunting-Yard • Signature Creator • Stack() • Stopwatch() • StringAddLF()/StringStripLF() • StringEOLToCRLF() • VSCROLL • WM_COPYDATA • More Examples...

Updated: 04/09/2015

Share this post

Link to post
Share on other sites

#3 ·  Posted

Which version of AutoIt are you using? As some constants aren't available e.g. you're using GUIConstants.

This works on the latest beta of AutoIt.

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

Sorry for inconvenience and thanks for correction.

I use Autoit 3.3.7.18 but with modified copy of GUIConstants.au3

Explanation is here:

Resources UDF   ResourcesEx UDF   AutoIt Forum Search

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  
Followers 0
Go To Topic Listing AutoIt Example Scripts