AutoIt Wiki - User contributions [en]

AutoIt Snippets

2021-05-24T08:31:26Z

Argumentum: /* _IsInternetConnected */

Welcome To The AutoIt Snippets Page - ( '''''Snippet - A short reusable piece of computer code''''' ).

Snippets are generally single functions or small pieces of code which can be incorporated into a script to add extra functionality. This section covers a wide variety of subjects and uses. Examples may include anything from finding if an internet connection is working to retrieving the date Windows was installed. This page is intended to give easy access to the functions.

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== Examples ==

=== _IsInternetConnected ===

{{Snippet Header
| AuthorURL=35302-guinness | AuthorName=guinness
}}

<syntaxhighlight lang="autoit">
ConsoleWrite("Internet Is Connected" & " = " & _IsInternetConnected() & @CRLF) ; ( Returns "True" Or "False" )

Func _IsInternetConnected()
Local $aReturn = DllCall('connect.dll', 'long', 'IsInternetConnected')
If @error Then
Return SetError(1, 0, False)
EndIf
Return $aReturn[0] = 0
EndFunc ;==>_IsInternetConnected
</syntaxhighlight>

[[#top | ReturnToContents]]

=== _PasswordCrypt ===

{{Snippet Header
| AuthorURL=4920-valuater | AuthorName=Valuater
| ModifierURL=35302-guinness | ModifierName=guinness
}}

<syntaxhighlight lang="autoit">
#include <Crypt.au3>

Local $sGenericPassword_1 = 'Password@AutoIt', $sGenericPassword_2 = 'NewPassword@AutoIt', $sSavePath = @ScriptDir & '\License.dat'
ConsoleWrite('1. ' & _PasswordCrypt($sGenericPassword_1, $sSavePath) & @CRLF) ; Write the password to a file located in the @ScriptDir. The password we wrote is returned by the function.
ConsoleWrite('2. ' & _PasswordCrypt($sGenericPassword_1, $sSavePath) & @CRLF) ; Since the password has been written already, we now want to check if the user has entered the password correctly. Returns True or False.
ConsoleWrite('3. ' & _PasswordCrypt($sGenericPassword_2, $sSavePath, 1) & @CRLF) ; Overwrite the old password with a new one.
ConsoleWrite('4. ' & _PasswordCrypt($sGenericPassword_1, $sSavePath) & @CRLF) ; Check the password matches. This will fail as we're checking the old password against the new one.
FileDelete($sSavePath)

Func _PasswordCrypt($sPassword, $sFilePath, $iOverwrite = 0) ; By guinness, idea by Valuater.
If FileExists($sFilePath) And $iOverwrite = 0 Then
Return BinaryToString(_Crypt_DecryptData(IniRead($sFilePath, 'PasswordKey', 'Password', ''), @ComputerName, $CALG_AES_256)) == $sPassword
Else
If IniWrite($sFilePath, 'PasswordKey', 'Password', _Crypt_EncryptData($sPassword, @ComputerName, $CALG_AES_256)) Then
Return $sPassword
EndIf
EndIf
Return SetError(1, 0, '')
EndFunc ;==>_PasswordCrypt
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snippet Creation Help ==

* [[Snippets ( Creation )| Snippets Creation Examples ]]

== AutoIt Snippets Collection ==

=== AutoIt - AutoIt Examples. ===

* [[Snippets ( AutoIt Audio )| Audio Related ]] ( Last Updated - 16:58, 21 May 2012 (BST) )
* [[Snippets ( AutoIt )| AutoIt Miscellaneous ]] ( Last Updated - 12:22, 1 August 2012 (BST) )
* [[Snippets ( AutoIt Array )| AutoIt Array Related]] ( Last Updated - 13:17, 21 May 2012 (BST) )
* [[Snippets ( AutoIt Mouse & Keyboard )| AutoIt Mouse & Keyboard ]] ( Last Updated - 07:52, 3 August 2012 (BST) )
* [[Snippets ( AutoIt String )| AutoIt String Related ]] ( Last Updated - 12:45, 1 August 2012 (BST) )

=== GUI - Anything GUI related. ===

* [[Snippets ( Checkboxes )| Checkboxes & Radio ]] ( Last Updated - 21:04, 13 November 2012 (BST) )
* [[Snippets ( GUI )| GUI ]] ( Last Updated - 12:11, 1 August 2012 (BST) )
* [[Snippets ( Graphics )| Graphics And Images ]] ( Last Updated - 12:37, 1 August 2012 (BST) )
* [[Snippets ( Combo )| Combo, Array and SQLite]] ( Last Updated - 12:37, 18 August 2015 (BST) )

=== Hardware - Hardware Examples. ===

* [[Snippets ( Hardware Information )| Hardware Information ]] ( Last Updated - 11:02, 30 April 2012 (BST) )

=== Numbers - Math, Number & Time Examples. ===

* [[Snippets ( Math & Numbers )| Math & Numbers ]] ( Last Updated - 12:07, 1 August 2012 (BST) )
* [[Snippets ( Time & Date )| Time & Date ]] ( Last Updated - 14:11, 21 May 2012 (BST) )

=== Miscellaneous - All Other Examples. ===

* [[Snippets ( Miscellaneous )| Miscellaneous ]] ( Last Updated - 12:35, 1 August 2012 (BST) )

=== Networking - Network, Wireless and Internet Examples. ===

* [[Snippets ( Network )| Network ]] ( Last Updated - 12:33, 1 August 2012 (BST) )
* [[Snippets ( Internet )|Internet ]] ( Last Updated - 12:30, 1 August 2012 (BST) )
* [[Snippets ( Wireless )|Wireless ]] ( Last Updated - 19:19, 16 November 2012 (BST) )

=== Windows - Windows Examples. ===

* [[Snippets ( CMD ) |CMD - Commandline ]] (Last Updated - 19:24, 16 November 2012 (BST) )
* [[Snippets ( Files & Folders )| Files & Folders ]] ( Last Updated - 12:16, 1 August 2012 (BST) )
* [[Snippets ( Registry )| Registry ]] ( Last Updated - 17:26, 18 November 2012 (BST) )
* [[Snippets ( Windows Information )| Windows Information ]] ( Last Updated - 11:27, 30 April 2012 (BST) )
* [[Snippets ( Windows OS )| Windows OS ]] ( Last Updated - 14:35, 21 May 2012 (BST) )
* [[Snippets ( Windows Settings )| Windows Settings ]] ( Last Updated - 12:07, 1 August 2012 (BST) )
* [[Snippets ( Windows Users )| Windows Account Management ]] ( Last Updated - 14:13, 21 May 2012 (BST) )

== Other Links ==

[http://www.autoitscript.com/wiki/Free_Software Free Software Written in AutoIt]

AutoIt Snippets

2021-05-24T08:31:10Z

Argumentum: /* Examples */

Welcome To The AutoIt Snippets Page - ( '''''Snippet - A short reusable piece of computer code''''' ).

Snippets are generally single functions or small pieces of code which can be incorporated into a script to add extra functionality. This section covers a wide variety of subjects and uses. Examples may include anything from finding if an internet connection is working to retrieving the date Windows was installed. This page is intended to give easy access to the functions.

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== Examples ==

=== _IsInternetConnected ===

{{Snippet Header
AuthorURL=35302-guinness | AuthorName=guinness
}}

<syntaxhighlight lang="autoit">
ConsoleWrite("Internet Is Connected" & " = " & _IsInternetConnected() & @CRLF) ; ( Returns "True" Or "False" )

Func _IsInternetConnected()
Local $aReturn = DllCall('connect.dll', 'long', 'IsInternetConnected')
If @error Then
Return SetError(1, 0, False)
EndIf
Return $aReturn[0] = 0
EndFunc ;==>_IsInternetConnected
</syntaxhighlight>

[[#top | ReturnToContents]]

=== _PasswordCrypt ===

{{Snippet Header
| AuthorURL=4920-valuater | AuthorName=Valuater
| ModifierURL=35302-guinness | ModifierName=guinness
}}

<syntaxhighlight lang="autoit">
#include <Crypt.au3>

Local $sGenericPassword_1 = 'Password@AutoIt', $sGenericPassword_2 = 'NewPassword@AutoIt', $sSavePath = @ScriptDir & '\License.dat'
ConsoleWrite('1. ' & _PasswordCrypt($sGenericPassword_1, $sSavePath) & @CRLF) ; Write the password to a file located in the @ScriptDir. The password we wrote is returned by the function.
ConsoleWrite('2. ' & _PasswordCrypt($sGenericPassword_1, $sSavePath) & @CRLF) ; Since the password has been written already, we now want to check if the user has entered the password correctly. Returns True or False.
ConsoleWrite('3. ' & _PasswordCrypt($sGenericPassword_2, $sSavePath, 1) & @CRLF) ; Overwrite the old password with a new one.
ConsoleWrite('4. ' & _PasswordCrypt($sGenericPassword_1, $sSavePath) & @CRLF) ; Check the password matches. This will fail as we're checking the old password against the new one.
FileDelete($sSavePath)

Func _PasswordCrypt($sPassword, $sFilePath, $iOverwrite = 0) ; By guinness, idea by Valuater.
If FileExists($sFilePath) And $iOverwrite = 0 Then
Return BinaryToString(_Crypt_DecryptData(IniRead($sFilePath, 'PasswordKey', 'Password', ''), @ComputerName, $CALG_AES_256)) == $sPassword
Else
If IniWrite($sFilePath, 'PasswordKey', 'Password', _Crypt_EncryptData($sPassword, @ComputerName, $CALG_AES_256)) Then
Return $sPassword
EndIf
EndIf
Return SetError(1, 0, '')
EndFunc ;==>_PasswordCrypt
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snippet Creation Help ==

* [[Snippets ( Creation )| Snippets Creation Examples ]]

== AutoIt Snippets Collection ==

=== AutoIt - AutoIt Examples. ===

* [[Snippets ( AutoIt Audio )| Audio Related ]] ( Last Updated - 16:58, 21 May 2012 (BST) )
* [[Snippets ( AutoIt )| AutoIt Miscellaneous ]] ( Last Updated - 12:22, 1 August 2012 (BST) )
* [[Snippets ( AutoIt Array )| AutoIt Array Related]] ( Last Updated - 13:17, 21 May 2012 (BST) )
* [[Snippets ( AutoIt Mouse & Keyboard )| AutoIt Mouse & Keyboard ]] ( Last Updated - 07:52, 3 August 2012 (BST) )
* [[Snippets ( AutoIt String )| AutoIt String Related ]] ( Last Updated - 12:45, 1 August 2012 (BST) )

=== GUI - Anything GUI related. ===

* [[Snippets ( Checkboxes )| Checkboxes & Radio ]] ( Last Updated - 21:04, 13 November 2012 (BST) )
* [[Snippets ( GUI )| GUI ]] ( Last Updated - 12:11, 1 August 2012 (BST) )
* [[Snippets ( Graphics )| Graphics And Images ]] ( Last Updated - 12:37, 1 August 2012 (BST) )
* [[Snippets ( Combo )| Combo, Array and SQLite]] ( Last Updated - 12:37, 18 August 2015 (BST) )

=== Hardware - Hardware Examples. ===

* [[Snippets ( Hardware Information )| Hardware Information ]] ( Last Updated - 11:02, 30 April 2012 (BST) )

=== Numbers - Math, Number & Time Examples. ===

* [[Snippets ( Math & Numbers )| Math & Numbers ]] ( Last Updated - 12:07, 1 August 2012 (BST) )
* [[Snippets ( Time & Date )| Time & Date ]] ( Last Updated - 14:11, 21 May 2012 (BST) )

=== Miscellaneous - All Other Examples. ===

* [[Snippets ( Miscellaneous )| Miscellaneous ]] ( Last Updated - 12:35, 1 August 2012 (BST) )

=== Networking - Network, Wireless and Internet Examples. ===

* [[Snippets ( Network )| Network ]] ( Last Updated - 12:33, 1 August 2012 (BST) )
* [[Snippets ( Internet )|Internet ]] ( Last Updated - 12:30, 1 August 2012 (BST) )
* [[Snippets ( Wireless )|Wireless ]] ( Last Updated - 19:19, 16 November 2012 (BST) )

=== Windows - Windows Examples. ===

* [[Snippets ( CMD ) |CMD - Commandline ]] (Last Updated - 19:24, 16 November 2012 (BST) )
* [[Snippets ( Files & Folders )| Files & Folders ]] ( Last Updated - 12:16, 1 August 2012 (BST) )
* [[Snippets ( Registry )| Registry ]] ( Last Updated - 17:26, 18 November 2012 (BST) )
* [[Snippets ( Windows Information )| Windows Information ]] ( Last Updated - 11:27, 30 April 2012 (BST) )
* [[Snippets ( Windows OS )| Windows OS ]] ( Last Updated - 14:35, 21 May 2012 (BST) )
* [[Snippets ( Windows Settings )| Windows Settings ]] ( Last Updated - 12:07, 1 August 2012 (BST) )
* [[Snippets ( Windows Users )| Windows Account Management ]] ( Last Updated - 14:13, 21 May 2012 (BST) )

== Other Links ==

[http://www.autoitscript.com/wiki/Free_Software Free Software Written in AutoIt]

FAQ

2021-05-22T19:38:06Z

Argumentum: /* Information about Environment */

This is a list of frequently asked questions asked on the forums.

Other FAQs include:
* The one found in the [http://www.autoitscript.com/autoit3/docs/faq.htm AutoIt HelpFile]. Much of it is about the transition from V2 to V3, but most is still relevant and should be a port of call, as well as this one.

==How can I debug my script?==

=== In SciTE ===
This one has a myriad of answers, but the most effective is to begin by using the [http://www.autoitscript.com/autoit3/scite/ SciTE4AutoIt3 Editor] to create or edit scripts. This program is useful in debugging for the following reasons:

* Syntax highlighting allows for immediate viewing of any mistakes from unended script tags or quotes. This allows the scripter to visibly see the difference between the following portions of code.
[[File:FAQ_Q1_2.jpg|center|Incorrect code]]
And the correct version:
[[File:FAQ_Q1_3.jpg|center||Correct Code]]
* Global syntax check built directly into the tools menu allows you to check an entire script for problems all at once.
* Built-in code tidying program that correctly indents untidy code and repairs messy scripts to allow them to be more readable. It also corrects problems with incorrectly capitalised function names and variables.
* Per-line trace insertion allows you to log every line of code executed to debug errors.
* Debug MsgBoxes or ConsoleWrites are able to be added anywhere in the script directly from SciTE. ConsoleWrite lines are less intrusive and prevent the added annoyance to the user of MsgBoxes.

You can also use AutoIt3Wrapper directive:
<syntaxhighlight lang="autoit">#AutoIt3Wrapper_Run_Debug_Mode=Y</syntaxhighlight>
[[File:FAQ_Q1_4.jpg|center|Picture of SciTE4AutoIt3]]

=== Using more code to check @error value ===
Nearly all functions will return something. Most of the time when a function fails, it returns 0 and sets @error. You can use this information not only to create scripts that handle for different errors but to debug and find out exactly why you are having problems. Check the help file for specific functions and their return values.

<syntaxhighlight lang="autoit">
#include <MsgBoxConstants.au3>

_Example()

Func _Example()
Local $aFileList = _FileListToArray(@ScriptDir, 'NO_EXISTING_FILE.TEST')
If @error Then ; check if _FileListToArray() function return any error
MsgBox($MB_ICONERROR, '_FileListToArray', '@error = ' & @error & @CRLF & '@extended = ' & @extended) ; show error message
Return ; return / exit from function to prevent unexpected further error's
EndIf

For $iFile_idx = 1 To $aFileList[0]
FileRead($aFileList[$iFile_idx])
; any further code
Next

EndFunc ;==>_Example
</syntaxhighlight>

=== Via the Tray icon===
You can add this line at the top of your script (1 is on, 0 is off) to enable debugging from the tray icon.

<syntaxhighlight lang="autoit">AutoItSetOption ("TrayIconDebug", 1);0-off</syntaxhighlight>
Then if you run the script (uncompiled as an AU3 file), you can mouse over the AutoIt icon in the system tray (down by the clock) to display debugging information.

[[File:FAQ_Q1_1.jpg|center|Example output for TrayIconDebug]]

=== OutputDebugString native call ===
You can also debug a script on any computer by adding the following code to your script:

<syntaxhighlight lang="autoit">
Func _MyDebug($sMessage, $iError = @error, $iExtended = @extended)
If $iError Or $iExtended Then
$sMessage &= '[ @error = ' & $iError & ' @extended = ' & $iExtended & ' ]'
EndIf
DllCall("kernel32.dll", "none", "OutputDebugString", "str", $sMessage)
Return SetError($iError, $iExtended, '')
EndFunc ;==>_MyDebug
</syntaxhighlight>
Then, when you need to add a debug line, call it as necessary. Example:

<syntaxhighlight lang="autoit">_MyDebug("The value of Variable 1 at this time is " & $var1)</syntaxhighlight>
This debugging is completely transparent to the user, and is only viewable with a program such as DebugView from SysInternals. This method of debugging has the added advantage of being available to the developer in situations where is not acceptable or feasable to install SciTE on a client's unit.

=== Graphical debugger ===
Stumpii created a [http://www.autoitscript.com/forum/index.php?showtopic=21834 Graphical AutoIt Debugger], similar to Dev-C++'s debugging style.

[[File:FAQ_Q1_5.jpg|center|Stumpii's Graphical AutoIt Debugger]]

=== Another debugger for AutoIt ===
Heron created a [http://www.autoitscript.com/forum/index.php?showtopic=103142 Another debugger for AutoIt].

The latest version by asdf8 is here:
https://www.autoitscript.com/forum/topic/103142-another-debugger-for-autoit/?do=findComment&comment=1303208

=== Other UDF to log/trace/script analyze ===
* [http://www.autoitscript.com/forum/index.php?showtopic=195882 ErrorLog (by mLipok)] - Logs program activities and errors to different output locations.
* [http://www.autoitscript.com/forum/index.php?showtopic=156196 Log4a (by zorphnog)] - Logging library loosely based upon the log4j and NLog libaries.
* [http://www.autoitscript.com/forum/index.php?showtopic=195862 Loga (by Danyfirex)] - Simple logging library to keep track of code with an integrated console.

==How can I run something that is not an exe file [.txt, .msi, .pdf,.jpg etc.] [or] How can I open a webpage in the default browser?==
It was for this reason that the ShellExecute function was created. Here is one example:

<syntaxhighlight lang="autoit">ShellExecute("C:\autoitscripts\test.au3", "", "", "edit", @SW_MAXIMIZE)</syntaxhighlight>

You can also specify a web address this way:

<syntaxhighlight lang="autoit">ShellExecute("http://www.autoitscript.com/forum", "", "", "open")</syntaxhighlight>

If you normally are able to right-click the file and select print, then you can also print the file from AutoIt using this function:

<syntaxhighlight lang="autoit">ShellExecute("C:\boot.ini", "", "", "print")</syntaxhighlight>

If you wish to open the file with the default program, you can do as follows:
<syntaxhighlight lang="autoit">ShellExecute("C:\autoitscripts\test.au3")</syntaxhighlight>

If you wish your script to wait until the process is finished, you can use the ShellExecuteWait function with the same parameters.

Note:
The default verb is the verb configured in the registry. If no verb is set as default in the registry then the "open" verb is used. If the "open" verb is not present then the first verb listed in the registry is used.

==How can I prevent more than one copy of my script from running at once, or detect another copy of my script running?==

=== _Singleton function ===
There are a few different ways to go about this. You can use a function called _Singleton to detect multiple instances of your script. An example of how to use this code:

<syntaxhighlight lang="autoit">#include <Misc.au3>
_Singleton("TheNameOfMyScript")</syntaxhighlight>

In this instance, the script will bring up some messages explaining to the user of the occurring events.
This example will show you how the above function can be used in a real world application.
<syntaxhighlight lang="autoit">#include <Misc.au3>
#include <MsgBoxConstants.au3>

If _Singleton("MyScriptName", 1) = 0 Then
; If successful, running our script a second time should cause us to fall through here
MsgBox($MB_ICONERROR, "User Generated Error Message", "Error: This script is already running!")
Else
; We have detected that we are the only instance running, now we will run a second instance to display _Singleton's function!
MsgBox($MB_ICONINFORMATION, "Information!", "We are the first instance of this script, press OK to run another instance and trigger the error message!")
Switch @Compiled
Case 1
Run(FileGetShortName(@ScriptFullPath));when running an app, it's usually better to use its short name
Case 0
Run(FileGetShortName(@AutoItExe) & ' /AutoIt3ExecuteScript ' & FileGetShortName(@ScriptFullPath))
EndSwitch
Sleep(1000)
MsgBox($MB_ICONINFORMATION, "Information!", "We ran a second instance, you should have recieved an error message!", 5)
EndIf
Exit</syntaxhighlight>

===_MutexExists function ===
Another method is to use _MutexExists.

<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

If _MutexExists("MydeswswScriptName") Then
; We know the script is already running. Let the user know.
MsgBox($MB_OK, "Script Name", "This script is already running. Using multiple copies of this script at the same time is unsupported!")
Exit
EndIf

;Function Author- Martin
Func _MutexExists($sOccurenceName)
Local $ERROR_ALREADY_EXISTS = 183, $handle, $lastError
$sOccurenceName = StringReplace($sOccurenceName, "", ""); to avoid error
$handle = DllCall("kernel32.dll", "int", "CreateMutex", "int", 0, "long", 1, "str", $sOccurenceName)
$lastError = DllCall("kernel32.dll", "int", "GetLastError")
Return $lastError[0] = $ERROR_ALREADY_EXISTS
EndFunc;==>_MutexExists</syntaxhighlight>

==How can I run my script as a service?==
This is also a question with multiple answers, and none of them are the only way to do it. The first question to ask yourself is whether or not you wish to install the service on other computers besides your own.

=== On your own computer - One time only ===
The easiest way to do this is to use Pirmasoft RunAsSvc. This program makes services easy to install and easy to remove when necessary.

=== On all computers that run your script===
To do this you can use SRVANY.EXE and [http://www.autoitscript.com/forum/index.php?showtopic=6487 ServiceControl.au3]. You can then use this code to install your script as a service:

<syntaxhighlight lang="autoit">
#include "ServiceControl.au3"
$servicename = "MyServiceName"
_CreateService("", $servicename, "My AutoIt Script", "C:\Path_to_\srvany.exe", "LocalSystem", "", 0x110)
RegWrite("HKLM\SYSTEM\CurrentControlSet\Services\" & $servicename & "\Parameters", "Application", "REG_SZ", @ScriptFullPath)
</syntaxhighlight>

Or use the following code to delete this service:

<syntaxhighlight lang="autoit">
#include "ServiceControl.au3"
$servicename = "MyServiceName"
_DeleteService("", $servicename)
</syntaxhighlight>

There is one caveat to setting up AutoIt as a service. If the service is not installed using the above code, it must have the "allow service to interact with the desktop" setting or else automation functions such as Control* or Win* functions will not function. To assure the service does indeed have this setting, use the following code:

<syntaxhighlight lang="autoit">RegWrite("HKLM\SYSTEM\CurrentControlSet\Services\[ServiceName]", "Type", "REG_DWORD", 0x110)</syntaxhighlight>

==How can I create/start/stop or otherwise control a service?==
There are two include libraries that are designed specifically to interact with services. These are the following:

* [http://www.autoitscript.com/forum/index.php?showtopic=6487 ServiceControl.au3] made by SumTingWong. Functionality:
** _StartService()
** _StopService()
** _ServiceExists()
** _ServiceRunning()
** _CreateService()
** _DeleteService()
* [http://www.autoitscript.com/forum/index.php?showtopic=22165 _NTServices.au3] made by CatchFish. Functionality:
** _ServiceStart()
** _ServiceStop()
** _ServiceStatus()
** _ServicePause()

==How can I display a progress bar while copying files or directories?==
There are a many different topics on how to do this. For more, just search the forums for [http://www.autoitscript.com/forum/index.php?act=Search&CODE=show&searchid=22030d4d4effe5e32da23fdb69ed772f&search_in=posts&result_type=topics&highlite=%2BCopy%2B Progress Copy + Progress].
* [http://www.autoitscript.com/forum/index.php?showtopic=11313 Copy with progress dialog]... By ezztabi
* [http://www.autoitscript.com/forum/index.php?showtopic=11888 Yet another copy with progress]... By SumTingWong
* [http://www.autoit.de/index.php?page=Thread&postID=58875 _MultiFileCopy]... By Oscar (German Forums)
* [http://www.autoitscript.com/forum/index.php?showtopic=19370&st=45&p=186198&#entry186198 _FileCopy]... By Jos

[[File:FAQ_Q6_1.jpg|center|Copy progress dialog by ezztabi]]

==How can I make a hotkey that only works in my GUI?==
It used to be quite tedious setting hotkeys to only work in your GUI. Now there is an easier way with the function GUISetAccelerators.

(From Helpfile example)
<syntaxhighlight lang="autoit">
; A simple custom messagebox that uses the MessageLoop mode
#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>

GUICreate("Custom Msgbox", 210, 80)

GUICtrlCreateLabel("Please click a button!", 10, 10)
$YesID = GUICtrlCreateButton("Yes", 10, 50, 50, 20)
$NoID = GUICtrlCreateButton("No", 80, 50, 50, 20)
$ExitID = GUICtrlCreateButton("Exit", 150, 50, 50, 20)

; Set accelerators for Ctrl+y and Ctrl+n
Dim $AccelKeys[2][2]=[["^y", $YesID], ["^n", $NoID]]
GUISetAccelerators($AccelKeys)

GUISetState(); display the GUI

Do
$msg = GUIGetMsg()

Select
Case $msg = $YesID
MsgBox($MB_OK, "You clicked on", "Yes")
Case $msg = $NoID
MsgBox($MB_OK, "You clicked on", "No")
Case $msg = $ExitID
MsgBox($MB_OK, "You clicked on", "Exit")
Case $msg = $GUI_EVENT_CLOSE
MsgBox($MB_OK, "You clicked on", "Close")
EndSelect
Until $msg = $GUI_EVENT_CLOSE Or $msg = $ExitID
</syntaxhighlight>

==How can I perform an action while a key is held down?==
You can use the _IsPressed() function to determine when a key is held down. The values that can be specified in this function are listed in the AutoIt Help File under User Defined Functions -> Misc Management -> _IsPressed. The following example will press the left mouse button while the k key is held down.

<syntaxhighlight lang="autoit">#include <Misc.au3>
$pressed = 0
While 1
If _IsPressed("4B") Then
If Not $pressed Then
ToolTip("K Key being held down")
MouseDown("left")
$pressed = 1
EndIf
Else
If $pressed Then
ToolTip("")
MouseUp("left")
$pressed = 0
EndIf
EndIf
Sleep(250)
WEnd</syntaxhighlight>

==How can I run my script on a remote computer over the network?==
The answer to this question depends on how much experience you have in networking. If the target system is a Windows system to which you have administrator access then you may use one of the following programs:

* PsExec from SysInternals
* BeyondExec from BeyondLogic

With either of these programs it is possible to launch any process on a remote system and even copy your script to the target computer before starting it. Neither these programs nor any others will work with Windows XP Home Edition unless you create a custom "command listener" that you manually install on the target system.

NOTE: Those of you with more advanced programming skills and a little imagination can figure out how to use the service control libraries and srvany.exe to do this same thing without either of the above mentioned programs.

==How can I make a User Defined Function with optional parameters like the ones I see in the Help File?==
You can specify optional parameters by giving them a default value in the Func declaration. An example of how this is done:
<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

Func testme($param1, $param2 = "nothing", $param3 = 5)
MsgBox($MB_OK, "", "Parameter one is required. The value of Parameter 1 is " & $param1 & @CRLF & _
"Parameter 2 is optional. The value of Parameter 2 is " & $param2 & @CRLF & _
"Parameter 3 is optional. The value of Parameter 3 is " & $param3)
EndFunc</syntaxhighlight>

If testme() is called with only one parameter [I.E. testme("test")] then the output is:
<blockquote>
Parameter one is required. The value of Parameter 1 is test 
Parameter 2 is optional. The value of Parameter 2 is nothing 
Parameter 3 is optional. The value of Parameter 3 is 5 
</blockquote>
However, if the function is called with more than one parameter like this testme("test", "something"), then the output is
<blockquote>
Parameter one is required. The value of Parameter 1 is test 
Parameter 2 is optional. The value of Parameter 2 is something 
Parameter 3 is optional. The value of Parameter 3 is 5 
</blockquote>

==How can I make my script start every time windows starts?==
You can use one of the following codes to allow your script to start with Windows:
<syntaxhighlight lang="autoit">RegWrite("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "MyProgramName", "REG_SZ", @ScriptFullPath)</syntaxhighlight>
or
<syntaxhighlight lang="autoit">FileCreateShortcut(@ScriptFullPath, @StartupCommonDir & "\MyProgramName.lnk")</syntaxhighlight>
or place a Shortcut in the Startup folder, or the entire Executable. For Win8+ systems, use the Win+R keys to open a Run box, then "Shell:Startup" to access the Startup folder. Due to Windows User Account Control (UAC) restrictions, your script may require [https://www.autoitscript.com/autoit3/docs/keywords/RequireAdmin.htm #RequireAdmin].

==How can I have the script delete itself?==
The following function will delete the running script or .exe once it has finished execution.

'''WARNING: Make a copy of your script before calling this function!!!'''

<syntaxhighlight lang="autoit">
Func _SelfDelete($iDelay = 0)
Local $sCmdFile
FileDelete(@TempDir & "\scratch.bat")
$sCmdFile = 'ping -n ' & $iDelay & ' 127.0.0.1 > nul' & @CRLF _
& ':loop' & @CRLF _
& 'del "' & @ScriptFullPath & '"' & @CRLF _
& 'if exist "' & @ScriptFullPath & '" goto loop' & @CRLF _
& 'del %0'
FileWrite(@TempDir & "\scratch.bat", $sCmdFile)
Run(@TempDir & "\scratch.bat", @TempDir, @SW_HIDE)
EndFunc;==>_SelfDelete
</syntaxhighlight>

==How can I create a clickable website hyperlink in my gui?==
[[File:FAQ_Q13_1.jpg|center|Example GUI using Gary's UDF.]]

Gary Frost has made great advances in this area and has provided a [http://www.autoitscript.com/forum/index.php?showtopic=23111&st=0 UDF here] ('''the UDF was removed from the post''') to help with doing this.

==How can I change the screen resolution / refresh rate / color depth?==
[http://www.autoitscript.com/forum/index.php?showtopic=20121 ChangeResolution.au3] is a library function created to make changes to these settings.

== How can I get the screen resolution in multiple monitor setups?==
The following code was worked out by Larry to determine the total screen resolution of multiple monitors:

<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

$aTSR = _GetTotalScreenResolution()
MsgBox($MB_OK, "Total Screen Resolution", "Width = " & $aTSR[0] & @CRLF & _
"Height = " & $aTSR[1])

;Original code by Larry.
;Edited by BrettF
Func _GetTotalScreenResolution()
Local $aRet[2]
Global Const $SM_VIRTUALWIDTH = 78
Global Const $SM_VIRTUALHEIGHT = 79
$VirtualDesktopWidth = DllCall("user32.dll", "int", "GetSystemMetrics", "int", $SM_VIRTUALWIDTH)
$aRet[0] = $VirtualDesktopWidth[0]
$VirtualDesktopHeight = DllCall("user32.dll", "int", "GetSystemMetrics", "int", $SM_VIRTUALHEIGHT)
$aRet[1] = $VirtualDesktopHeight[0]
Return $aRet
EndFunc
</syntaxhighlight>

== How can I register a file type with my program [or] How can I make files with a certain extension open in my program?==
[[File:FAQ_Q16_1.jpg|center|Example of how a file type can be registered.]]
File registration can be a tricky business for those who have not done it before. The first thing to be done is to modify your script to allow it to accept files from the command line. Here is one example of how to do this:

<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

;$cmdline[0] is the number of parameters passed
If $cmdline[0] <> 0 Then
$filename = $cmdline[1]
;Do something with the file here
MsgBox($MB_OK, "UXYFixer", 'The file name passed to the command line is "' & $filename & '"')
Else
; We did not get any command line parameters.
; If this is a command line only program, you would want to
; alert the user that the command line parameters were incorrect.
; If this is a GUI program (like a notepad program), you would
; want to simply continue from here without opening a file.
MsgBox($MB_OK, "UXYFixer", 'Command line parameters incorrect.' & @CRLF & 'Command line usage: "' & @ScriptName & '" "file to process"')
EndIf</syntaxhighlight>
After your script is ready to accept files, you can begin to register the file type you need with your program. To prevent errors, this-is-me has created a UDF that will allow you to do this easily:

Here is an example of how to register and unregister a file extension using this UDF:
<syntaxhighlight lang="autoit">#include "FileRegister.au3"
;================================================
;
; Description: FileRegister($ext, $cmd, $verb [, $def [, $icon = "" [, $desc = "" ]]])
; Registers a file type in Explorer
;
; Parameter(s): $ext - File Extension without period eg. "zip"
; $cmd - Program path with arguments eg. '"C:\test\testprog.exe" "%1"'
; (%1 is 1st argument, %2 is 2nd, etc.)
; $verb - Name of action to perform on file
; eg. "Open with ProgramName" or "Extract Files"
; $def - Action is the default action for this filetype
; (1 for true 0 for false)
; If the file is not already associated, this will be the default.
; $icon - Default icon for filetype including resource # if needed
; eg. "C:\test\testprog.exe,0" or "C:\test\filetype.ico"
; $desc - File Description eg. "Zip File" or "ProgramName Document"
;
;================================================

FileRegister("uxy", '"' & @ScriptFullPath & '" "%1"', "Open in UXYFixer", 1, @ScriptFullPath & ',0', "UXYFixer Document")

;========================================
;
; Description: FileUnRegister($ext, $verb)
; UnRegisters a verb for a file type in Explorer
; Parameter(s): $ext - File Extension without period eg. "zip"
; $verb - Name of file action to remove
; eg. "Open with ProgramName" or "Extract Files"
;
;========================================

FileUnRegister("uxy", "Open in UXYFixer")</syntaxhighlight>

'''Download here:'''
[http://www.autoitscript.com/forum/index.php?app=core&module=attach&section=attach&attach_id=26378 FileRegister.au3]

==Why doesn't my combobox (GUICtrlCreateCombo) show a dropdown list when clicked?==
When using GUICtrlCreateCombo be sure to enter the desired height for your combobox list in the "height" parameter. Windows XP automatically selects an appropriate height for combo boxes, but other versions of Windows usually do not.
<syntaxhighlight lang="autoit">$combo = GUICtrlCreateCombo("",10,10,200,20)</syntaxhighlight>
Would correctly be changed to:
<syntaxhighlight lang="autoit">$combo = GUICtrlCreateCombo("",10,10,200,200)</syntaxhighlight>

==Why isn't my thread getting any replies?==

=== Asking the right question right ===
Did you give a good description of the problem? If your title or explanation of the issue is not descriptive, users are likely to bypass your issue instead of helping. Post titles such as "Help Me", "I Have A Problem", "Question", "Help me fix my code", "This code doesn't work" or similarly worded titles will not readily draw forum users to your post. Experienced users (which are your best hope of resolving the issue) will often skip your post altogether in cases like this. An example of a post title descriptive enough to attract users to assist you is "Problem with WinWaitClose" or "Loop never ends".

=== Example for reproduction ===
Did you post example code? If you have not posted an example of the code you are having an issue with, then you will not recieve support. When posting a non-working script, please do so in the smallest amount of stand-alone code possible. If the code you post cannot run by itself on another person's computer, they will not be able to recreate the issue.

=== Information about Environment ===
Did you provide any information about your AutoIt Development Environment ?

<syntaxhighlight lang="autoit">
#include <APILocaleConstants.au3>
#include <WinAPILocale.au3>
; Version: 1.01. AutoIt: V3.3.14.2
; Retrieve the recommended information of the current system when posting a support question.
Local $sSystemInfo = 'I have a valid AutoIt support question and kindly provided the details of my system:' & _
@CRLF & @CRLF & 'AutoIt Version: V' & @AutoItVersion & ' [' & (@AutoItX64 ? 'X64' : 'X32') & ']' & _
@CRLF & 'Windows Version: ' & @OSVersion & '/' & (@OSServicePack <> "" ? @OSServicePack : _
RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion", "ReleaseId")) & _
' [' & @OSArch & ']' & @CRLF & 'Language: ' & _GetOSLanguage() & ' (' & @OSLang & ')' & @CRLF & @CRLF
ClipPut($sSystemInfo)
MsgBox(4096, 'This info has been copied to the clipboard. Use Ctrl + V to retrieve it.', $sSystemInfo)

Func _GetOSLanguage()
Return _WinAPI_GetLocaleInfo(_WinAPI_GetUserDefaultLCID(), $LOCALE_SLANGUAGE)
EndFunc ;==>_GetOSLanguage
</syntaxhighlight>

=== Speak English and speak it right ===
Did you use proper English? Here are guidelines for posting properly in the English language:
* Use proper case. THIS IS CONSIDERED YELLING. If you post in ALL UPPERCASE or all lowercase then you will not be taken seriously.
* Use proper punctuation. Complete sentences need only one trailing punctuation mark. Twelve exclamation points after every sentence will not get you an answer more quickly (just the opposite) Writing a sentence without simple punctuation such as commas reflects badly on your attention to detail, and is considered a good judge of the poster's coding style. If you cannot summon the intellect to write a sentence with correct punctuation, you will most likely miss simple coding mistakes such as unterminated quotes.

=== Breaking forum rules, law, modesty, or common sense ===
Show common sense by following the forum rules, http://www.autoitscript.com/forum/topic/169097-forum-rules/, as well as generally accepted forum etiquette. Repeated failure to do so will result in sanctions by the Moderation team as it ruins the experience for everyone.

==Why does the Ctrl key get stuck down after I run my script?==

=== Keys virtually stuck ===
It could equally be the Shift or the Alt key.

If you use Send in a script and you have a problem with keys being stuck down then Send is the most likely culprit. A similar problem can occur with BlockInput. The solution is generally quite simple. If there is a key like Shift or Alt held down at the start of the Send sequence, but that key is released by the time the Send sequence finishes then the key will get 'stuck' down. As an example of a solution, you could replace the Send function in your script with the _SendEx function below.

The _SendEx function waits for the Shift, Alt and Ctrl keys to be released or pops up a warning if the $warn parameter is not an empty string. Therefore it is not intended to be used when one of these modifier keys has been set to be down using any combination of {ALTDOWN}, {SHIFTDOWN} and {ALTDOWN}.
<syntaxhighlight lang="autoit">
#include < Misc.au3 >
#include <MsgBoxConstants.au3>
;Send the string $ss after the Shift Alt and Ctrl keys are released. Optionally give a warning after 1 sec if any of those keys are still down.
;Requires misc.au3 to be included in the script for the _IsPressed function.

Func _SendEx($ss, $warn = "")
Local $iT = TimerInit()

While _IsPressed("10") Or _IsPressed("11") Or _IsPressed("12")
If $warn <> "" And TimerDiff($iT) > 1000 Then
MsgBox($MB_TOPMOST, "Warning", $warn)
EndIf
Sleep(50)
WEnd
Send($ss)
EndFunc;==>_SendEx</syntaxhighlight>

=== General unstuck method ===
Shilbiz also discovered that the following can 'clear' locked down keys.
<syntaxhighlight lang="autoit"> ControlSend("", "", "", "text", 0)</syntaxhighlight>

==How can I use Pixel functions?==

=== Using a color change as an event ===
The following is an example of using the pixel to check if the colour has changed in a specific region.
<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

Local $PixelCheck = 0, $NewCheck
$PixelCheck = PixelCheckSum(40, 50, 60, 70); Get the checksum for this area.
While 1; Keep going
$NewCheck = PixelCheckSum(40, 50, 60, 70)
If $PixelCheck <> $NewCheck Then
; The old pixel checksum and the new one are different.
$PixelCheck = $NewCheck; Update the $PixelCheck to the new value
; Let us know it has changed. Change this to what you want to happen when the colour in the region changes.
Msgbox($MB_ICONWARNING,"PixelChecksum","Pixel region has changed !")
EndIf
Sleep(50); Just to give the CPU a bit of a break.
Wend</syntaxhighlight>

=== Searching for a specific pixel color ===
This is an example of searching for a specific pixel (red), both pure red (0xFF0000) and red in a few different shades.
<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>
; Find a pure red pixel in the range 0,0-20,300

$coord = PixelSearch( 0, 0, 20, 300, 0xFF0000 )
If Not @error Then
MsgBox($MB_OK, "X and Y are:", $coord[0] & "," & $coord[1])
EndIf

; Find a pure red pixel or a red pixel within 10 shades variations of pure red
$coord = PixelSearch( 0, 0, 20, 300, 0xFF0000, 10 )
If Not @error Then
MsgBox($MB_OK, "X and Y are:", $coord[0] & "," & $coord[1])
EndIf</syntaxhighlight>

==Why doesn't my script work on a locked workstation?==
On a locked station any window will never be active (active is only dialog with text "Press Ctrl+Alt+Del"). In Windows locked state applications run hidden (behind that visible dialog) and do not have focus and active status. So generally don't use Send() MouseClick() WinActivate() WinWaitActive() WinActive() etc. Instead use ControlSend() ControlSetText() ControlClick() WinWait() WinExists() WinMenuSelectItem() etc. Doing so allows you to interact with an application regardless of whether it is active or not. It's possible to run such a script from scheduler on locked Windows stations.

==Where can I learn AutoIt? Are there any tutorials?==
AutoIt is a constantly growing and evolving language with a diverse and engaged community of volunteers. This wiki, along with the official forum, will always be your best place for answers to questions as well as examples and tutorials. With this in mind, below are a few resources that can also help you as you become familiar with the language:

AutoIt 1-2-3, an interactive classroom by Valuater:
[http://www.autoitscript.com/forum/index.php?showtopic=21048 http://www.autoitscript.com/forum/index.php?showtopic=21048]

BrettF's updated AutoIt tutorial:
[http://www.autoitscript.com/forum/index.php?showtopic=84960 http://www.autoitscript.com/forum/index.php?showtopic=84960]

"Learn To Program Using FREE Tools with AutoIt" PDF Book by Jfish
[https://www.autoitscript.com/forum/files/file/351-learn-to-program-using-free-tools-with-autoit/ Learn To Program Using FREE Tools with AutoIt]

YouTube has a number of videos available:
[http://www.youtube.com/results?search_query=autoit+tutorial&search_type=&aq=0&oq=AutoIt YouTube AutoIt tutorials list]

As always, when asking questions about a video or script you saw on an external source, please ensure you are adhering to the [[FAQ#Breaking_forum_rules.2C_law.2C_modesty.2C_or_common_Sense|forum rules]].

==Why does my script no longer decompile?==
Decompilation is no longer supported, and is only available for the older versions of AutoIt (Version 3.2.5.1 and earlier compiled scripts).

Please '''do not''' post on this topic; see the [[Decompiling FAQ]] for more information. Topics discussing decompilation of scripts will be locked immediately. Posting the source of a decompiled script with lead to immediate sanctions from the Moderation team, as it directly violates AutoIt EULA (End-User-License-Agreement).

<blockquote>You may not reverse engineer or disassemble the SOFTWARE PRODUCT or compiled scripts that were created with the SOFTWARE PRODUCT.</blockquote>

==How can I get a window handle when all I have is a PID?==
Refer to the following example showing converting and use when manipulating the window. The function is based on work by Smoke_N/Hubertus and Helge.
<syntaxhighlight lang="autoit">;Run process
$iPID = Run("Notepad.exe")

;Allow window to initialize...
Sleep (500)

;Get HWND.
$hWnd = _GetHwndFromPID($iPID)

;Maximize
WinSetState($hWnd, "", @SW_MAXIMIZE)

;Wait 2 seconds
Sleep(2000)

;Minimize
WinSetState($hWnd, "", @SW_MINIMIZE)

;Wait 2 seconds
Sleep(2000)

;Restore window
WinSetState($hWnd, "", @SW_RESTORE)

;Wait 2 seconds
Sleep(2000)

;Move top left corner of screen, and resize to 800x600
WinMove($hWnd, "", 0, 0, 800, 600)

;Wait 2 seconds
Sleep(2000)

;Calculate Center of screen.
$x = (@DesktopWidth / 2) - 400; Desktop width divided by 2, then minus half the width of the window
$y = (@DesktopHeight / 2) - 300; Desktop height divided by 2, then minus half the height of the window

;Move to center of screen
WinMove($hWnd, "", $x, $y)

;Wait 2 seconds
Sleep(2000)

;Close notepad
WinClose($hWnd)

;Function for getting HWND from PID
Func _GetHwndFromPID($PID)
$hWnd = 0
$winlist = WinList()
Do
For $i = 1 To $winlist[0][0]
If $winlist[$i][0] <> "" Then
$iPID2 = WinGetProcess($winlist[$i][1])
If $iPID2 = $PID Then
$hWnd = $winlist[$i][1]
ExitLoop
EndIf
EndIf
Next
Until $hWnd <> 0
Return $hWnd
EndFunc;==>_GetHwndFromPID</syntaxhighlight>

==How can I use single or double quotes in strings?==
It is a fairly simple concept once you get the basics down. Basically there are a few different ways to go about mixing quotes in strings.

A string in AutoIt can be encased in either single(') or double (") quotes. So if you want to add only one type of quote into your string, your first port of call is to use the other type of quote to encase the string. Like so:

<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

$var = "I am a 'quote' inside the string"
MsgBox ($MB_OK, "Test 1", $var)
$var = 'I wish I could be a "quote" inside the string!'
MsgBox ($MB_OK, "Test 1", $var)</syntaxhighlight>

If you have to have both types of quotes in the string, the easiest way is to escape the quote ending the string as so to speak. To do this, use two quotes instead of one. Like so:

<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

$var = 'I am a single ''quote'' inside the string made using "single quote!"'
MsgBox ($MB_OK, "Test 1", $var)</syntaxhighlight>

==When should I bump my threads?==
As a courtesy to other users you should only bump your post once in a 24 hour period. Doing this allows all users the chance to get helped equally. Also refer to [http://www.autoitscript.com/forum/index.php?showtopic=95704&view=findpost&p=688050 Why isn't my thread getting any replies?], as this will help you get replies.

==How can I protect my code from decompilation?==
The fact of the matter is '''you can't fully protect your code'''. AutoIt is an interpreted language, so all scripts are interpreted, and that script has to get stored somewhere. There is still hope though. You can take certain measures to make the decompiled code less usable to the person that decompiled it. The first step is to obfuscate your code. This causes the code to become less readable. Basically variables and functions are renamed, making it very hard to make head or tail of what is what.

Please see the [[Decompiling FAQ]] for more information.

==How can I decompile my AutoIt EXEs?==
You cannot decompile your AutoIt compiled scripts unless it was compiled with AutoIt 3.2.5.1 or earlier.

In order to be able to recover your script from the compiled executable, you can use the following:

<syntaxhighlight lang="autoit">;Original Author SmokeN
If $CMDLINE[0] Then
If $CMDLINE[1] == "/SOURCE" AND $CMDLINE[2] == "MYPASSWORD" Then
FileInstall("ThisSCript.au3", @ScriptDir & "\DecompiledScript.au3")
EndIf
EndIf</syntaxhighlight>

Then if you run the compiled script with the following command line parameters your source will be extracted.

<blockquote>myscript.exe /SOURCE MYPASSWORD</blockquote>

== What is proper forum etiquette? What rules are there for the forum?==
Proper forum etiquette will ensure you will stay a member of these forums. So try to follow these rules. Also see this [http://www.autoitscript.com/forum/index.php?showtopic=95704&st=15&p=688050&#entry688050 FAQ post], as you should follow what is outlined there as well.

* Use proper English. MSN speak and the like makes it very hard to understand what you want. Keep posts in proper case because UPPERCASE is considered yelling and lowercase makes you look stupid. Don't use more punctuation marks than necessary. For example ?!!!? and ????? is completely unnecessary.
* Before posting help with a script, make sure you follow these steps:
*# Search for your issue.
*#* There are many thousands of posts on this forum, and chances are your question has been asked before. Make sure to use a variety of terms to maximize your results.
*# Read the helpfile
*#* Most if not all things in the help file will have an example (native functions) or two. Give them a go to try see how the functions work. Most of the time it helps!
*# Give it a go
*#* Seriously, if you can't be bothered to give it a go, then why should we be bothered to help you? If you feel you can't do it and you don't try then how will you ever know? We always prefer that you give it a go because you can learn from your mistakes and hopefully understand it better.
*# Post your problem
*#* Make sure you post in the correct forum.
*#** AutoIt Specific
*#*** [https://www.autoitscript.com/forum/forum/2-autoit-general-help-and-support/ General Help and Support] (Most support questions)
*#*** [https://www.autoitscript.com/forum/forum/10-autoit-gui-help-and-support/ GUI Support] (Support for the Graphical User Interface)
*#*** [https://www.autoitscript.com/forum/forum/14-autoitx-help-and-support/ AutoItX Support] (Support for the COM, DLL, PowerShell and .NET add-ons for AutoIt)
*#** Non-AutoIt
*#*** [https://www.autoitscript.com/forum/forum/6-chat/ Chat] (General chat for Active Members. Not accessible to guests or search engines)
*#*** [https://www.autoitscript.com/forum/forum/39-developer-general-discussion/ Developer General Discussion] (General development and scripting discussions)
*#*** [https://www.autoitscript.com/forum/forum/29-test-posting-messages/ Test Posting Messages] (This forum is emptied of all topics and posts from time to time)
*#*** [https://www.autoitscript.com/forum/forum/44-language-specific-discussion/ Language Specific Discussion] (Common IT Admin-related languages have their own forums. Feel free to post about any other language in the Misc forum)
*#*** [https://www.autoitscript.com/forum/forum/31-it-administration/ IT Administration] (Discussions about general IT related topics, administration, management and deployment)
*#* Include a detailed description in the content of the post, and a detailed title
*#** Titles such as 'Help' and 'What's wrong?' are not acceptable. To get the most help with your problem, be as descriptive as you can in the title, but keep in mind your title cannot be too long.
*#** Make sure you also include a descriptive question. Just saying 'what is wrong with the following' is also not acceptable, as we will have no idea what the problem is. Describe what you think is wrong and what is not working. It makes our job easier.
*#* Always include your code
*#** It shows us that you have tried and gives us a head start with something to play with.
* Usually asking for a script is not taken too well, within reason. Keep in mind that this is a support forum, so please acknowledge that. We are here to help you with your scripts, not to spoon-feed code to you. If you do need something written for you, maybe try [http://www.rentacoder.com/ RentACoder], as they are more suited to requests.
* Don't PM other members asking for them to look at threads of to help you unless they request it. It is actually quite rude and annoying to receive PMs of that nature.
* Lurk a little before you dive right in. Read a number of posts, or check out the group's archives. Get a feel for the tone of the forum so you can participate accordingly.
* Say online exactly what you would say in person. In other words, if you wouldn't say it to the person's face in front of your Grandmother, you shouldn't type it here.
* Remember your face doesn't show. Words alone can convey sentiment, but without benefit of inflection or facial expression, they can be misconstrued. Use descriptive wording, emoticons or .gifs to ensure your meaning is clear. By the same token, don't jump to conclusions about another person's intent in posting an unclear comment. When in doubt, ask for clarification.
* Be respectful. Internet etiquette is similar to standard etiquette in this area. Appreciate that your opinion is one of many. You can disagree with another person without being disrespectful or rude to other people.
* Ignore Trolls. If you engage in conversation with one, you'll raise your blood pressure and empower the troll. You can't win a flame war, and you can't sway a troll's opinion. Often, they don't even care about the subject. They live for the conflict and nothing more. Trolls are common and not worthy of your time. Ignore their posts no matter how inflammatory and eventually they'll get bored and move on.
* When you have found an answer for your question:
*# Do not edit your post to be blank or to have worthless information. People may be searching for the same issue you have, so be courteous to them by leaving your question there.
*# It is also optional to add the word [SOLVED] into the title, as well as selecting the post that best answered your question. It can make the lives of people searching easier.
* Finally follow the rules:
** [http://www.autoitscript.com/forum/topic/169097-forum-rules/ Forum rules]
** [http://www.autoitscript.com/forum/index.php?showtopic=37739 General policies and forum settings]
** [http://www.autoitscript.com/forum/index.php?showtopic=54168 Rules for the Chat forum]
** [http://www.autoitscript.com/forum/index.php?showtopic=65889 Rules for asking for source code]
** [http://www.autoitscript.com/forum/index.php?showtopic=156031 Google Policy Violations]

Some general points taken from [http://www.ehow.com/how_2106033_use-proper-forum-etiquette.html here].

==Are there forums available in my local language?==
Yes there are some available. Some forum members here participate in multiple forums.
* [http://www.autoit.de/ German Forums]
* [http://www.autoit.fr/ French Forums]
* [http://www.autoit.es/ Spanish Forums]
* [http://autoit-script.ru/ Russian Forums]
* [http://forum.autoitbrasil.com/ Portuguese Forums]

Please note that these are independent, community-run message boards and not just a translation of this board.

==How can I control (click, edit etc) an external (html) application?==
You can use the control* functions of autoit see helpfile
of use specific udf libraries
* [http://www.autoitscript.com/forum/topic/153520-iuiautomation-ms-framework-automate-chrome-ff-ie/ IUIAutomation for multiple applications]
*[https://www.autoitscript.com/forum/topic/197080-using-ui-automation-code-in-autoit/ uia explained in detail]
*[http://www.autoitscript.com/forum/topic/154439-chrome-udf/ chrome chrome.au3]
* [http://www.autoitscript.com/forum/topic/149526-librariesieau3/ Internet explorer ie.au3]
* [http://www.autoitscript.com/forum/topic/95595-ffau3-v0601b-10/ firefox ff.au3] (End of life)
* [https://www.autoitscript.com/forum/topic/166830-java-object-automation-and-simple-spy/ java]
* [https://www.autoitscript.com/forum/search/?&q=Selenium Selenium]
* [https://www.autoitscript.com/forum/topic/191990-webdriver-udf-w3c-compliant-version/ WebDriver UDF (IE, Chrome, FireFox)]
 

You should use spy applications to identify objects like
* au3inf part of AutoIT
* [http://www.autoitscript.com/forum/topic/153520-iuiautomation-ms-framework-automate-chrome-ff-ie/ simplespy in the zip]
* [https://www.autoitscript.com/forum/topic/166830-java-object-automation-and-simple-spy jabsimplespy in examples section of the AutoIt forum]
* [https://www.autoitscript.com/forum/topic/126716-control-viewer-autoit-window-info-tool/ control viewer]
* inspect as part of windows SDK
* VisualUIAVerifyNative.exe as part of windows SDK (8.1)
 

If above spy tools are not identifying your object you could try commercial tools (trials) like
* ranorex spy
* Testcomplete
* HP UFT
 

And your last recognition can be bitmaps
* search for GDI
* search for findBMP
* search for imagesearch

==Does AutoIt support database connections, such as SQL?==
Yes! UDFs exist for several popular SQL solutions, including SQLite, Firebird, MySQL, MSSQL and ODBC connections for PostGreSQL and others.

For an illustrative list, see this link:

* [https://www.autoitscript.com/wiki/User_Defined_Functions#Files.2C_Databases_and_web_connections Files, Databases and web connections]

A DBF UDF also exists

* [https://www.autoitscript.com/forum/topic/145142-dbf-udf-dbase-database-read-and-write-with-dll/ DBF UDF dBase with DLL]

==How can I include some files into my compiled Autoit's EXE?==
Use FileInstall() or ResourcesEx UDF from the forum Examples. Additional resources can also be included at compile time, click the "Res Add Files" tab.

==How can I test if checkbox / radiobutton is checked?==
Use this small function: If IsChecked($checkbox1) Then ...
<syntaxhighlight lang="autoit">
; by Zedna
Func IsChecked($control)
Return BitAND(GUICtrlRead($control), $GUI_CHECKED) = $GUI_CHECKED
EndFunc ;==>IsChecked
</syntaxhighlight>

==How to use the {enter} key as a Tab?==
Use
[https://www.autoitscript.com/autoit3/docs/functions/GUISetAccelerators.htm Accelerator keys]
<syntaxhighlight lang="autoit">

; by Melba23
#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>
#include <WinAPI.au3>

$hGUI = GUICreate("Test", 500, 500)

$cInput_1 = GUICtrlCreateInput("", 10, 10, 200, 20)
$cInput_2 = GUICtrlCreateInput("", 10, 50, 200, 20)
$cInput_3 = GUICtrlCreateInput("", 10, 90, 200, 20)

$cButton_1 = GUICtrlCreateButton("Button 1", 250, 10, 80, 30)
$cButton_2 = GUICtrlCreateButton("Button 2", 250, 50, 80, 30)
$cButton_3 = GUICtrlCreateButton("Button 3", 250, 90, 80, 30)

$cEnter = GUICtrlCreateDummy()

GUISetState()

Local $aAccelKeys[2][2] = [["{ENTER}", $cEnter], ["{TAB}", $cEnter]] ; Make {TAB} an accelerator
GUISetAccelerators($aAccelKeys)

While 1

Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $cEnter
Switch _WinAPI_GetFocus()
Case GUICtrlGetHandle($cInput_1)
; Check the input content
If checkEntry() = True Then
; Correct so move to next input
GUICtrlSetState($cInput_2, $GUI_FOCUS)
EndIf
; Not correct so stay in current input
Case GUICtrlGetHandle($cInput_2)
If checkEntry() = True Then
GUICtrlSetState($cInput_3, $GUI_FOCUS)
EndIf
Case GUICtrlGetHandle($cInput_3)
If checkEntry() = True Then
ConsoleWrite("End" & @CRLF)
EndIf
Case Else
GUISetAccelerators(0) ; Remove accelerator link
ControlSend($hGUI, "", "", "{TAB}") ; Send {TAB} to the GUI
GUISetAccelerators($aAccelKeys) ; Reset the accelerator

EndSwitch
EndSwitch

WEnd

Func checkEntry()

; Random chance of correct answer or fail
If Mod(@SEC, 2) = 0 Then
MsgBox($MB_SYSTEMMODAL, "Test Fail", "Press Enter to close this message box")
Return False
EndIf
Return True

EndFunc ;==>checkEntry
</syntaxhighlight>

==Why are my number sort results wrong?==
AutoIt by default uses an alpha sort algorithm. This means that ABC is sorted correctly, but it sorts numbers as 1,10,2,22,3,31 where the user expects 1,2,3,10,22,31.
This can be remedied by using a custom sort function. An example of such a custom number sort by Valuater appears below. Search the Forum for [https://www.autoitscript.com/forum/topic/95383-sorting-numbers/ Number Sort] and [https://www.autoitscript.com/forum/topic/83626-natural-order-string-comparison/ Natural Order String Comparison]
<syntaxhighlight lang="autoit">
; by Valuater
#include <array.au3>

$Array = StringSplit("2,5,3,4,6,1,8,9,7", ",")

_ArraySortNum($Array)

_ArrayDisplay($Array, "Sorted Array")

Func _ArraySortNum(ByRef $n_array, $i_descending = 0, $i_start = 1)
Local $i_ub = UBound($n_array)
For $i_count = $i_start To $i_ub - 2
Local $i_se = $i_count
If $i_descending Then
For $x_count = $i_count To $i_ub - 1
If Number($n_array[$i_se]) < Number($n_array[$x_count]) Then $i_se = $x_count
Next
Else
For $x_count = $i_count To $i_ub - 1
If Number($n_array[$i_se]) > Number($n_array[$x_count]) Then $i_se = $x_count
Next
EndIf
Local $i_hld = $n_array[$i_count]
$n_array[$i_count] = $n_array[$i_se]
$n_array[$i_se] = $i_hld
Next
EndFunc ;==>_ArraySortNum
</syntaxhighlight>

==How do I include AutoIt functions in a C# / C++ / VB programme? AutoItX==
AutoIt is also supplied as a combined COM and DLL version of AutoIt called AutoItX that allows you to add the unique features of AutoIt to your own favourite scripting or programming languages!
[https://www.autoitscript.com/site/autoit/ Info on AutoItX]

From AutoItX.chm:
AutoItX is a DLL version of AutoIt v3 that provides a subset of the features of AutoIt via an ActiveX/COM and DLL interface. This means that you can add AutoIt-like features to your favourite scripting and programming languages, e.g. VB, VBScript, Delphi, C, C++, Kixtart, and most other languages that support the use of DLLs.

Here are some C++ source code samples from various projects by [https://www.autoitscript.com/forum/profile/1-jon/ Jon]. Most are free to use but check any license files that accompany the downloads for details. All code was created in Microsoft Visual C (6 and 7) but most would probably compile under mingw32 as well.
[https://www.autoitscript.com/site/code/ Download C++ examples for AutoItX]

You don't need to regsvr it if you are using the c# library. The c# library uses the non-COM part of the DLL so it just needs to be in the same folder as the exe and add the assembly.dll to your project. From the documenation:

Using the Assembly from VB/C# within in Visual Studio is very easy:
* Add a reference to AutoItX3.Assembly.dll to your project
* Add a using AutoIt; statement in the files you want to use AutoIt functions
* Distribute your final executable with the files AutoItX3.Assembly.dll, AutoItX3.dll, AutoItX3_x64.dll.
* Write code like this C# example:
using AutoIt;
...
<syntaxhighlight lang="autoit">
; by Jon
// Wow, this is C#!
AutoItX.Run("notepad.exe");
AutoItX.WinWaitActive("Untitled");
AutoItX.Send("I'm in notepad");
IntPtr winHandle = AutoItX.WinGetHandle("Untitled");
AutoItX.WinKill(winHandle);
</syntaxhighlight>

From the AutoItX Help File (included in the default AutoIt install):
AutoItX can be used as a standard DLL from any language capable of calling functions in external DLLs.

The following files are provided to allow you to use the DLL in C++:

* AutoItX3_DLL.h - C language header file showing the exported functions and parameters
* AutoItX3_DLL.lib - Microsoft format import library (x86)
* AutoItX3_x64_DLL.lib - Microsoft format import library (x64)
* AutoItX3.dll - The main AutoItX DLL (x86)
* AutoItX3_x64.dll - The main AutoItX DLL (x64)

==How can I search an image in another image? ==
You can use the Pixel* functions of AutoIt. See the help file for more information and examples.
You can also use one of the UDFs below; most of which use GDI:
* [https://www.autoitscript.com/forum/topic/158264-bmpsearch-search-for-bitmap-within-bitmap-assembly-version/ FASM example]
* [https://www.autoitscript.com/forum/topic/140478-bitmap-processing-using-raw-code/ asm bitmap processing]
* [https://www.autoitscript.com/forum/topic/66545-find-bmp-in-another-bmp-imagesearch/ find bitmap in bitmap]
* [https://www.autoitscript.com/forum/search/?type=all&q=_GDIPlus_BitmapLockBits/ GDI bitmaps]
Other libraries can be found that make use of a specific external dll but those above are considered "native" as no external dlls are required.

==Multithreading==
Multithreading basically is running multiple scripts/programs that have acces to the same variables, normally by sharing memory.

The AutoIt language is not threadsafe and multithreading is firmly on the NOT TO DO list

Multitasking and Multiprocessing are closely related, however, and multiple solutions have been explored:
* [https://www.autoitscript.com/forum/topic/25350-multithread/ Multithread technical discussion]
* [https://www.autoitscript.com/forum/topic/25494-threaded-dll-sample/ Multithread with external DLL]
* [https://www.autoitscript.com/forum/topic/146794-multi-thread-autoit/ Multithread with external DLL 2]
* [https://www.autoitscript.com/forum/topic/64390-how-to-multi-process-in-autoit/ Multi process]
* [https://www.autoitscript.com/forum/topic/187334-using-net-libary-with-autoit-possible/ Using C# - Host .NET]

==Test automation==
Many people are looking for freeware tools to do test automation and cannot afford the commercial tools like HP LeanFT, Ranorex, Squish etc. 
So how can AutoIt help you. 
Out of the box install the base full zip package and start Scite.Exe as a simple IDE. 
If you want to do more these links will help you. 
Read FAQ 31 for the basic stuff on which technologies are readable and which spying tools there are 
Read FAQ 38 for the bitmap stuff 
* [https://www.autoitscript.com/forum/topic/136766-isn-autoit-studio/ Alternative project IDE]
* [https://www.autoitscript.com/forum/topic/188158-net-common-language-runtime-clr-framework/ .NET stuff]
* [https://www.autoitscript.com/forum/topic/84133-winhttp-functions/ WinHTTP]
* [https://www.autoitscript.com/forum/topic/185401-restwhich-udf-to-use-webdriver-of-edge/ webdriver]
Android can be reached thru ADB and Webdriver 
iOS is limited to normal webdriver stuff thru WinHTTP library. So most likely you have to install additional iOS webdriver solutions 
And after reading FAQ just ask your questions in the support forum 

==DPI Awareness==
The following few links are related to DPI Awareness :

After much research and testing, DPI Awareness is solved in the following thread with all relevant information moved to the 1st post
* [https://www.autoitscript.com/forum/topic/199786-making-your-compiled-application-dpi-aware/ making-your-compiled-application-dpi-aware]

* [https://www.autoitscript.com/forum/topic/166479-writing-dpi-awareness-app-workaround/ Writing DPI Awareness App - workaround]
* [https://www.autoitscript.com/forum/topic/182423-wrong-screen-resolution-displayed-by-autoit-macros/ Wrong Screen Resolution Displayed by Autoit Macros]
* [https://www.autoitscript.com/forum/topic/192529-dpi-awareness-any-suggestion/ DPI Awareness - question]

==AutoIt+SciTE Portable Developer Environment==
Recent discussion can be found here:
* [https://www.autoitscript.com/forum/topic/119572-autoit3-portable/?do=findComment&comment=1391105 How to make AutoIt+SciTE portable]

==Does AutoIt have an agreed set of good practices ?==
* [http://www.autoitscript.com/forum/index.php?showtopic=146866 Forum disscusion on good coding practices in AutoIt]
Wiki related resources:
* [https://www.autoitscript.com/wiki/Best_coding_practices Best coding practices]
* [https://www.autoitscript.com/wiki/Variables_-_using_Global,_Local,_Static_and_ByRef Variables - using Global, Local, Static and ByRef]
* [https://www.autoitscript.com/wiki/UDF-spec UDF-spec]

FAQ

2021-05-19T16:26:46Z

Argumentum: /* Information about Environment */

This is a list of frequently asked questions asked on the forums.

Other FAQs include:
* The one found in the [http://www.autoitscript.com/autoit3/docs/faq.htm AutoIt HelpFile]. Much of it is about the transition from V2 to V3, but most is still relevant and should be a port of call, as well as this one.

==How can I debug my script?==

=== In SciTE ===
This one has a myriad of answers, but the most effective is to begin by using the [http://www.autoitscript.com/autoit3/scite/ SciTE4AutoIt3 Editor] to create or edit scripts. This program is useful in debugging for the following reasons:

* Syntax highlighting allows for immediate viewing of any mistakes from unended script tags or quotes. This allows the scripter to visibly see the difference between the following portions of code.
[[File:FAQ_Q1_2.jpg|center|Incorrect code]]
And the correct version:
[[File:FAQ_Q1_3.jpg|center||Correct Code]]
* Global syntax check built directly into the tools menu allows you to check an entire script for problems all at once.
* Built-in code tidying program that correctly indents untidy code and repairs messy scripts to allow them to be more readable. It also corrects problems with incorrectly capitalised function names and variables.
* Per-line trace insertion allows you to log every line of code executed to debug errors.
* Debug MsgBoxes or ConsoleWrites are able to be added anywhere in the script directly from SciTE. ConsoleWrite lines are less intrusive and prevent the added annoyance to the user of MsgBoxes.

You can also use AutoIt3Wrapper directive:
<syntaxhighlight lang="autoit">#AutoIt3Wrapper_Run_Debug_Mode=Y</syntaxhighlight>
[[File:FAQ_Q1_4.jpg|center|Picture of SciTE4AutoIt3]]

=== Using more code to check @error value ===
Nearly all functions will return something. Most of the time when a function fails, it returns 0 and sets @error. You can use this information not only to create scripts that handle for different errors but to debug and find out exactly why you are having problems. Check the help file for specific functions and their return values.

<syntaxhighlight lang="autoit">
#include <MsgBoxConstants.au3>

_Example()

Func _Example()
Local $aFileList = _FileListToArray(@ScriptDir, 'NO_EXISTING_FILE.TEST')
If @error Then ; check if _FileListToArray() function return any error
MsgBox($MB_ICONERROR, '_FileListToArray', '@error = ' & @error & @CRLF & '@extended = ' & @extended) ; show error message
Return ; return / exit from function to prevent unexpected further error's
EndIf

For $iFile_idx = 1 To $aFileList[0]
FileRead($aFileList[$iFile_idx])
; any further code
Next

EndFunc ;==>_Example
</syntaxhighlight>

=== Via the Tray icon===
You can add this line at the top of your script (1 is on, 0 is off) to enable debugging from the tray icon.

<syntaxhighlight lang="autoit">AutoItSetOption ("TrayIconDebug", 1);0-off</syntaxhighlight>
Then if you run the script (uncompiled as an AU3 file), you can mouse over the AutoIt icon in the system tray (down by the clock) to display debugging information.

[[File:FAQ_Q1_1.jpg|center|Example output for TrayIconDebug]]

=== OutputDebugString native call ===
You can also debug a script on any computer by adding the following code to your script:

<syntaxhighlight lang="autoit">
Func _MyDebug($sMessage, $iError = @error, $iExtended = @extended)
If $iError Or $iExtended Then
$sMessage &= '[ @error = ' & $iError & ' @extended = ' & $iExtended & ' ]'
EndIf
DllCall("kernel32.dll", "none", "OutputDebugString", "str", $sMessage)
Return SetError($iError, $iExtended, '')
EndFunc ;==>_MyDebug
</syntaxhighlight>
Then, when you need to add a debug line, call it as necessary. Example:

<syntaxhighlight lang="autoit">_MyDebug("The value of Variable 1 at this time is " & $var1)</syntaxhighlight>
This debugging is completely transparent to the user, and is only viewable with a program such as DebugView from SysInternals. This method of debugging has the added advantage of being available to the developer in situations where is not acceptable or feasable to install SciTE on a client's unit.

=== Graphical debugger ===
Stumpii created a [http://www.autoitscript.com/forum/index.php?showtopic=21834 Graphical AutoIt Debugger], similar to Dev-C++'s debugging style.

[[File:FAQ_Q1_5.jpg|center|Stumpii's Graphical AutoIt Debugger]]

=== Another debugger for AutoIt ===
Heron created a [http://www.autoitscript.com/forum/index.php?showtopic=103142 Another debugger for AutoIt].

The latest version by asdf8 is here:
https://www.autoitscript.com/forum/topic/103142-another-debugger-for-autoit/?do=findComment&comment=1303208

=== Other UDF to log/trace/script analyze ===
* [http://www.autoitscript.com/forum/index.php?showtopic=195882 ErrorLog (by mLipok)] - Logs program activities and errors to different output locations.
* [http://www.autoitscript.com/forum/index.php?showtopic=156196 Log4a (by zorphnog)] - Logging library loosely based upon the log4j and NLog libaries.
* [http://www.autoitscript.com/forum/index.php?showtopic=195862 Loga (by Danyfirex)] - Simple logging library to keep track of code with an integrated console.

==How can I run something that is not an exe file [.txt, .msi, .pdf,.jpg etc.] [or] How can I open a webpage in the default browser?==
It was for this reason that the ShellExecute function was created. Here is one example:

<syntaxhighlight lang="autoit">ShellExecute("C:\autoitscripts\test.au3", "", "", "edit", @SW_MAXIMIZE)</syntaxhighlight>

You can also specify a web address this way:

<syntaxhighlight lang="autoit">ShellExecute("http://www.autoitscript.com/forum", "", "", "open")</syntaxhighlight>

If you normally are able to right-click the file and select print, then you can also print the file from AutoIt using this function:

<syntaxhighlight lang="autoit">ShellExecute("C:\boot.ini", "", "", "print")</syntaxhighlight>

If you wish to open the file with the default program, you can do as follows:
<syntaxhighlight lang="autoit">ShellExecute("C:\autoitscripts\test.au3")</syntaxhighlight>

If you wish your script to wait until the process is finished, you can use the ShellExecuteWait function with the same parameters.

Note:
The default verb is the verb configured in the registry. If no verb is set as default in the registry then the "open" verb is used. If the "open" verb is not present then the first verb listed in the registry is used.

==How can I prevent more than one copy of my script from running at once, or detect another copy of my script running?==

=== _Singleton function ===
There are a few different ways to go about this. You can use a function called _Singleton to detect multiple instances of your script. An example of how to use this code:

<syntaxhighlight lang="autoit">#include <Misc.au3>
_Singleton("TheNameOfMyScript")</syntaxhighlight>

In this instance, the script will bring up some messages explaining to the user of the occurring events.
This example will show you how the above function can be used in a real world application.
<syntaxhighlight lang="autoit">#include <Misc.au3>
#include <MsgBoxConstants.au3>

If _Singleton("MyScriptName", 1) = 0 Then
; If successful, running our script a second time should cause us to fall through here
MsgBox($MB_ICONERROR, "User Generated Error Message", "Error: This script is already running!")
Else
; We have detected that we are the only instance running, now we will run a second instance to display _Singleton's function!
MsgBox($MB_ICONINFORMATION, "Information!", "We are the first instance of this script, press OK to run another instance and trigger the error message!")
Switch @Compiled
Case 1
Run(FileGetShortName(@ScriptFullPath));when running an app, it's usually better to use its short name
Case 0
Run(FileGetShortName(@AutoItExe) & ' /AutoIt3ExecuteScript ' & FileGetShortName(@ScriptFullPath))
EndSwitch
Sleep(1000)
MsgBox($MB_ICONINFORMATION, "Information!", "We ran a second instance, you should have recieved an error message!", 5)
EndIf
Exit</syntaxhighlight>

===_MutexExists function ===
Another method is to use _MutexExists.

<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

If _MutexExists("MydeswswScriptName") Then
; We know the script is already running. Let the user know.
MsgBox($MB_OK, "Script Name", "This script is already running. Using multiple copies of this script at the same time is unsupported!")
Exit
EndIf

;Function Author- Martin
Func _MutexExists($sOccurenceName)
Local $ERROR_ALREADY_EXISTS = 183, $handle, $lastError
$sOccurenceName = StringReplace($sOccurenceName, "", ""); to avoid error
$handle = DllCall("kernel32.dll", "int", "CreateMutex", "int", 0, "long", 1, "str", $sOccurenceName)
$lastError = DllCall("kernel32.dll", "int", "GetLastError")
Return $lastError[0] = $ERROR_ALREADY_EXISTS
EndFunc;==>_MutexExists</syntaxhighlight>

==How can I run my script as a service?==
This is also a question with multiple answers, and none of them are the only way to do it. The first question to ask yourself is whether or not you wish to install the service on other computers besides your own.

=== On your own computer - One time only ===
The easiest way to do this is to use Pirmasoft RunAsSvc. This program makes services easy to install and easy to remove when necessary.

=== On all computers that run your script===
To do this you can use SRVANY.EXE and [http://www.autoitscript.com/forum/index.php?showtopic=6487 ServiceControl.au3]. You can then use this code to install your script as a service:

<syntaxhighlight lang="autoit">
#include "ServiceControl.au3"
$servicename = "MyServiceName"
_CreateService("", $servicename, "My AutoIt Script", "C:\Path_to_\srvany.exe", "LocalSystem", "", 0x110)
RegWrite("HKLM\SYSTEM\CurrentControlSet\Services\" & $servicename & "\Parameters", "Application", "REG_SZ", @ScriptFullPath)
</syntaxhighlight>

Or use the following code to delete this service:

<syntaxhighlight lang="autoit">
#include "ServiceControl.au3"
$servicename = "MyServiceName"
_DeleteService("", $servicename)
</syntaxhighlight>

There is one caveat to setting up AutoIt as a service. If the service is not installed using the above code, it must have the "allow service to interact with the desktop" setting or else automation functions such as Control* or Win* functions will not function. To assure the service does indeed have this setting, use the following code:

<syntaxhighlight lang="autoit">RegWrite("HKLM\SYSTEM\CurrentControlSet\Services\[ServiceName]", "Type", "REG_DWORD", 0x110)</syntaxhighlight>

==How can I create/start/stop or otherwise control a service?==
There are two include libraries that are designed specifically to interact with services. These are the following:

* [http://www.autoitscript.com/forum/index.php?showtopic=6487 ServiceControl.au3] made by SumTingWong. Functionality:
** _StartService()
** _StopService()
** _ServiceExists()
** _ServiceRunning()
** _CreateService()
** _DeleteService()
* [http://www.autoitscript.com/forum/index.php?showtopic=22165 _NTServices.au3] made by CatchFish. Functionality:
** _ServiceStart()
** _ServiceStop()
** _ServiceStatus()
** _ServicePause()

==How can I display a progress bar while copying files or directories?==
There are a many different topics on how to do this. For more, just search the forums for [http://www.autoitscript.com/forum/index.php?act=Search&CODE=show&searchid=22030d4d4effe5e32da23fdb69ed772f&search_in=posts&result_type=topics&highlite=%2BCopy%2B Progress Copy + Progress].
* [http://www.autoitscript.com/forum/index.php?showtopic=11313 Copy with progress dialog]... By ezztabi
* [http://www.autoitscript.com/forum/index.php?showtopic=11888 Yet another copy with progress]... By SumTingWong
* [http://www.autoit.de/index.php?page=Thread&postID=58875 _MultiFileCopy]... By Oscar (German Forums)
* [http://www.autoitscript.com/forum/index.php?showtopic=19370&st=45&p=186198&#entry186198 _FileCopy]... By Jos

[[File:FAQ_Q6_1.jpg|center|Copy progress dialog by ezztabi]]

==How can I make a hotkey that only works in my GUI?==
It used to be quite tedious setting hotkeys to only work in your GUI. Now there is an easier way with the function GUISetAccelerators.

(From Helpfile example)
<syntaxhighlight lang="autoit">
; A simple custom messagebox that uses the MessageLoop mode
#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>

GUICreate("Custom Msgbox", 210, 80)

GUICtrlCreateLabel("Please click a button!", 10, 10)
$YesID = GUICtrlCreateButton("Yes", 10, 50, 50, 20)
$NoID = GUICtrlCreateButton("No", 80, 50, 50, 20)
$ExitID = GUICtrlCreateButton("Exit", 150, 50, 50, 20)

; Set accelerators for Ctrl+y and Ctrl+n
Dim $AccelKeys[2][2]=[["^y", $YesID], ["^n", $NoID]]
GUISetAccelerators($AccelKeys)

GUISetState(); display the GUI

Do
$msg = GUIGetMsg()

Select
Case $msg = $YesID
MsgBox($MB_OK, "You clicked on", "Yes")
Case $msg = $NoID
MsgBox($MB_OK, "You clicked on", "No")
Case $msg = $ExitID
MsgBox($MB_OK, "You clicked on", "Exit")
Case $msg = $GUI_EVENT_CLOSE
MsgBox($MB_OK, "You clicked on", "Close")
EndSelect
Until $msg = $GUI_EVENT_CLOSE Or $msg = $ExitID
</syntaxhighlight>

==How can I perform an action while a key is held down?==
You can use the _IsPressed() function to determine when a key is held down. The values that can be specified in this function are listed in the AutoIt Help File under User Defined Functions -> Misc Management -> _IsPressed. The following example will press the left mouse button while the k key is held down.

<syntaxhighlight lang="autoit">#include <Misc.au3>
$pressed = 0
While 1
If _IsPressed("4B") Then
If Not $pressed Then
ToolTip("K Key being held down")
MouseDown("left")
$pressed = 1
EndIf
Else
If $pressed Then
ToolTip("")
MouseUp("left")
$pressed = 0
EndIf
EndIf
Sleep(250)
WEnd</syntaxhighlight>

==How can I run my script on a remote computer over the network?==
The answer to this question depends on how much experience you have in networking. If the target system is a Windows system to which you have administrator access then you may use one of the following programs:

* PsExec from SysInternals
* BeyondExec from BeyondLogic

With either of these programs it is possible to launch any process on a remote system and even copy your script to the target computer before starting it. Neither these programs nor any others will work with Windows XP Home Edition unless you create a custom "command listener" that you manually install on the target system.

NOTE: Those of you with more advanced programming skills and a little imagination can figure out how to use the service control libraries and srvany.exe to do this same thing without either of the above mentioned programs.

==How can I make a User Defined Function with optional parameters like the ones I see in the Help File?==
You can specify optional parameters by giving them a default value in the Func declaration. An example of how this is done:
<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

Func testme($param1, $param2 = "nothing", $param3 = 5)
MsgBox($MB_OK, "", "Parameter one is required. The value of Parameter 1 is " & $param1 & @CRLF & _
"Parameter 2 is optional. The value of Parameter 2 is " & $param2 & @CRLF & _
"Parameter 3 is optional. The value of Parameter 3 is " & $param3)
EndFunc</syntaxhighlight>

If testme() is called with only one parameter [I.E. testme("test")] then the output is:
<blockquote>
Parameter one is required. The value of Parameter 1 is test 
Parameter 2 is optional. The value of Parameter 2 is nothing 
Parameter 3 is optional. The value of Parameter 3 is 5 
</blockquote>
However, if the function is called with more than one parameter like this testme("test", "something"), then the output is
<blockquote>
Parameter one is required. The value of Parameter 1 is test 
Parameter 2 is optional. The value of Parameter 2 is something 
Parameter 3 is optional. The value of Parameter 3 is 5 
</blockquote>

==How can I make my script start every time windows starts?==
You can use one of the following codes to allow your script to start with Windows:
<syntaxhighlight lang="autoit">RegWrite("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "MyProgramName", "REG_SZ", @ScriptFullPath)</syntaxhighlight>
or
<syntaxhighlight lang="autoit">FileCreateShortcut(@ScriptFullPath, @StartupCommonDir & "\MyProgramName.lnk")</syntaxhighlight>
or place a Shortcut in the Startup folder, or the entire Executable. For Win8+ systems, use the Win+R keys to open a Run box, then "Shell:Startup" to access the Startup folder. Due to Windows User Account Control (UAC) restrictions, your script may require [https://www.autoitscript.com/autoit3/docs/keywords/RequireAdmin.htm #RequireAdmin].

==How can I have the script delete itself?==
The following function will delete the running script or .exe once it has finished execution.

'''WARNING: Make a copy of your script before calling this function!!!'''

<syntaxhighlight lang="autoit">
Func _SelfDelete($iDelay = 0)
Local $sCmdFile
FileDelete(@TempDir & "\scratch.bat")
$sCmdFile = 'ping -n ' & $iDelay & ' 127.0.0.1 > nul' & @CRLF _
& ':loop' & @CRLF _
& 'del "' & @ScriptFullPath & '"' & @CRLF _
& 'if exist "' & @ScriptFullPath & '" goto loop' & @CRLF _
& 'del %0'
FileWrite(@TempDir & "\scratch.bat", $sCmdFile)
Run(@TempDir & "\scratch.bat", @TempDir, @SW_HIDE)
EndFunc;==>_SelfDelete
</syntaxhighlight>

==How can I create a clickable website hyperlink in my gui?==
[[File:FAQ_Q13_1.jpg|center|Example GUI using Gary's UDF.]]

Gary Frost has made great advances in this area and has provided a [http://www.autoitscript.com/forum/index.php?showtopic=23111&st=0 UDF here] ('''the UDF was removed from the post''') to help with doing this.

==How can I change the screen resolution / refresh rate / color depth?==
[http://www.autoitscript.com/forum/index.php?showtopic=20121 ChangeResolution.au3] is a library function created to make changes to these settings.

== How can I get the screen resolution in multiple monitor setups?==
The following code was worked out by Larry to determine the total screen resolution of multiple monitors:

<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

$aTSR = _GetTotalScreenResolution()
MsgBox($MB_OK, "Total Screen Resolution", "Width = " & $aTSR[0] & @CRLF & _
"Height = " & $aTSR[1])

;Original code by Larry.
;Edited by BrettF
Func _GetTotalScreenResolution()
Local $aRet[2]
Global Const $SM_VIRTUALWIDTH = 78
Global Const $SM_VIRTUALHEIGHT = 79
$VirtualDesktopWidth = DllCall("user32.dll", "int", "GetSystemMetrics", "int", $SM_VIRTUALWIDTH)
$aRet[0] = $VirtualDesktopWidth[0]
$VirtualDesktopHeight = DllCall("user32.dll", "int", "GetSystemMetrics", "int", $SM_VIRTUALHEIGHT)
$aRet[1] = $VirtualDesktopHeight[0]
Return $aRet
EndFunc
</syntaxhighlight>

== How can I register a file type with my program [or] How can I make files with a certain extension open in my program?==
[[File:FAQ_Q16_1.jpg|center|Example of how a file type can be registered.]]
File registration can be a tricky business for those who have not done it before. The first thing to be done is to modify your script to allow it to accept files from the command line. Here is one example of how to do this:

<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

;$cmdline[0] is the number of parameters passed
If $cmdline[0] <> 0 Then
$filename = $cmdline[1]
;Do something with the file here
MsgBox($MB_OK, "UXYFixer", 'The file name passed to the command line is "' & $filename & '"')
Else
; We did not get any command line parameters.
; If this is a command line only program, you would want to
; alert the user that the command line parameters were incorrect.
; If this is a GUI program (like a notepad program), you would
; want to simply continue from here without opening a file.
MsgBox($MB_OK, "UXYFixer", 'Command line parameters incorrect.' & @CRLF & 'Command line usage: "' & @ScriptName & '" "file to process"')
EndIf</syntaxhighlight>
After your script is ready to accept files, you can begin to register the file type you need with your program. To prevent errors, this-is-me has created a UDF that will allow you to do this easily:

Here is an example of how to register and unregister a file extension using this UDF:
<syntaxhighlight lang="autoit">#include "FileRegister.au3"
;================================================
;
; Description: FileRegister($ext, $cmd, $verb [, $def [, $icon = "" [, $desc = "" ]]])
; Registers a file type in Explorer
;
; Parameter(s): $ext - File Extension without period eg. "zip"
; $cmd - Program path with arguments eg. '"C:\test\testprog.exe" "%1"'
; (%1 is 1st argument, %2 is 2nd, etc.)
; $verb - Name of action to perform on file
; eg. "Open with ProgramName" or "Extract Files"
; $def - Action is the default action for this filetype
; (1 for true 0 for false)
; If the file is not already associated, this will be the default.
; $icon - Default icon for filetype including resource # if needed
; eg. "C:\test\testprog.exe,0" or "C:\test\filetype.ico"
; $desc - File Description eg. "Zip File" or "ProgramName Document"
;
;================================================

FileRegister("uxy", '"' & @ScriptFullPath & '" "%1"', "Open in UXYFixer", 1, @ScriptFullPath & ',0', "UXYFixer Document")

;========================================
;
; Description: FileUnRegister($ext, $verb)
; UnRegisters a verb for a file type in Explorer
; Parameter(s): $ext - File Extension without period eg. "zip"
; $verb - Name of file action to remove
; eg. "Open with ProgramName" or "Extract Files"
;
;========================================

FileUnRegister("uxy", "Open in UXYFixer")</syntaxhighlight>

'''Download here:'''
[http://www.autoitscript.com/forum/index.php?app=core&module=attach&section=attach&attach_id=26378 FileRegister.au3]

==Why doesn't my combobox (GUICtrlCreateCombo) show a dropdown list when clicked?==
When using GUICtrlCreateCombo be sure to enter the desired height for your combobox list in the "height" parameter. Windows XP automatically selects an appropriate height for combo boxes, but other versions of Windows usually do not.
<syntaxhighlight lang="autoit">$combo = GUICtrlCreateCombo("",10,10,200,20)</syntaxhighlight>
Would correctly be changed to:
<syntaxhighlight lang="autoit">$combo = GUICtrlCreateCombo("",10,10,200,200)</syntaxhighlight>

==Why isn't my thread getting any replies?==

=== Asking the right question right ===
Did you give a good description of the problem? If your title or explanation of the issue is not descriptive, users are likely to bypass your issue instead of helping. Post titles such as "Help Me", "I Have A Problem", "Question", "Help me fix my code", "This code doesn't work" or similarly worded titles will not readily draw forum users to your post. Experienced users (which are your best hope of resolving the issue) will often skip your post altogether in cases like this. An example of a post title descriptive enough to attract users to assist you is "Problem with WinWaitClose" or "Loop never ends".

=== Example for reproduction ===
Did you post example code? If you have not posted an example of the code you are having an issue with, then you will not recieve support. When posting a non-working script, please do so in the smallest amount of stand-alone code possible. If the code you post cannot run by itself on another person's computer, they will not be able to recreate the issue.

=== Information about Environment ===
Did you provide any information about your AutoIt Development Environment ?

<syntaxhighlight lang="autoit">
#include <APILocaleConstants.au3>
#include <WinAPILocale.au3>
; Version: 1.01. AutoIt: V3.3.14.2
; Retrieve the recommended information of the current system when posting a support question.
Local $sSystemInfo = 'I have a valid AutoIt support question and kindly provided the details of my system:' & @CRLF & @CRLF & _
'AutoIt Version: V' & @AutoItVersion & ' [' & (@AutoItX64 ? 'X64' : 'X32') & ']' & @CRLF & _
'Windows Version: ' & @OSVersion & '/' & (@OSServicePack <> "" ? @OSServicePack : _
RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion", "ReleaseId")) & _
' [' & @OSArch & ']' & @CRLF & 'Language: ' & _GetOSLanguage() & ' (' & @OSLang & ')' & @CRLF & @CRLF
ClipPut($sSystemInfo)
MsgBox(4096, 'This info has been copied to the clipboard. Use Ctrl + V to retrieve it.', $sSystemInfo)

Func _GetOSLanguage()
Return _WinAPI_GetLocaleInfo(_WinAPI_GetUserDefaultLCID(), $LOCALE_SLANGUAGE)
EndFunc ;==>_GetOSLanguage
</syntaxhighlight>

=== Speak English and speak it right ===
Did you use proper English? Here are guidelines for posting properly in the English language:
* Use proper case. THIS IS CONSIDERED YELLING. If you post in ALL UPPERCASE or all lowercase then you will not be taken seriously.
* Use proper punctuation. Complete sentences need only one trailing punctuation mark. Twelve exclamation points after every sentence will not get you an answer more quickly (just the opposite) Writing a sentence without simple punctuation such as commas reflects badly on your attention to detail, and is considered a good judge of the poster's coding style. If you cannot summon the intellect to write a sentence with correct punctuation, you will most likely miss simple coding mistakes such as unterminated quotes.

=== Breaking forum rules, law, modesty, or common sense ===
Show common sense by following the forum rules, http://www.autoitscript.com/forum/topic/169097-forum-rules/, as well as generally accepted forum etiquette. Repeated failure to do so will result in sanctions by the Moderation team as it ruins the experience for everyone.

==Why does the Ctrl key get stuck down after I run my script?==

=== Keys virtually stuck ===
It could equally be the Shift or the Alt key.

If you use Send in a script and you have a problem with keys being stuck down then Send is the most likely culprit. A similar problem can occur with BlockInput. The solution is generally quite simple. If there is a key like Shift or Alt held down at the start of the Send sequence, but that key is released by the time the Send sequence finishes then the key will get 'stuck' down. As an example of a solution, you could replace the Send function in your script with the _SendEx function below.

The _SendEx function waits for the Shift, Alt and Ctrl keys to be released or pops up a warning if the $warn parameter is not an empty string. Therefore it is not intended to be used when one of these modifier keys has been set to be down using any combination of {ALTDOWN}, {SHIFTDOWN} and {ALTDOWN}.
<syntaxhighlight lang="autoit">
#include < Misc.au3 >
#include <MsgBoxConstants.au3>
;Send the string $ss after the Shift Alt and Ctrl keys are released. Optionally give a warning after 1 sec if any of those keys are still down.
;Requires misc.au3 to be included in the script for the _IsPressed function.

Func _SendEx($ss, $warn = "")
Local $iT = TimerInit()

While _IsPressed("10") Or _IsPressed("11") Or _IsPressed("12")
If $warn <> "" And TimerDiff($iT) > 1000 Then
MsgBox($MB_TOPMOST, "Warning", $warn)
EndIf
Sleep(50)
WEnd
Send($ss)
EndFunc;==>_SendEx</syntaxhighlight>

=== General unstuck method ===
Shilbiz also discovered that the following can 'clear' locked down keys.
<syntaxhighlight lang="autoit"> ControlSend("", "", "", "text", 0)</syntaxhighlight>

==How can I use Pixel functions?==

=== Using a color change as an event ===
The following is an example of using the pixel to check if the colour has changed in a specific region.
<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

Local $PixelCheck = 0, $NewCheck
$PixelCheck = PixelCheckSum(40, 50, 60, 70); Get the checksum for this area.
While 1; Keep going
$NewCheck = PixelCheckSum(40, 50, 60, 70)
If $PixelCheck <> $NewCheck Then
; The old pixel checksum and the new one are different.
$PixelCheck = $NewCheck; Update the $PixelCheck to the new value
; Let us know it has changed. Change this to what you want to happen when the colour in the region changes.
Msgbox($MB_ICONWARNING,"PixelChecksum","Pixel region has changed !")
EndIf
Sleep(50); Just to give the CPU a bit of a break.
Wend</syntaxhighlight>

=== Searching for a specific pixel color ===
This is an example of searching for a specific pixel (red), both pure red (0xFF0000) and red in a few different shades.
<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>
; Find a pure red pixel in the range 0,0-20,300

$coord = PixelSearch( 0, 0, 20, 300, 0xFF0000 )
If Not @error Then
MsgBox($MB_OK, "X and Y are:", $coord[0] & "," & $coord[1])
EndIf

; Find a pure red pixel or a red pixel within 10 shades variations of pure red
$coord = PixelSearch( 0, 0, 20, 300, 0xFF0000, 10 )
If Not @error Then
MsgBox($MB_OK, "X and Y are:", $coord[0] & "," & $coord[1])
EndIf</syntaxhighlight>

==Why doesn't my script work on a locked workstation?==
On a locked station any window will never be active (active is only dialog with text "Press Ctrl+Alt+Del"). In Windows locked state applications run hidden (behind that visible dialog) and do not have focus and active status. So generally don't use Send() MouseClick() WinActivate() WinWaitActive() WinActive() etc. Instead use ControlSend() ControlSetText() ControlClick() WinWait() WinExists() WinMenuSelectItem() etc. Doing so allows you to interact with an application regardless of whether it is active or not. It's possible to run such a script from scheduler on locked Windows stations.

==Where can I learn AutoIt? Are there any tutorials?==
AutoIt is a constantly growing and evolving language with a diverse and engaged community of volunteers. This wiki, along with the official forum, will always be your best place for answers to questions as well as examples and tutorials. With this in mind, below are a few resources that can also help you as you become familiar with the language:

AutoIt 1-2-3, an interactive classroom by Valuater:
[http://www.autoitscript.com/forum/index.php?showtopic=21048 http://www.autoitscript.com/forum/index.php?showtopic=21048]

BrettF's updated AutoIt tutorial:
[http://www.autoitscript.com/forum/index.php?showtopic=84960 http://www.autoitscript.com/forum/index.php?showtopic=84960]

"Learn To Program Using FREE Tools with AutoIt" PDF Book by Jfish
[https://www.autoitscript.com/forum/files/file/351-learn-to-program-using-free-tools-with-autoit/ Learn To Program Using FREE Tools with AutoIt]

YouTube has a number of videos available:
[http://www.youtube.com/results?search_query=autoit+tutorial&search_type=&aq=0&oq=AutoIt YouTube AutoIt tutorials list]

As always, when asking questions about a video or script you saw on an external source, please ensure you are adhering to the [[FAQ#Breaking_forum_rules.2C_law.2C_modesty.2C_or_common_Sense|forum rules]].

==Why does my script no longer decompile?==
Decompilation is no longer supported, and is only available for the older versions of AutoIt (Version 3.2.5.1 and earlier compiled scripts).

Please '''do not''' post on this topic; see the [[Decompiling FAQ]] for more information. Topics discussing decompilation of scripts will be locked immediately. Posting the source of a decompiled script with lead to immediate sanctions from the Moderation team, as it directly violates AutoIt EULA (End-User-License-Agreement).

<blockquote>You may not reverse engineer or disassemble the SOFTWARE PRODUCT or compiled scripts that were created with the SOFTWARE PRODUCT.</blockquote>

==How can I get a window handle when all I have is a PID?==
Refer to the following example showing converting and use when manipulating the window. The function is based on work by Smoke_N/Hubertus and Helge.
<syntaxhighlight lang="autoit">;Run process
$iPID = Run("Notepad.exe")

;Allow window to initialize...
Sleep (500)

;Get HWND.
$hWnd = _GetHwndFromPID($iPID)

;Maximize
WinSetState($hWnd, "", @SW_MAXIMIZE)

;Wait 2 seconds
Sleep(2000)

;Minimize
WinSetState($hWnd, "", @SW_MINIMIZE)

;Wait 2 seconds
Sleep(2000)

;Restore window
WinSetState($hWnd, "", @SW_RESTORE)

;Wait 2 seconds
Sleep(2000)

;Move top left corner of screen, and resize to 800x600
WinMove($hWnd, "", 0, 0, 800, 600)

;Wait 2 seconds
Sleep(2000)

;Calculate Center of screen.
$x = (@DesktopWidth / 2) - 400; Desktop width divided by 2, then minus half the width of the window
$y = (@DesktopHeight / 2) - 300; Desktop height divided by 2, then minus half the height of the window

;Move to center of screen
WinMove($hWnd, "", $x, $y)

;Wait 2 seconds
Sleep(2000)

;Close notepad
WinClose($hWnd)

;Function for getting HWND from PID
Func _GetHwndFromPID($PID)
$hWnd = 0
$winlist = WinList()
Do
For $i = 1 To $winlist[0][0]
If $winlist[$i][0] <> "" Then
$iPID2 = WinGetProcess($winlist[$i][1])
If $iPID2 = $PID Then
$hWnd = $winlist[$i][1]
ExitLoop
EndIf
EndIf
Next
Until $hWnd <> 0
Return $hWnd
EndFunc;==>_GetHwndFromPID</syntaxhighlight>

==How can I use single or double quotes in strings?==
It is a fairly simple concept once you get the basics down. Basically there are a few different ways to go about mixing quotes in strings.

A string in AutoIt can be encased in either single(') or double (") quotes. So if you want to add only one type of quote into your string, your first port of call is to use the other type of quote to encase the string. Like so:

<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

$var = "I am a 'quote' inside the string"
MsgBox ($MB_OK, "Test 1", $var)
$var = 'I wish I could be a "quote" inside the string!'
MsgBox ($MB_OK, "Test 1", $var)</syntaxhighlight>

If you have to have both types of quotes in the string, the easiest way is to escape the quote ending the string as so to speak. To do this, use two quotes instead of one. Like so:

<syntaxhighlight lang="autoit">#include <MsgBoxConstants.au3>

$var = 'I am a single ''quote'' inside the string made using "single quote!"'
MsgBox ($MB_OK, "Test 1", $var)</syntaxhighlight>

==When should I bump my threads?==
As a courtesy to other users you should only bump your post once in a 24 hour period. Doing this allows all users the chance to get helped equally. Also refer to [http://www.autoitscript.com/forum/index.php?showtopic=95704&view=findpost&p=688050 Why isn't my thread getting any replies?], as this will help you get replies.

==How can I protect my code from decompilation?==
The fact of the matter is '''you can't fully protect your code'''. AutoIt is an interpreted language, so all scripts are interpreted, and that script has to get stored somewhere. There is still hope though. You can take certain measures to make the decompiled code less usable to the person that decompiled it. The first step is to obfuscate your code. This causes the code to become less readable. Basically variables and functions are renamed, making it very hard to make head or tail of what is what.

Please see the [[Decompiling FAQ]] for more information.

==How can I decompile my AutoIt EXEs?==
You cannot decompile your AutoIt compiled scripts unless it was compiled with AutoIt 3.2.5.1 or earlier.

In order to be able to recover your script from the compiled executable, you can use the following:

<syntaxhighlight lang="autoit">;Original Author SmokeN
If $CMDLINE[0] Then
If $CMDLINE[1] == "/SOURCE" AND $CMDLINE[2] == "MYPASSWORD" Then
FileInstall("ThisSCript.au3", @ScriptDir & "\DecompiledScript.au3")
EndIf
EndIf</syntaxhighlight>

Then if you run the compiled script with the following command line parameters your source will be extracted.

<blockquote>myscript.exe /SOURCE MYPASSWORD</blockquote>

== What is proper forum etiquette? What rules are there for the forum?==
Proper forum etiquette will ensure you will stay a member of these forums. So try to follow these rules. Also see this [http://www.autoitscript.com/forum/index.php?showtopic=95704&st=15&p=688050&#entry688050 FAQ post], as you should follow what is outlined there as well.

* Use proper English. MSN speak and the like makes it very hard to understand what you want. Keep posts in proper case because UPPERCASE is considered yelling and lowercase makes you look stupid. Don't use more punctuation marks than necessary. For example ?!!!? and ????? is completely unnecessary.
* Before posting help with a script, make sure you follow these steps:
*# Search for your issue.
*#* There are many thousands of posts on this forum, and chances are your question has been asked before. Make sure to use a variety of terms to maximize your results.
*# Read the helpfile
*#* Most if not all things in the help file will have an example (native functions) or two. Give them a go to try see how the functions work. Most of the time it helps!
*# Give it a go
*#* Seriously, if you can't be bothered to give it a go, then why should we be bothered to help you? If you feel you can't do it and you don't try then how will you ever know? We always prefer that you give it a go because you can learn from your mistakes and hopefully understand it better.
*# Post your problem
*#* Make sure you post in the correct forum.
*#** AutoIt Specific
*#*** [https://www.autoitscript.com/forum/forum/2-autoit-general-help-and-support/ General Help and Support] (Most support questions)
*#*** [https://www.autoitscript.com/forum/forum/10-autoit-gui-help-and-support/ GUI Support] (Support for the Graphical User Interface)
*#*** [https://www.autoitscript.com/forum/forum/14-autoitx-help-and-support/ AutoItX Support] (Support for the COM, DLL, PowerShell and .NET add-ons for AutoIt)
*#** Non-AutoIt
*#*** [https://www.autoitscript.com/forum/forum/6-chat/ Chat] (General chat for Active Members. Not accessible to guests or search engines)
*#*** [https://www.autoitscript.com/forum/forum/39-developer-general-discussion/ Developer General Discussion] (General development and scripting discussions)
*#*** [https://www.autoitscript.com/forum/forum/29-test-posting-messages/ Test Posting Messages] (This forum is emptied of all topics and posts from time to time)
*#*** [https://www.autoitscript.com/forum/forum/44-language-specific-discussion/ Language Specific Discussion] (Common IT Admin-related languages have their own forums. Feel free to post about any other language in the Misc forum)
*#*** [https://www.autoitscript.com/forum/forum/31-it-administration/ IT Administration] (Discussions about general IT related topics, administration, management and deployment)
*#* Include a detailed description in the content of the post, and a detailed title
*#** Titles such as 'Help' and 'What's wrong?' are not acceptable. To get the most help with your problem, be as descriptive as you can in the title, but keep in mind your title cannot be too long.
*#** Make sure you also include a descriptive question. Just saying 'what is wrong with the following' is also not acceptable, as we will have no idea what the problem is. Describe what you think is wrong and what is not working. It makes our job easier.
*#* Always include your code
*#** It shows us that you have tried and gives us a head start with something to play with.
* Usually asking for a script is not taken too well, within reason. Keep in mind that this is a support forum, so please acknowledge that. We are here to help you with your scripts, not to spoon-feed code to you. If you do need something written for you, maybe try [http://www.rentacoder.com/ RentACoder], as they are more suited to requests.
* Don't PM other members asking for them to look at threads of to help you unless they request it. It is actually quite rude and annoying to receive PMs of that nature.
* Lurk a little before you dive right in. Read a number of posts, or check out the group's archives. Get a feel for the tone of the forum so you can participate accordingly.
* Say online exactly what you would say in person. In other words, if you wouldn't say it to the person's face in front of your Grandmother, you shouldn't type it here.
* Remember your face doesn't show. Words alone can convey sentiment, but without benefit of inflection or facial expression, they can be misconstrued. Use descriptive wording, emoticons or .gifs to ensure your meaning is clear. By the same token, don't jump to conclusions about another person's intent in posting an unclear comment. When in doubt, ask for clarification.
* Be respectful. Internet etiquette is similar to standard etiquette in this area. Appreciate that your opinion is one of many. You can disagree with another person without being disrespectful or rude to other people.
* Ignore Trolls. If you engage in conversation with one, you'll raise your blood pressure and empower the troll. You can't win a flame war, and you can't sway a troll's opinion. Often, they don't even care about the subject. They live for the conflict and nothing more. Trolls are common and not worthy of your time. Ignore their posts no matter how inflammatory and eventually they'll get bored and move on.
* When you have found an answer for your question:
*# Do not edit your post to be blank or to have worthless information. People may be searching for the same issue you have, so be courteous to them by leaving your question there.
*# It is also optional to add the word [SOLVED] into the title, as well as selecting the post that best answered your question. It can make the lives of people searching easier.
* Finally follow the rules:
** [http://www.autoitscript.com/forum/topic/169097-forum-rules/ Forum rules]
** [http://www.autoitscript.com/forum/index.php?showtopic=37739 General policies and forum settings]
** [http://www.autoitscript.com/forum/index.php?showtopic=54168 Rules for the Chat forum]
** [http://www.autoitscript.com/forum/index.php?showtopic=65889 Rules for asking for source code]
** [http://www.autoitscript.com/forum/index.php?showtopic=156031 Google Policy Violations]

Some general points taken from [http://www.ehow.com/how_2106033_use-proper-forum-etiquette.html here].

==Are there forums available in my local language?==
Yes there are some available. Some forum members here participate in multiple forums.
* [http://www.autoit.de/ German Forums]
* [http://www.autoit.fr/ French Forums]
* [http://www.autoit.es/ Spanish Forums]
* [http://autoit-script.ru/ Russian Forums]
* [http://forum.autoitbrasil.com/ Portuguese Forums]

Please note that these are independent, community-run message boards and not just a translation of this board.

==How can I control (click, edit etc) an external (html) application?==
You can use the control* functions of autoit see helpfile
of use specific udf libraries
* [http://www.autoitscript.com/forum/topic/153520-iuiautomation-ms-framework-automate-chrome-ff-ie/ IUIAutomation for multiple applications]
*[https://www.autoitscript.com/forum/topic/197080-using-ui-automation-code-in-autoit/ uia explained in detail]
*[http://www.autoitscript.com/forum/topic/154439-chrome-udf/ chrome chrome.au3]
* [http://www.autoitscript.com/forum/topic/149526-librariesieau3/ Internet explorer ie.au3]
* [http://www.autoitscript.com/forum/topic/95595-ffau3-v0601b-10/ firefox ff.au3] (End of life)
* [https://www.autoitscript.com/forum/topic/166830-java-object-automation-and-simple-spy/ java]
* [https://www.autoitscript.com/forum/search/?&q=Selenium Selenium]
* [https://www.autoitscript.com/forum/topic/191990-webdriver-udf-w3c-compliant-version/ WebDriver UDF (IE, Chrome, FireFox)]
 

You should use spy applications to identify objects like
* au3inf part of AutoIT
* [http://www.autoitscript.com/forum/topic/153520-iuiautomation-ms-framework-automate-chrome-ff-ie/ simplespy in the zip]
* [https://www.autoitscript.com/forum/topic/166830-java-object-automation-and-simple-spy jabsimplespy in examples section of the AutoIt forum]
* [https://www.autoitscript.com/forum/topic/126716-control-viewer-autoit-window-info-tool/ control viewer]
* inspect as part of windows SDK
* VisualUIAVerifyNative.exe as part of windows SDK (8.1)
 

If above spy tools are not identifying your object you could try commercial tools (trials) like
* ranorex spy
* Testcomplete
* HP UFT
 

And your last recognition can be bitmaps
* search for GDI
* search for findBMP
* search for imagesearch

==Does AutoIt support database connections, such as SQL?==
Yes! UDFs exist for several popular SQL solutions, including SQLite, Firebird, MySQL, MSSQL and ODBC connections for PostGreSQL and others.

For an illustrative list, see this link:

* [https://www.autoitscript.com/wiki/User_Defined_Functions#Files.2C_Databases_and_web_connections Files, Databases and web connections]

A DBF UDF also exists

* [https://www.autoitscript.com/forum/topic/145142-dbf-udf-dbase-database-read-and-write-with-dll/ DBF UDF dBase with DLL]

==How can I include some files into my compiled Autoit's EXE?==
Use FileInstall() or ResourcesEx UDF from the forum Examples. Additional resources can also be included at compile time, click the "Res Add Files" tab.

==How can I test if checkbox / radiobutton is checked?==
Use this small function: If IsChecked($checkbox1) Then ...
<syntaxhighlight lang="autoit">
; by Zedna
Func IsChecked($control)
Return BitAND(GUICtrlRead($control), $GUI_CHECKED) = $GUI_CHECKED
EndFunc ;==>IsChecked
</syntaxhighlight>

==How to use the {enter} key as a Tab?==
Use
[https://www.autoitscript.com/autoit3/docs/functions/GUISetAccelerators.htm Accelerator keys]
<syntaxhighlight lang="autoit">

; by Melba23
#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>
#include <WinAPI.au3>

$hGUI = GUICreate("Test", 500, 500)

$cInput_1 = GUICtrlCreateInput("", 10, 10, 200, 20)
$cInput_2 = GUICtrlCreateInput("", 10, 50, 200, 20)
$cInput_3 = GUICtrlCreateInput("", 10, 90, 200, 20)

$cButton_1 = GUICtrlCreateButton("Button 1", 250, 10, 80, 30)
$cButton_2 = GUICtrlCreateButton("Button 2", 250, 50, 80, 30)
$cButton_3 = GUICtrlCreateButton("Button 3", 250, 90, 80, 30)

$cEnter = GUICtrlCreateDummy()

GUISetState()

Local $aAccelKeys[2][2] = [["{ENTER}", $cEnter], ["{TAB}", $cEnter]] ; Make {TAB} an accelerator
GUISetAccelerators($aAccelKeys)

While 1

Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $cEnter
Switch _WinAPI_GetFocus()
Case GUICtrlGetHandle($cInput_1)
; Check the input content
If checkEntry() = True Then
; Correct so move to next input
GUICtrlSetState($cInput_2, $GUI_FOCUS)
EndIf
; Not correct so stay in current input
Case GUICtrlGetHandle($cInput_2)
If checkEntry() = True Then
GUICtrlSetState($cInput_3, $GUI_FOCUS)
EndIf
Case GUICtrlGetHandle($cInput_3)
If checkEntry() = True Then
ConsoleWrite("End" & @CRLF)
EndIf
Case Else
GUISetAccelerators(0) ; Remove accelerator link
ControlSend($hGUI, "", "", "{TAB}") ; Send {TAB} to the GUI
GUISetAccelerators($aAccelKeys) ; Reset the accelerator

EndSwitch
EndSwitch

WEnd

Func checkEntry()

; Random chance of correct answer or fail
If Mod(@SEC, 2) = 0 Then
MsgBox($MB_SYSTEMMODAL, "Test Fail", "Press Enter to close this message box")
Return False
EndIf
Return True

EndFunc ;==>checkEntry
</syntaxhighlight>

==Why are my number sort results wrong?==
AutoIt by default uses an alpha sort algorithm. This means that ABC is sorted correctly, but it sorts numbers as 1,10,2,22,3,31 where the user expects 1,2,3,10,22,31.
This can be remedied by using a custom sort function. An example of such a custom number sort by Valuater appears below. Search the Forum for [https://www.autoitscript.com/forum/topic/95383-sorting-numbers/ Number Sort] and [https://www.autoitscript.com/forum/topic/83626-natural-order-string-comparison/ Natural Order String Comparison]
<syntaxhighlight lang="autoit">
; by Valuater
#include <array.au3>

$Array = StringSplit("2,5,3,4,6,1,8,9,7", ",")

_ArraySortNum($Array)

_ArrayDisplay($Array, "Sorted Array")

Func _ArraySortNum(ByRef $n_array, $i_descending = 0, $i_start = 1)
Local $i_ub = UBound($n_array)
For $i_count = $i_start To $i_ub - 2
Local $i_se = $i_count
If $i_descending Then
For $x_count = $i_count To $i_ub - 1
If Number($n_array[$i_se]) < Number($n_array[$x_count]) Then $i_se = $x_count
Next
Else
For $x_count = $i_count To $i_ub - 1
If Number($n_array[$i_se]) > Number($n_array[$x_count]) Then $i_se = $x_count
Next
EndIf
Local $i_hld = $n_array[$i_count]
$n_array[$i_count] = $n_array[$i_se]
$n_array[$i_se] = $i_hld
Next
EndFunc ;==>_ArraySortNum
</syntaxhighlight>

==How do I include AutoIt functions in a C# / C++ / VB programme? AutoItX==
AutoIt is also supplied as a combined COM and DLL version of AutoIt called AutoItX that allows you to add the unique features of AutoIt to your own favourite scripting or programming languages!
[https://www.autoitscript.com/site/autoit/ Info on AutoItX]

From AutoItX.chm:
AutoItX is a DLL version of AutoIt v3 that provides a subset of the features of AutoIt via an ActiveX/COM and DLL interface. This means that you can add AutoIt-like features to your favourite scripting and programming languages, e.g. VB, VBScript, Delphi, C, C++, Kixtart, and most other languages that support the use of DLLs.

Here are some C++ source code samples from various projects by [https://www.autoitscript.com/forum/profile/1-jon/ Jon]. Most are free to use but check any license files that accompany the downloads for details. All code was created in Microsoft Visual C (6 and 7) but most would probably compile under mingw32 as well.
[https://www.autoitscript.com/site/code/ Download C++ examples for AutoItX]

You don't need to regsvr it if you are using the c# library. The c# library uses the non-COM part of the DLL so it just needs to be in the same folder as the exe and add the assembly.dll to your project. From the documenation:

Using the Assembly from VB/C# within in Visual Studio is very easy:
* Add a reference to AutoItX3.Assembly.dll to your project
* Add a using AutoIt; statement in the files you want to use AutoIt functions
* Distribute your final executable with the files AutoItX3.Assembly.dll, AutoItX3.dll, AutoItX3_x64.dll.
* Write code like this C# example:
using AutoIt;
...
<syntaxhighlight lang="autoit">
; by Jon
// Wow, this is C#!
AutoItX.Run("notepad.exe");
AutoItX.WinWaitActive("Untitled");
AutoItX.Send("I'm in notepad");
IntPtr winHandle = AutoItX.WinGetHandle("Untitled");
AutoItX.WinKill(winHandle);
</syntaxhighlight>

From the AutoItX Help File (included in the default AutoIt install):
AutoItX can be used as a standard DLL from any language capable of calling functions in external DLLs.

The following files are provided to allow you to use the DLL in C++:

* AutoItX3_DLL.h - C language header file showing the exported functions and parameters
* AutoItX3_DLL.lib - Microsoft format import library (x86)
* AutoItX3_x64_DLL.lib - Microsoft format import library (x64)
* AutoItX3.dll - The main AutoItX DLL (x86)
* AutoItX3_x64.dll - The main AutoItX DLL (x64)

==How can I search an image in another image? ==
You can use the Pixel* functions of AutoIt. See the help file for more information and examples.
You can also use one of the UDFs below; most of which use GDI:
* [https://www.autoitscript.com/forum/topic/158264-bmpsearch-search-for-bitmap-within-bitmap-assembly-version/ FASM example]
* [https://www.autoitscript.com/forum/topic/140478-bitmap-processing-using-raw-code/ asm bitmap processing]
* [https://www.autoitscript.com/forum/topic/66545-find-bmp-in-another-bmp-imagesearch/ find bitmap in bitmap]
* [https://www.autoitscript.com/forum/search/?type=all&q=_GDIPlus_BitmapLockBits/ GDI bitmaps]
Other libraries can be found that make use of a specific external dll but those above are considered "native" as no external dlls are required.

==Multithreading==
Multithreading basically is running multiple scripts/programs that have acces to the same variables, normally by sharing memory.

The AutoIt language is not threadsafe and multithreading is firmly on the NOT TO DO list

Multitasking and Multiprocessing are closely related, however, and multiple solutions have been explored:
* [https://www.autoitscript.com/forum/topic/25350-multithread/ Multithread technical discussion]
* [https://www.autoitscript.com/forum/topic/25494-threaded-dll-sample/ Multithread with external DLL]
* [https://www.autoitscript.com/forum/topic/146794-multi-thread-autoit/ Multithread with external DLL 2]
* [https://www.autoitscript.com/forum/topic/64390-how-to-multi-process-in-autoit/ Multi process]
* [https://www.autoitscript.com/forum/topic/187334-using-net-libary-with-autoit-possible/ Using C# - Host .NET]

==Test automation==
Many people are looking for freeware tools to do test automation and cannot afford the commercial tools like HP LeanFT, Ranorex, Squish etc. 
So how can AutoIt help you. 
Out of the box install the base full zip package and start Scite.Exe as a simple IDE. 
If you want to do more these links will help you. 
Read FAQ 31 for the basic stuff on which technologies are readable and which spying tools there are 
Read FAQ 38 for the bitmap stuff 
* [https://www.autoitscript.com/forum/topic/136766-isn-autoit-studio/ Alternative project IDE]
* [https://www.autoitscript.com/forum/topic/188158-net-common-language-runtime-clr-framework/ .NET stuff]
* [https://www.autoitscript.com/forum/topic/84133-winhttp-functions/ WinHTTP]
* [https://www.autoitscript.com/forum/topic/185401-restwhich-udf-to-use-webdriver-of-edge/ webdriver]
Android can be reached thru ADB and Webdriver 
iOS is limited to normal webdriver stuff thru WinHTTP library. So most likely you have to install additional iOS webdriver solutions 
And after reading FAQ just ask your questions in the support forum 

==DPI Awareness==
The following few links are related to DPI Awareness :

After much research and testing, DPI Awareness is solved in the following thread with all relevant information moved to the 1st post
* [https://www.autoitscript.com/forum/topic/199786-making-your-compiled-application-dpi-aware/ making-your-compiled-application-dpi-aware]

* [https://www.autoitscript.com/forum/topic/166479-writing-dpi-awareness-app-workaround/ Writing DPI Awareness App - workaround]
* [https://www.autoitscript.com/forum/topic/182423-wrong-screen-resolution-displayed-by-autoit-macros/ Wrong Screen Resolution Displayed by Autoit Macros]
* [https://www.autoitscript.com/forum/topic/192529-dpi-awareness-any-suggestion/ DPI Awareness - question]

==AutoIt+SciTE Portable Developer Environment==
Recent discussion can be found here:
* [https://www.autoitscript.com/forum/topic/119572-autoit3-portable/?do=findComment&comment=1391105 How to make AutoIt+SciTE portable]

==Does AutoIt have an agreed set of good practices ?==
* [http://www.autoitscript.com/forum/index.php?showtopic=146866 Forum disscusion on good coding practices in AutoIt]
Wiki related resources:
* [https://www.autoitscript.com/wiki/Best_coding_practices Best coding practices]
* [https://www.autoitscript.com/wiki/Variables_-_using_Global,_Local,_Static_and_ByRef Variables - using Global, Local, Static and ByRef]
* [https://www.autoitscript.com/wiki/UDF-spec UDF-spec]

Snippets ( GUI )

2020-06-30T18:41:54Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL2 = 4574-argumentum
| AuthorName2 = argumentum ( multi-monitor mod. )
}}

<syntaxhighlight lang="autoit">
#include <AutoItConstants.au3>
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 30 ; 30 pixels for "dramatic effect", 10 pixels should be good for the "magnetic pull"
Global $nEdge = BitOR(1, 2, 4, 8) ; Left, Top, Right, Bottom
Global $nEdgeBorderWidth[4] = [0, 0, 0, 0] ; Left, Top, Right, Bottom

Example()
Func Example()
Local $hGUI = GUICreate("Snapped Window multi-monitor", 500, 200)
Local $bNewStyle = False, $idBtnStyle = GUICtrlCreateButton("Change Style", 50, 50, 200, 25)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop

Case $GUI_EVENT_MAXIMIZE, $GUI_EVENT_RESTORE ; should not change to this style while maximized
GUICtrlSetState($idBtnStyle, (BitAND(WinGetState($hGUI), $WIN_STATE_MAXIMIZED) ? $GUI_DISABLE : $GUI_ENABLE))

Case $idBtnStyle
$bNewStyle = Not $bNewStyle
If $bNewStyle Then
GUISetStyle(BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX, $WS_THICKFRAME, $WS_TABSTOP))
Dim $nEdgeBorderWidth[4] = [-7, 0, 7, 7] ; adjusting for Windows 10 border scheme
Else
GUISetStyle($GUI_SS_DEFAULT_GUI)
Dim $nEdgeBorderWidth[4] = [0, 0, 0, 0]
EndIf
GUICtrlSetData($idBtnStyle, ($bNewStyle ? 'Undo Style' : 'Change Style'))
GUIStyleRefresh($hGUI)

EndSwitch
WEnd
EndFunc ;==>Example

Func GUIStyleRefresh($hWnd)
Local $aWinPos = WinGetPos($hWnd)
If @error Then Return SetError(@error, @extended, @error)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2] - 1, $aWinPos[3] - 1)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2], $aWinPos[3])
EndFunc ;==>GUIStyleRefresh

Func MY_WM_WINDOWPOSCHANGING($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam
; original code at https://www.autoitscript.com/forum/topic/24342-form-snap/

; The Static declaration speeds up the func. ( not much, nanoseconds )
Local Static $stWinPos, $tPos, $hMonitor, $aData, $nLeft, $nTop, $nRight, $nBottom, $hTimer = 0

If TimerDiff($hTimer) > 1000 Then
$hTimer = TimerInit()
$tPos = _WinAPI_GetMousePos() ; These func are very time consuming and
If Not @error Then $hMonitor = _WinAPI_MonitorFromPoint($tPos) ; the user is very unlikely to move the
If Not @error Then $aData = _WinAPI_GetMonitorInfo($hMonitor) ; mouse into position on another monitor
If @error Then Return $GUI_RUNDEFMSG ; in less than a second.
EndIf

; https://docs.microsoft.com/en-us/windows/win32/api/winuser/ns-winuser-windowpos?redirectedfrom=MSDN
$stWinPos = DllStructCreate("hwnd hwnd;hwnd hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam) ; $tagWINDOWPOS
$nLeft = DllStructGetData($aData[1], 1)
$nTop = DllStructGetData($aData[1], 2)
$nRight = DllStructGetData($aData[1], 3) - $stWinPos.cx
$nBottom = DllStructGetData($aData[1], 4) - $stWinPos.cy

If BitAND($nEdge, 1) And Abs($nLeft - $stWinPos.x) <= $nGap Then $stWinPos.x = $nLeft + $nEdgeBorderWidth[0]
If BitAND($nEdge, 4) And Abs($nRight - $stWinPos.x) <= $nGap Then $stWinPos.x = $nRight + $nEdgeBorderWidth[2]
If BitAND($nEdge, 8) And Abs($nBottom - $stWinPos.y) <= $nGap Then $stWinPos.y = $nBottom + $nEdgeBorderWidth[3]
If BitAND($nEdge, 2) And Abs($nTop - $stWinPos.y) <= $nGap Then $stWinPos.y = $nTop + $nEdgeBorderWidth[1]

Return $GUI_RUNDEFMSG
EndFunc ;==>MY_WM_WINDOWPOSCHANGING
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-26T06:05:59Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL2 = 4574-argumentum
| AuthorName2 = argumentum ( multi-monitor mod. )
}}

<syntaxhighlight lang="autoit">
#include <AutoItConstants.au3>
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 30 ; 30 pixels for "dramatic effect", 10 pixels should be good for the "magnetic pull"
Global $nEdge = BitOR(1, 2, 4, 8) ; Left, Top, Right, Bottom
Global $nEdgeBorderWidth[4] = [0, 0, 0, 0] ; Left, Top, Right, Bottom

Example()
Func Example()
Local $hGUI = GUICreate("Snapped Window multi-monitor", 500, 200)
Local $bNewStyle = False, $idBtnStyle = GUICtrlCreateButton("Change Style", 50, 50, 200, 25)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop

Case $GUI_EVENT_MAXIMIZE, $GUI_EVENT_RESTORE ; should not change to this style while maximized
GUICtrlSetState($idBtnStyle, (BitAND(WinGetState($hGUI), $WIN_STATE_MAXIMIZED) ? $GUI_DISABLE : $GUI_ENABLE))

Case $idBtnStyle
$bNewStyle = Not $bNewStyle
If $bNewStyle Then
GUISetStyle(BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX, $WS_THICKFRAME, $WS_TABSTOP))
Dim $nEdgeBorderWidth[4] = [-7, 0, 7, 7] ; adjusting for Windows 10 border scheme
Else
GUISetStyle($GUI_SS_DEFAULT_GUI)
Dim $nEdgeBorderWidth[4] = [0, 0, 0, 0]
EndIf
GUICtrlSetData($idBtnStyle, ($bNewStyle ? 'Undo Style' : 'Change Style'))
GUIStyleRefresh($hGUI)

EndSwitch
WEnd
EndFunc ;==>Example

Func GUIStyleRefresh($hWnd)
Local $aWinPos = WinGetPos($hWnd)
If @error Then Return SetError(@error, @extended, @error)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2] - 1, $aWinPos[3] - 1)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2], $aWinPos[3])
EndFunc ;==>GUIStyleRefresh

Func MY_WM_WINDOWPOSCHANGING($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam
; original code at https://www.autoitscript.com/forum/topic/24342-form-snap/

; The Static declaration speeds up the func. ( not much, nanoseconds )
Local Static $stWinPos, $tPos, $hMonitor, $aData, $nLeft, $nTop, $nRight, $nBottom, $hTimer = 0

If TimerDiff($hTimer) > 1000 Then
$hTimer = TimerInit()
$tPos = _WinAPI_GetMousePos() ; These func are very time consuming and
If Not @error Then $hMonitor = _WinAPI_MonitorFromPoint($tPos) ; the user is very unlikely to move the
If Not @error Then $aData = _WinAPI_GetMonitorInfo($hMonitor) ; mouse into position on another monitor
If @error Then Return $GUI_RUNDEFMSG ; in less than a second.
EndIf

; https://docs.microsoft.com/en-us/windows/win32/api/winuser/ns-winuser-windowpos?redirectedfrom=MSDN
$stWinPos = DllStructCreate("hwnd hwnd;hwnd hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam) ; $tagWINDOWPOS
$nLeft = DllStructGetData($aData[1], 1)
$nTop = DllStructGetData($aData[1], 2)
$nRight = DllStructGetData($aData[1], 3) - $stWinPos.cx
$nBottom = DllStructGetData($aData[1], 4) - $stWinPos.cy

If BitAND($nEdge, 1) And Abs($nLeft - $stWinPos.x) <= $nGap Then $stWinPos.x = $nLeft + $nEdgeBorderWidth[0]
If BitAND($nEdge, 2) And Abs($nTop - $stWinPos.y) <= $nGap Then $stWinPos.y = $nTop + $nEdgeBorderWidth[1]
If BitAND($nEdge, 4) And Abs($nRight - $stWinPos.x) <= $nGap Then $stWinPos.x = $nRight + $nEdgeBorderWidth[2]
If BitAND($nEdge, 8) And Abs($nBottom - $stWinPos.y) <= $nGap Then $stWinPos.y = $nBottom + $nEdgeBorderWidth[3]

Return $GUI_RUNDEFMSG
EndFunc ;==>MY_WM_WINDOWPOSCHANGING
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-26T06:05:08Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL2 = 4574-argumentum
| AuthorName2 = argumentum ( multi-monitor mod. )
}}

<syntaxhighlight lang="autoit">
#include <AutoItConstants.au3>
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 30 ; 30 pixels for "dramatic effect", 10 pixels should be good for the "magnetic pull"
Global $nEdge = BitOR(1, 2, 4, 8) ; Left, Top, Right, Bottom
Global $nEdgeBorderWidth[4] = [0, 0, 0, 0] ; Left, Top, Right, Bottom

Example()
Func Example()
Local $hGUI = GUICreate("Snapped Window multi-monitor", 500, 200)
Local $bNewStyle = False, $idBtnStyle = GUICtrlCreateButton("Change Style", 50, 50, 200, 25)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop

Case $GUI_EVENT_MAXIMIZE, $GUI_EVENT_RESTORE ; should not change to this style while maximized
GUICtrlSetState($idBtnStyle, (BitAND(WinGetState($hGUI), $WIN_STATE_MAXIMIZED) ? $GUI_DISABLE : $GUI_ENABLE))

Case $idBtnStyle
$bNewStyle = Not $bNewStyle
If $bNewStyle Then
GUISetStyle(BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX, $WS_THICKFRAME, $WS_TABSTOP))
Dim $nEdgeBorderWidth[4] = [-7, 0, 7, 7] ; adjusting for Windows 10 border scheme
Else
GUISetStyle($GUI_SS_DEFAULT_GUI)
Dim $nEdgeBorderWidth[4] = [0, 0, 0, 0]
EndIf
GUICtrlSetData($idBtnStyle, ($bNewStyle ? 'Undo Style' : 'Change Style'))
GUIStyleRefresh($hGUI)

EndSwitch
WEnd
EndFunc ;==>Example

Func GUIStyleRefresh($hWnd)
Local $aWinPos = WinGetPos($hWnd)
If @error Then Return SetError(@error, @extended, @error)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2] - 1, $aWinPos[3] - 1)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2], $aWinPos[3])
EndFunc ;==>GUIStyleRefresh

Func MY_WM_WINDOWPOSCHANGING($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam
; original code at https://www.autoitscript.com/forum/topic/24342-form-snap/

; The Static declaration speeds up the func. ( not much, nanoseconds )
Local Static $stWinPos, $tPos, $hMonitor, $aData, $nLeft, $nTop, $nRight, $nBottom, $hTimer = 0

If TimerDiff($hTimer) > 1000 Then
$hTimer = TimerInit()
$tPos = _WinAPI_GetMousePos() ; These func are very time consuming and
If Not @error Then $hMonitor = _WinAPI_MonitorFromPoint($tPos) ; the user is very unlikely to move the
If Not @error Then $aData = _WinAPI_GetMonitorInfo($hMonitor) ; mouse into position of another monitor
If @error Then Return $GUI_RUNDEFMSG ; in less than a second.
EndIf

; https://docs.microsoft.com/en-us/windows/win32/api/winuser/ns-winuser-windowpos?redirectedfrom=MSDN
$stWinPos = DllStructCreate("hwnd hwnd;hwnd hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam) ; $tagWINDOWPOS
$nLeft = DllStructGetData($aData[1], 1)
$nTop = DllStructGetData($aData[1], 2)
$nRight = DllStructGetData($aData[1], 3) - $stWinPos.cx
$nBottom = DllStructGetData($aData[1], 4) - $stWinPos.cy

If BitAND($nEdge, 1) And Abs($nLeft - $stWinPos.x) <= $nGap Then $stWinPos.x = $nLeft + $nEdgeBorderWidth[0]
If BitAND($nEdge, 2) And Abs($nTop - $stWinPos.y) <= $nGap Then $stWinPos.y = $nTop + $nEdgeBorderWidth[1]
If BitAND($nEdge, 4) And Abs($nRight - $stWinPos.x) <= $nGap Then $stWinPos.x = $nRight + $nEdgeBorderWidth[2]
If BitAND($nEdge, 8) And Abs($nBottom - $stWinPos.y) <= $nGap Then $stWinPos.y = $nBottom + $nEdgeBorderWidth[3]

Return $GUI_RUNDEFMSG
EndFunc ;==>MY_WM_WINDOWPOSCHANGING
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-26T05:37:03Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL2 = 4574-argumentum
| AuthorName2 = argumentum ( multi-monitor mod. )
}}

<syntaxhighlight lang="autoit">
#include <AutoItConstants.au3>
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 30 ; 30 pixels for "dramatic effect", 10 pixels should be good for the "magnetic pull"
Global $nEdge = BitOR(1, 2, 4, 8) ; Left, Top, Right, Bottom
Global $nEdgeBorderWidth[4] = [0, 0, 0, 0] ; Left, Top, Right, Bottom

Example()
Func Example()
Local $hGUI = GUICreate("Snapped Window multi-monitor", 500, 200)
Local $bNewStyle = False, $idBtnStyle = GUICtrlCreateButton("Change Style", 50, 50, 200, 25)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop

Case $GUI_EVENT_MAXIMIZE, $GUI_EVENT_RESTORE ; should not change to this style while maximized
GUICtrlSetState($idBtnStyle, (BitAND(WinGetState($hGUI), $WIN_STATE_MAXIMIZED) ? $GUI_DISABLE : $GUI_ENABLE))

Case $idBtnStyle
$bNewStyle = Not $bNewStyle
If $bNewStyle Then
GUISetStyle(BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX, $WS_THICKFRAME, $WS_TABSTOP))
Dim $nEdgeBorderWidth[4] = [-7, 0, 7, 7] ; adjusting for Windows 10 border scheme
Else
GUISetStyle($GUI_SS_DEFAULT_GUI)
Dim $nEdgeBorderWidth[4] = [0, 0, 0, 0]
EndIf
GUICtrlSetData($idBtnStyle, ($bNewStyle ? 'Undo Style' : 'Change Style'))
GUIStyleRefresh($hGUI)

EndSwitch
WEnd
EndFunc ;==>Example

Func GUIStyleRefresh($hWnd)
Local $aWinPos = WinGetPos($hWnd)
If @error Then Return SetError(@error, @extended, @error)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2] - 1, $aWinPos[3] - 1)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2], $aWinPos[3])
EndFunc ;==>GUIStyleRefresh

Func MY_WM_WINDOWPOSCHANGING($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam
; original code at https://www.autoitscript.com/forum/topic/24342-form-snap/

; The Static declaration speeds up the func. ( not much, nanoseconds )
Local Static $stWinPos, $tPos, $hMonitor, $aData, $nLeft, $nTop, $nRight, $nBottom, $hTimer = 0

If TimerDiff($hTimer) > 1000 Then
$hTimer = TimerInit()
$tPos = _WinAPI_GetMousePos() ; These func are very time consuming and
If Not @error Then $hMonitor = _WinAPI_MonitorFromPoint($tPos) ; the user is very unlikely to move the
If Not @error Then $aData = _WinAPI_GetMonitorInfo($hMonitor) ; mouse into position of another monitor
If @error Then Return $GUI_RUNDEFMSG ; in less than a second.
EndIf

; https://docs.microsoft.com/en-us/windows/win32/api/winuser/ns-winuser-windowpos?redirectedfrom=MSDN
$stWinPos = DllStructCreate("hwnd hwnd;hwnd hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam) ; $tagWINDOWPOS
$nLeft = DllStructGetData($aData[1], 1)
$nTop = DllStructGetData($aData[1], 2)
$nRight = DllStructGetData($aData[1], 3) - $stWinPos.cx
$nBottom = DllStructGetData($aData[1], 4) - $stWinPos.cy

If BitAND($nEdge, 1) And Abs($nLeft - $stWinPos.x) <= $nGap Then $stWinPos.x = $nLeft + $nEdgeBorderWidth[0]
If BitAND($nEdge, 2) And Abs($nTop - $stWinPos.y) <= $nGap Then $stWinPos.y = $nTop + $nEdgeBorderWidth[1]
If BitAND($nEdge, 4) And Abs($nRight - $stWinPos.x) <= $nGap Then $stWinPos.x = $nRight + $nEdgeBorderWidth[2]
If BitAND($nEdge, 8) And Abs($nBottom - $stWinPos.y) <= $nGap Then $stWinPos.y = $nBottom + $nEdgeBorderWidth[3]

Return $GUI_RUNDEFMSG
EndFunc ;==>MY_WM_WINDOWPOSCHANGING
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-25T03:58:25Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL2 = 4574-argumentum
| AuthorName2 = argumentum ( multi-monitor mod. )
}}

<syntaxhighlight lang="autoit">
#include <AutoItConstants.au3>
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 30 ; 30 pixels for "dramatic effect", 10 pixels should be good for the "magnetic pull"
Global $nEdge = BitOR(1, 2, 4, 8); Left, Top, Right, Bottom
Global $nEdgeBorderWidth[4] = [0, 0, 0, 0] ; Left, Top, Right, Bottom

Global $hGUI = GUICreate("Snapped Window multi-monitor", 500, 200)
Global $bNewStyle = False, $idBtnStyle = GUICtrlCreateButton("Change Style", 50, 50, 200, 25)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop

Case $GUI_EVENT_MAXIMIZE, $GUI_EVENT_RESTORE ; should not change to this style while maximized
GUICtrlSetState($idBtnStyle, (BitAND(WinGetState($hGUI), $WIN_STATE_MAXIMIZED) ? $GUI_DISABLE : $GUI_ENABLE))

Case $idBtnStyle
$bNewStyle = Not $bNewStyle
If $bNewStyle Then
GUISetStyle(BitOR($GUI_SS_DEFAULT_GUI,$WS_MAXIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_TABSTOP))
Dim $nEdgeBorderWidth[4] = [-7, 0, 7, 7] ; adjusting for Windows 10 border scheme
Else
GUISetStyle($GUI_SS_DEFAULT_GUI)
Dim $nEdgeBorderWidth[4] = [0, 0, 0, 0]
EndIf
GUICtrlSetData($idBtnStyle, ($bNewStyle ? 'Undo Style' : 'Change Style'))
GUIStyleRefresh($hGUI)

EndSwitch
WEnd

Func GUIStyleRefresh($hWnd)
Local $aWinPos = WinGetPos($hWnd)
If @error Then Return SetError(@error, @extended, @error)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2] - 1, $aWinPos[3] - 1)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2], $aWinPos[3])
EndFunc

Func MY_WM_WINDOWPOSCHANGING($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam
; original code at https://www.autoitscript.com/forum/topic/24342-form-snap/

; The Static declaration speeds up the func. ( not much, nanoseconds )
Local Static $stWinPos, $tPos, $hMonitor, $aData, $nLeft, $nTop, $nRight, $nBottom, $hTimer = 0
Local Static $tagWINDOWPOS = "hwnd hwnd;hwnd hwndInsertAfter;int x;int y;int cx;int cy;uint flags"
; https://docs.microsoft.com/en-us/windows/win32/api/winuser/ns-winuser-windowpos?redirectedfrom=MSDN

If TimerDiff($hTimer) > 1000 Then
$hTimer = TimerInit()
$tPos = _WinAPI_GetMousePos() ; These func are very time consuming and
If Not @error Then $hMonitor = _WinAPI_MonitorFromPoint($tPos); the user is very unlikely to move the
If Not @error Then $aData = _WinAPI_GetMonitorInfo($hMonitor) ; mouse into position of another monitor
If @error Then Return $GUI_RUNDEFMSG ; in less than a second.
EndIf

$stWinPos = DllStructCreate($tagWINDOWPOS, $lParam)
$nLeft = DllStructGetData($aData[1], 1)
$nTop = DllStructGetData($aData[1], 2)
$nRight = DllStructGetData($aData[1], 3) - DllStructGetData($stWinPos, 5)
$nBottom = DllStructGetData($aData[1], 4) - DllStructGetData($stWinPos, 6)

If BitAND($nEdge, 1) and Abs($nLeft - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nLeft + $nEdgeBorderWidth[0])
If BitAND($nEdge, 2) and Abs($nTop - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nTop + $nEdgeBorderWidth[1])
If BitAND($nEdge, 4) and Abs($nRight - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nRight + $nEdgeBorderWidth[2])
If BitAND($nEdge, 8) and Abs($nBottom - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nBottom + $nEdgeBorderWidth[3])

Return $GUI_RUNDEFMSG
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-25T03:24:39Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL2 = 4574-argumentum
| AuthorName2 = argumentum ( multi-monitor mod. )
}}

<syntaxhighlight lang="autoit">
#include <AutoItConstants.au3>
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 30 ; 30 pixels for "dramatic effect", 10 pixels should be good for the "magnetic pull"
Global $nEdge = BitOR(1, 2, 4, 8); Left, Top, Right, Bottom
Global $nEdgeBorderWidth[4] = [0, 0, 0, 0] ; Left, Top, Right, Bottom

Global $hGUI = GUICreate("Snapped Window multi-monitor", 500, 200)
Global $aGUIStyle = GUIGetStyle($hGUI) ; be careful the style change after opening
Global $bNewStyle = False, $idBtnStyle = GUICtrlCreateButton("Set Style", 45, 50, 150, 20)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop

Case $GUI_EVENT_MAXIMIZE, $GUI_EVENT_RESTORE ; should not change to this style while maximized
GUICtrlSetState($idBtnStyle, (BitAND(WinGetState($hGUI), $WIN_STATE_MAXIMIZED) ? $GUI_DISABLE : $GUI_ENABLE))

Case $idBtnStyle
If $bNewStyle Then
GUISetStyle($aGUIStyle[0], $aGUIStyle[1], $hGUI)
GUICtrlSetData($idBtnStyle, 'Change Style')
Dim $nEdgeBorderWidth[4] = [0, 0, 0, 0]
$bNewStyle = False
Else
GUISetStyle(BitOR($GUI_SS_DEFAULT_GUI,$WS_MAXIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_TABSTOP), -1, $hGUI)
GUICtrlSetData($idBtnStyle, 'Undo Style')
Dim $nEdgeBorderWidth[4] = [-7, 0, 7, 7] ; adjusting for Windows 10 border scheme
$bNewStyle = True
EndIf
GUIStyleRefresh($hGUI)

EndSwitch
WEnd

Func GUIStyleRefresh($hWnd)
Local $aWinPos = WinGetPos($hWnd)
If @error Then Return SetError(@error, @extended, @error)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2] - 1, $aWinPos[3] - 1)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2], $aWinPos[3])
EndFunc

Func MY_WM_WINDOWPOSCHANGING($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam
; original code at https://www.autoitscript.com/forum/topic/24342-form-snap/

; The Static declaration speeds up the func. ( not much, nanoseconds )
Local Static $stWinPos, $tPos, $hMonitor, $aData, $nLeft, $nTop, $nRight, $nBottom, $hTimer = 0
Local Static $tagWINDOWPOS = "hwnd hwnd;hwnd hwndInsertAfter;int x;int y;int cx;int cy;uint flags"

If TimerDiff($hTimer) > 1000 Then
$hTimer = TimerInit()
$tPos = _WinAPI_GetMousePos() ; These func are very time consuming and
If Not @error Then $hMonitor = _WinAPI_MonitorFromPoint($tPos); the user is very unlikely to move the
If Not @error Then $aData = _WinAPI_GetMonitorInfo($hMonitor) ; mouse into position of another monitor
If @error Then Return $GUI_RUNDEFMSG ; in less than a second.
EndIf

; https://docs.microsoft.com/en-us/windows/win32/api/winuser/ns-winuser-windowpos?redirectedfrom=MSDN
$stWinPos = DllStructCreate($tagWINDOWPOS, $lParam)
$nLeft = DllStructGetData($aData[1], 1)
$nTop = DllStructGetData($aData[1], 2)
$nRight = DllStructGetData($aData[1], 3) - DllStructGetData($stWinPos, 5)
$nBottom = DllStructGetData($aData[1], 4) - DllStructGetData($stWinPos, 6)

If BitAND($nEdge, 1) and Abs($nLeft - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nLeft + $nEdgeBorderWidth[0])
If BitAND($nEdge, 2) and Abs($nTop - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nTop + $nEdgeBorderWidth[1])
If BitAND($nEdge, 4) and Abs($nRight - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nRight + $nEdgeBorderWidth[2])
If BitAND($nEdge, 8) and Abs($nBottom - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nBottom + $nEdgeBorderWidth[3])

Return $GUI_RUNDEFMSG
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-25T03:20:29Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL2 = 4574-argumentum
| AuthorName2 = argumentum ( multi-monitor mod. )
}}

<syntaxhighlight lang="autoit">
#include <AutoItConstants.au3>
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 30 ; 30 pixels for "dramatic effect", 10 pixels should be good for the "magnetic pull"
Global $nEdge = BitOR(1, 2, 4, 8); Left, Top, Right, Bottom
Global $nEdgeBorderWidth[4] = [0, 0, 0, 0] ; Left, Top, Right, Bottom

Global $hGUI = GUICreate("Snapped Window multi-monitor", 500, 200)
Global $aGUIStyle = GUIGetStyle($hGUI) ; be careful the style change after opening
Global $bNewStyle = False, $idBtnStyle = GUICtrlCreateButton("Set Style", 45, 50, 150, 20)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop

Case $GUI_EVENT_MAXIMIZE, $GUI_EVENT_RESTORE ; should not change to this style while maximized
GUICtrlSetState($idBtnStyle, (BitAND(WinGetState($hGUI), $WIN_STATE_MAXIMIZED) ? $GUI_DISABLE : $GUI_ENABLE))

Case $idBtnStyle
If $bNewStyle Then
GUISetStyle($aGUIStyle[0], $aGUIStyle[1], $hGUI)
GUICtrlSetData($idBtnStyle, 'Change Style')
Dim $nEdgeBorderWidth[4] = [0, 0, 0, 0]
$bNewStyle = False
Else
GUISetStyle(BitOR($GUI_SS_DEFAULT_GUI,$WS_MAXIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_TABSTOP), -1, $hGUI)
GUICtrlSetData($idBtnStyle, 'Undo Style')
Dim $nEdgeBorderWidth[4] = [-7, 0, 7, 7] ; adjusting for Windows 10 border scheme
$bNewStyle = True
EndIf
GUIStyleRefresh($hGUI)

EndSwitch
WEnd

Func GUIStyleRefresh($hWnd)
Local $aWinPos = WinGetPos($hWnd)
If @error Then Return SetError(@error, @extended, @error)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2] - 1, $aWinPos[3] - 1)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2], $aWinPos[3])
EndFunc

Func MY_WM_WINDOWPOSCHANGING($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam
; original code at https://www.autoitscript.com/forum/topic/24342-form-snap/

; The Static declaration speeds up the func. ( not much, nanoseconds )
Local Static $stWinPos, $tPos, $hMonitor, $aData, $nLeft, $nTop, $nRight, $nBottom, $hTimer = 0
Local Static $tagWINDOWPOS = "hwnd hwnd;hwnd hwndInsertAfter;int x;int y;int cx;int cy;uint flags"

If TimerDiff($hTimer) > 1000 Then
$hTimer = TimerInit()
$tPos = _WinAPI_GetMousePos() ; These func are very time consuming and
If Not @error Then $hMonitor = _WinAPI_MonitorFromPoint($tPos); the user is very unlikely to move the
If Not @error Then $aData = _WinAPI_GetMonitorInfo($hMonitor) ; mouse into position of another monitor
If @error Then Return $GUI_RUNDEFMSG ; in less than a second.
EndIf

; https://docs.microsoft.com/en-us/windows/win32/api/winuser/ns-winuser-windowpos?redirectedfrom=MSDN
$stWinPos = DllStructCreate($tagWINDOWPOS, $lParam)
$nLeft = DllStructGetData($aData[1], 1)
$nTop = DllStructGetData($aData[1], 2)
$nRight = DllStructGetData($aData[1], 3) - DllStructGetData($stWinPos, 5)
$nBottom = DllStructGetData($aData[1], 4) - DllStructGetData($stWinPos, 6)

If BitAND($nEdge, 1) and Abs($nLeft - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nLeft + $nEdgeBorderWidth[0])
If BitAND($nEdge, 2) and Abs($nTop - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nTop + $nEdgeBorderWidth[1])
If BitAND($nEdge, 4) and Abs($nRight - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nRight + $nEdgeBorderWidth[2])
If BitAND($nEdge, 8) and Abs($nBottom - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nBottom + $nEdgeBorderWidth[3])

Return $GUI_RUNDEFMSG
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-25T01:14:12Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL2 = 4574-argumentum
| AuthorName2 = argumentum ( multi-monitor mod. )
}}

<syntaxhighlight lang="autoit">
#include <AutoItConstants.au3>
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 30 ; 30 pixels for "dramatic effect", 10 pixels should be good for the "magnetic pull"
Global $nEdge = BitOR(1, 2, 4, 8); Left, Top, Right, Bottom
Global $nEdgeBorderWidth[4] = [0, 0, 0, 0] ; Left, Top, Right, Bottom

Global $hGUI = GUICreate("Snapped Window multi-monitor", 500, 200)
Global $aGUIStyle = GUIGetStyle($hGUI) ; be careful the style change after opening
Global $bNewStyle = False, $idBtnStyle = GUICtrlCreateButton("Set Style", 45, 50, 150, 20)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop

Case $GUI_EVENT_MAXIMIZE, $GUI_EVENT_RESTORE ; should not change to this style while maximized
GUICtrlSetState($idBtnStyle, (BitAND(WinGetState($hGUI), $WIN_STATE_MAXIMIZED) ? $GUI_DISABLE : $GUI_ENABLE))

Case $idBtnStyle
If $bNewStyle Then
GUISetStyle($aGUIStyle[0], $aGUIStyle[1], $hGUI)
GUICtrlSetData($idBtnStyle, 'Change Style')
Dim $nEdgeBorderWidth[4] = [0, 0, 0, 0]
$bNewStyle = False
Else
GUISetStyle(BitOR($GUI_SS_DEFAULT_GUI,$WS_MAXIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_TABSTOP), -1, $hGUI)
GUICtrlSetData($idBtnStyle, 'Undo Style')
Dim $nEdgeBorderWidth[4] = [-7, 0, 7, 7] ; adjusting for Windows 10 border scheme
$bNewStyle = True
EndIf
GUIStyleRefresh($hGUI)

EndSwitch
WEnd

Func GUIStyleRefresh($hWnd)
Local $aWinPos = WinGetPos($hWnd)
If @error Then Return SetError(@error, @extended, @error)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2] - 1, $aWinPos[3] - 1)
WinMove($hWnd, "", $aWinPos[0], $aWinPos[1], $aWinPos[2], $aWinPos[3])
EndFunc

Func MY_WM_WINDOWPOSCHANGING($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam
; original code at https://www.autoitscript.com/forum/topic/24342-form-snap/

; The Static declaration speeds up the func. ( not much, nanoseconds )
Local Static $stWinPos, $tPos, $hMonitor, $aData, $nLeft, $nTop, $nRight, $nBottom, $hTimer = 0
Local Static $tagWINDOWPOS = "hwnd hwnd;hwnd hwndInsertAfter;int x;int y;int cx;int cy;uint flags"

If TimerDiff($hTimer) > 1000 Then
$tPos = _WinAPI_GetMousePos() ; These func are very time consuming and
If Not @error Then $hMonitor = _WinAPI_MonitorFromPoint($tPos); the user is very unlikely to move the
If Not @error Then $aData = _WinAPI_GetMonitorInfo($hMonitor) ; mouse into position of another monitor
If @error Then Return $GUI_RUNDEFMSG ; in less than a second.
$hTimer = TimerInit()
EndIf

; https://docs.microsoft.com/en-us/windows/win32/api/winuser/ns-winuser-windowpos?redirectedfrom=MSDN
$stWinPos = DllStructCreate($tagWINDOWPOS, $lParam)
$nLeft = DllStructGetData($aData[1], 1)
$nTop = DllStructGetData($aData[1], 2)
$nRight = DllStructGetData($aData[1], 3) - DllStructGetData($stWinPos, 5)
$nBottom = DllStructGetData($aData[1], 4) - DllStructGetData($stWinPos, 6)

If BitAND($nEdge, 1) and Abs($nLeft - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nLeft + $nEdgeBorderWidth[0])
If BitAND($nEdge, 2) and Abs($nTop - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nTop + $nEdgeBorderWidth[1])
If BitAND($nEdge, 4) and Abs($nRight - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nRight + $nEdgeBorderWidth[2])
If BitAND($nEdge, 8) and Abs($nBottom - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nBottom + $nEdgeBorderWidth[3])

Return $GUI_RUNDEFMSG
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-23T05:32:35Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL2 = 4574-argumentum
| AuthorName2 = argumentum ( multi-monitor mod. )
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 40 ; 40 for this demo, 10 pixels should be good for the "magnetic pull"
Global $nEdge = BitOR(1, 2, 4, 8); Left, Top, Right, Bottom

GUICreate("Snapped Window multi-monitor", 500, 200)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam
#cs
HWND hwnd;
HWND hwndInsertAfter;
int x;
int y;
int cx;
int cy;
UINT flags;
#ce

; The Static declaration speeds up the func. ( not much, nanoseconds )
Local Static $stWinPos, $tPos, $hMonitor, $aData, $nLeft, $nTop, $nRight, $nBottom, $hTimer = 0

If TimerDiff($hTimer) > 500 Then
$tPos = _WinAPI_GetMousePos() ; These func are very time consuming and
If Not @error Then $hMonitor = _WinAPI_MonitorFromPoint($tPos); the user is very unlikely to move the
If Not @error Then $aData = _WinAPI_GetMonitorInfo($hMonitor) ; mouse into position of another monitor
If @error Then Return $GUI_RUNDEFMSG ; in less than a second.
$hTimer = TimerInit()
EndIf

$stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
$nLeft = DllStructGetData($aData[1], 1)
$nTop = DllStructGetData($aData[1], 2)
$nRight = DllStructGetData($aData[1], 3) - DllStructGetData($stWinPos, 5)
$nBottom = DllStructGetData($aData[1], 4) - DllStructGetData($stWinPos, 6)

If BitAND($nEdge, 1) and Abs($nLeft - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nLeft)
If BitAND($nEdge, 2) and Abs($nTop - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nTop)
If BitAND($nEdge, 4) and Abs($nRight - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nRight)
If BitAND($nEdge, 8) and Abs($nBottom - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nBottom)

Return $GUI_RUNDEFMSG
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-23T05:30:23Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL2 = 4574-argumentum
| AuthorName2 = argumentum ( multi-monitor mod. )
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 40 ; 40 for this demo, 10 pixels should be good for the "magnetic pull"
Global $nEdge = BitOR(1, 2, 4, 8); Left, Top, Right, Bottom

GUICreate("Snapped Window multi-monitor", 500, 200)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam
#cs
HWND hwnd;
HWND hwndInsertAfter;
int x;
int y;
int cx;
int cy;
UINT flags;
#ce

; The Static declaration speeds up the func. ( not much, nanoseconds )
Local Static $stWinPos, $tPos, $hMonitor, $aData, $nLeft, $nTop, $nRight, $nBottom, $hTimer = 0

If TimerDiff($hTimer) > 500 Then
$tPos = _WinAPI_GetMousePos() ; These func are very time consuming and
If Not @error Then $hMonitor = _WinAPI_MonitorFromPoint($tPos); the user is very unlikely to move the
If Not @error Then $aData = _WinAPI_GetMonitorInfo($hMonitor) ; mouse into position of another monitor
If @error Then Return $GUI_RUNDEFMSG ; in less than a second.
$hTimer = TimerInit()
EndIf

$stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
$nLeft = DllStructGetData($aData[1], 1)
$nTop = DllStructGetData($aData[1], 2)
$nRight = DllStructGetData($aData[1], 3) - DllStructGetData($stWinPos, 5)
$nBottom = DllStructGetData($aData[1], 4) - DllStructGetData($stWinPos, 6)

If BitAND($nEdge, 1) and Abs($nLeft - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nLeft)
If BitAND($nEdge, 2) and Abs($nTop - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nTop)
If BitAND($nEdge, 4) and Abs($nRight - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nRight)
If BitAND($nEdge, 8) and Abs($nBottom - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nBottom)

Return $GUI_RUNDEFMSG
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-23T05:24:30Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL2 = 4574-argumentum
| AuthorName2 = argumentum ( multi-monitor mod. )
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 40 ; 40 for this demo, 10 pixels should be good for the "magnetic pull"
Global $nEdge = BitOR(1, 2, 4, 8); Left, Top, Right, Bottom

GUICreate("Snapped Window multi-monitor", 500, 200)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
#cs
HWND hwnd;
HWND hwndInsertAfter;
int x;
int y;
int cx;
int cy;
UINT flags;
#ce

; The Static declaration speeds up the func. ( not much, nanoseconds )
Local Static $stWinPos, $tPos, $hMonitor, $aData, $nLeft, $nTop, $nRight, $nBottom, $hTimer = 0

If TimerDiff($hTimer) > 500 Then
$tPos = _WinAPI_GetMousePos() ; These func are very time consuming and
If Not @error Then $hMonitor = _WinAPI_MonitorFromPoint($tPos); the user is very unlikely to move the
If Not @error Then $aData = _WinAPI_GetMonitorInfo($hMonitor) ; mouse into position of another monitor
If @error Then Return $GUI_RUNDEFMSG ; in less than a second.
$hTimer = TimerInit()
EndIf

$stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
$nLeft = DllStructGetData($aData[1], 1)
$nTop = DllStructGetData($aData[1], 2)
$nRight = DllStructGetData($aData[1], 3) - DllStructGetData($stWinPos, 5)
$nBottom = DllStructGetData($aData[1], 4) - DllStructGetData($stWinPos, 6)

If BitAND($nEdge, 1) and Abs($nLeft - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nLeft)
If BitAND($nEdge, 2) and Abs($nTop - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nTop)
If BitAND($nEdge, 4) and Abs($nRight - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nRight)
If BitAND($nEdge, 8) and Abs($nBottom - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nBottom)

Return $GUI_RUNDEFMSG
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-22T05:03:46Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL2 = 4574-argumentum
| AuthorName2 = argumentum ( multi-monitor mod. )
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 40 ; 40 for this demo, 10 pixels should be good
Global $nEdge = BitOR(1, 2, 4, 8); Left, Top, Right, Bottom

GUICreate("Snapped Window multi-monitor", 500, 200)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
#cs
HWND hwnd;
HWND hwndInsertAfter;
int x;
int y;
int cx;
int cy;
UINT flags;
#ce
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $tPos = _WinAPI_GetMousePos()
Local $hMonitor = _WinAPI_MonitorFromPoint($tPos)
Local $aData = _WinAPI_GetMonitorInfo($hMonitor)
Local $nLeft = DllStructGetData($aData[1], 1)
Local $nTop = DllStructGetData($aData[1], 2)
Local $nRight = DllStructGetData($aData[1], 3) - DllStructGetData($stWinPos, 5)
Local $nBottom = DllStructGetData($aData[1], 4) - DllStructGetData($stWinPos, 6)

If BitAND($nEdge, 1) and Abs($nLeft - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nLeft)
If BitAND($nEdge, 2) and Abs($nTop - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nTop)
If BitAND($nEdge, 4) and Abs($nRight - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nRight)
If BitAND($nEdge, 8) and Abs($nBottom - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nBottom)
Return $GUI_RUNDEFMSG
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-22T05:03:13Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL2 = 4574-argumentum
| AuthorName2 = argumentum ( mod. )
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 40 ; 40 for this demo, 10 pixels should be good
Global $nEdge = BitOR(1, 2, 4, 8); Left, Top, Right, Bottom

GUICreate("Snapped Window multi-monitor", 500, 200)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
#cs
HWND hwnd;
HWND hwndInsertAfter;
int x;
int y;
int cx;
int cy;
UINT flags;
#ce
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $tPos = _WinAPI_GetMousePos()
Local $hMonitor = _WinAPI_MonitorFromPoint($tPos)
Local $aData = _WinAPI_GetMonitorInfo($hMonitor)
Local $nLeft = DllStructGetData($aData[1], 1)
Local $nTop = DllStructGetData($aData[1], 2)
Local $nRight = DllStructGetData($aData[1], 3) - DllStructGetData($stWinPos, 5)
Local $nBottom = DllStructGetData($aData[1], 4) - DllStructGetData($stWinPos, 6)

If BitAND($nEdge, 1) and Abs($nLeft - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nLeft)
If BitAND($nEdge, 2) and Abs($nTop - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nTop)
If BitAND($nEdge, 4) and Abs($nRight - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nRight)
If BitAND($nEdge, 8) and Abs($nBottom - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nBottom)
Return $GUI_RUNDEFMSG
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-22T05:01:33Z

Argumentum: /* Snapped Window */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
| AuthorURL = 4574-argumentum
| AuthorName = argumentum ( mod. )
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 40 ; 40 for this demo, 10 pixels should be good
Global $nEdge = BitOR(1, 2, 4, 8); Left, Top, Right, Bottom

GUICreate("Snapped Window multi-monitor", 500, 200)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
#cs
HWND hwnd;
HWND hwndInsertAfter;
int x;
int y;
int cx;
int cy;
UINT flags;
#ce
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $tPos = _WinAPI_GetMousePos()
Local $hMonitor = _WinAPI_MonitorFromPoint($tPos)
Local $aData = _WinAPI_GetMonitorInfo($hMonitor)
Local $nLeft = DllStructGetData($aData[1], 1)
Local $nTop = DllStructGetData($aData[1], 2)
Local $nRight = DllStructGetData($aData[1], 3) - DllStructGetData($stWinPos, 5)
Local $nBottom = DllStructGetData($aData[1], 4) - DllStructGetData($stWinPos, 6)

If BitAND($nEdge, 1) and Abs($nLeft - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nLeft)
If BitAND($nEdge, 2) and Abs($nTop - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nTop)
If BitAND($nEdge, 4) and Abs($nRight - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nRight)
If BitAND($nEdge, 8) and Abs($nBottom - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nBottom)
Return $GUI_RUNDEFMSG
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2020-06-22T04:58:19Z

Argumentum: /* Snapped Window multi-monitor*/

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat, argumentum
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIMisc.au3>
#include <WinAPIGdi.au3>

Global $nGap = 40 ; 40 for this demo, 10 pixels should be good
Global $nEdge = BitOR(1, 2, 4, 8); Left, Top, Right, Bottom

GUICreate("Snapped Window multi-monitor", 500, 200)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete()
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
#cs
HWND hwnd;
HWND hwndInsertAfter;
int x;
int y;
int cx;
int cy;
UINT flags;
#ce
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $tPos = _WinAPI_GetMousePos()
Local $hMonitor = _WinAPI_MonitorFromPoint($tPos)
Local $aData = _WinAPI_GetMonitorInfo($hMonitor)
Local $nLeft = DllStructGetData($aData[1], 1)
Local $nTop = DllStructGetData($aData[1], 2)
Local $nRight = DllStructGetData($aData[1], 3) - DllStructGetData($stWinPos, 5)
Local $nBottom = DllStructGetData($aData[1], 4) - DllStructGetData($stWinPos, 6)

If BitAND($nEdge, 1) and Abs($nLeft - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nLeft)
If BitAND($nEdge, 2) and Abs($nTop - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nTop)
If BitAND($nEdge, 4) and Abs($nRight - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nRight)
If BitAND($nEdge, 8) and Abs($nBottom - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nBottom)
Return $GUI_RUNDEFMSG
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

== Dual Monitor + WorkingArea ==

{{Snippet Header
| AuthorURL = 10673-mlipok
| AuthorName = mLipok
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <WinAPIGdi.au3>

_Example()

Func _Example()
; taken from HelpFile Example for _WinAPI_EnumDisplayMonitors()
Local $aMonitors_data = _WinAPI_EnumDisplayMonitors()
If @error Then Return SetError(@error, @extended, 0)

Local $hMonitor = $aMonitors_data[1][0] ; handle to first Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

Local Enum $MONITOR_X1 = 1, $MONITOR_Y1, $MONITOR_X2, $MONITOR_Y2

Local $aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)

; Create a GUI_1 with various controls.
Local $hGUI_1 = GUICreate("Example 1", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_1 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_1
GUISetState(@SW_SHOW, $hGUI_1)

; chceck if there was taken data for second monitor
If UBound($aMonitors_data) = 3 Then
$hMonitor = $aMonitors_data[2][0] ; handle to second Monitor
ConsoleWrite("! " & $hMonitor & @CRLF)

$aMonitorInfo = _WinAPI_GetMonitorInfo($hMonitor)
ConsoleWrite("! Primary=" & $aMonitorInfo[2] & ' MonitorName = ' & $aMonitorInfo[3] & @CRLF)
ConsoleWrite("- X1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X1) & @CRLF)
ConsoleWrite("- Y1 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) & @CRLF)
ConsoleWrite("- X2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_X2) & @CRLF)
ConsoleWrite("- Y2 = " & DllStructGetData($aMonitorInfo[1], $MONITOR_Y2) & @CRLF)
EndIf

; Create a GUI_2 with various controls.
Local $hGUI_2 = GUICreate("Example 2", _
DllStructGetData($aMonitorInfo[1], $MONITOR_X2)-DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y2)-DllStructGetData($aMonitorInfo[1], $MONITOR_Y1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_X1), _
DllStructGetData($aMonitorInfo[1], $MONITOR_Y1) _
)
Local $idOK_2 = GUICtrlCreateButton("OK", 310, 370, 85, 25)
; Display the GUI_2
GUISetState(@SW_SHOW, $hGUI_2)

; Initialize a Local variable for GUIGetMsg($GUI_EVENT_ARRAY)
Local $aMsg = 0

; Loop until the user Close both GUI_1 and GUI_2
While IsHWnd($hGUI_1) Or IsHWnd($hGUI_2) ; check if any GUI exist
; Assign to $aMsg the advanced GUI messages.
$aMsg = GUIGetMsg($GUI_EVENT_ARRAY)
Switch $aMsg[1] ; Switch from GUIs
Case $hGUI_1 ; The event comes from the GUI1
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_1)
Case $idOK_1
MsgBox($MB_SYSTEMMODAL, "", "Ok_1 clicked.")
EndSwitch
Case $hGUI_2 ; The event comes from the GUI2
Switch $aMsg[0] ; Switch from event ID
Case $GUI_EVENT_CLOSE
GUIDelete($hGUI_2)
Case $idOK_2
MsgBox($MB_SYSTEMMODAL, "", "Ok_2 clicked.")
EndSwitch
EndSwitch
WEnd

EndFunc ;==>_Example
</syntaxhighlight>

[[#top | ReturnToContents]]

Snippets ( GUI )

2017-10-21T14:37:43Z

Argumentum: /* GUI With Scrollable TabItem */

__TOC__

[[category:Snippets]]

{{Snippet Credit Header}}

== _AlwaysOnTop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $hGUI = GUICreate("_AlwaysOnTop()", 200, 200, -1, -1)

Local Const $iControlID = GUICtrlCreateCheckbox("Always On Top", 5, 10, 85, 25, BitOR($BS_CHECKBOX, $BS_AUTOCHECKBOX, $BS_PUSHLIKE, $WS_TABSTOP))

GUISetState(@SW_SHOWNORMAL, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $iControlID
_AlwaysOnTop($hGUI, $iControlID)
EndSwitch
WEnd
EndFunc ;==>Example

Func _AlwaysOnTop(Const $hHandle, Const $iControlID)
Local $iState = 0

If GUICtrlRead($iControlID) = $GUI_CHECKED Then
$iState = 1
EndIf

WinSetOnTop($hHandle, "", $iState)

Return $iState
EndFunc ;==>_AlwaysOnTop
</syntaxhighlight>

[[#top | ReturnToContents]]

== Animate Display ==

{{Snippet Header
| AuthorURL = 5725-raindancer
| AuthorName = Raindancer
}}

<syntaxhighlight lang="autoit">
; Animate Display
; Author Raindancer

Global Const $hwnd = GUICreate("Animate Window", 300, 300)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000) ; fade-in

GUISetState(@SW_SHOWNORMAL)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00090000) ; fade-out
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040001) ; slide in from left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050002) ; slide out to left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040002) ; slide in from right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050001) ; slide out to right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040004) ; slide-in from top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050008) ; slide-out to top
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040008) ; slide-in from bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050004) ; slide-out to bottom
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040005) ; diag slide-in from Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0005000a) ; diag slide-out to Top-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040006) ; diag slide-in from Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050009) ; diag slide-out to Top-Right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040009) ; diag slide-in from Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050006) ; diag slide-out to Bottom-left
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x0004000a) ; diag slide-in from Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050005) ; diag slide-out to Bottom-right
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00040010) ; explode
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010) ; implode

#define AW_HOR_POSITIVE 0x00000001
#define AW_HOR_NEGATIVE 0x00000002
#define AW_VER_POSITIVE 0x00000004
#define AW_VER_NEGATIVE 0x00000008
#define AW_CENTER 0x00000010
#define AW_HIDE 0x00010000
#define AW_ACTIVATE 0x00020000
#define AW_SLIDE 0x00040000
#define AW_BLEND 0x00080000
</syntaxhighlight>

[[#top | ReturnToContents]]

== Center Window on Screen ==

{{Snippet Header
| AuthorURL = 4920-valuater
| AuthorName = Valuater
| AuthorURL2 = 9669-cdkid
| AuthorName2 = cdkid
}}

<syntaxhighlight lang="autoit">
; Center Window on Screen

#include <GUIConstantsEx.au3>

Global Const $GUI = GUICreate("Test Window",300 ,300 ,100 ,100)

GUISetState(@SW_SHOWNORMAL)

Sleep(2000)

_Middle($GUI, "Test Window")

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func _Middle(Const $win, Const $txt)
Local Const $size = WinGetClientSize($win, $txt)

Local Const $y = (@DesktopHeight / 2) - ($size[1] / 2)

Local Const $x = (@DesktopWidth / 2) - ($size[0] / 2)

Return WinMove($win, $txt, $x, $y)
EndFunc ;==>_Middle
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ChildActivate ==

{{Snippet Header
| AuthorURL = 71214-mkish
| AuthorName = MKISH
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

_ChildActivate("Main Window Title", "Child Window Title")

; Set focus to Child-Window of a GUI
Func _ChildActivate(Const $appTitle, Const $formName)
Local Const $hWnd = WinGetHandle($appTitle, $formName)

Local $array = WinList($appTitle)

#forceref $array

WinActive($hWnd)

Local Const $winarray = _WinAPI_EnumWindows(True, $hWnd)

Local $title

For $i = 1 to $winarray[0][0]
$title = _WinAPI_GetWindowText($winarray[$i][0])

If ($title == $formName) or ($title == $formName & " *") Then
_WinAPI_ShowWindow($winarray[$i][0], @SW_MAXIMIZE)
_WinAPI_ShowWindow($winarray[$i][0], @SW_SHOWNORMAL)
EndIf
Next
EndFunc ;>>> _ChildActivate
</syntaxhighlight>

[[#top | ReturnToContents]]

== _ControlMove ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>

Global Const $SC_MOVE = 0xF010

Global Const $hGUI = GUICreate("Test", 300, 200)

Globa Const $cLabel = GUICtrlCreateLabel("Move me", 100, 50, 60, 20)

GUICtrlSetBkColor($cLabel, 0x00FF00)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $GUI_EVENT_PRIMARYDOWN
_ControlMove($cLabel)
EndSwitch
WEnd

Func _ControlMove(Const $cID)
Local Const $aCurPos = GUIGetCursorInfo()

If @error Then Return False

If $aCurPos[4] = $cID Then
GUICtrlSendMsg($cID, $WM_SYSCOMMAND, BitOR($SC_MOVE, $HTCAPTION), 0)
EndIf
EndFunc ;==>_ControlMove
</syntaxhighlight>

[[#top | ReturnToContents]]

== Custom Tabs ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
| AuthorURL2 = 14325-kickassjoe
| AuthorName2 = Kickassjoe
}}

<syntaxhighlight lang="autoit">
; Custom Tabs - controlled by a label, pic, etc

#include <GUIConstants.au3>

GUICreate("Test")

Global $TabSwitcher[2]

Global Const $TabSwitcher1 = GUICtrlCreateLabel("Tab One", 10, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xf0f0f0)
GUICtrlSetColor(-1, 0x000000)

Global Const $TabSwitcher2 = GUICtrlCreateLabel("Tab Two", 72, 10,60,20, $SS_SUNKEN +$SS_CENTER+ $SS_CENTERIMAGE)
GUICtrlSetBkColor(-1, 0xc0c0c0)
GUICtrlSetColor(-1, 0x000000)

Global Const $tab = GUICtrlCreateTab(10,40, 200, 200) ; can be placed anywhere, doesnt matter, not visible
GUICtrlSetState($tab, $GUI_HIDE)

Global Const $tab1 = GUICtrlCreateTabItem("tab1")

GUICtrlCreateButton("button on tab 1", 10, 70)

Global Const $tab2 = GUICtrlCreateTabItem("tab2")

GUICtrlCreateButton("button on tab 2", 10, 70)

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $TabSwitcher1
If GUICtrlRead($tab, 1) = $tab1 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab1, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $TabSwitcher2
If GUICtrlRead($tab, 1) = $tab2 Then ContinueLoop ; To prevent the flickering and second state set.
GUICtrlSetState($tab2, $GUI_SHOW)
GUICtrlSetBkColor($TabSwitcher1, 0xc0c0c0)
GUICtrlSetColor($TabSwitcher1, 0x000000)
GUICtrlSetBkColor($TabSwitcher2, 0xf0f0f0)
GUICtrlSetColor($TabSwitcher2, 0x000000)

Case $GUI_EVENT_CLOSE
Exit
Case Else
EndSwitch
WEnd
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable All Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>

_Main()

Func _Main()
Local $hGUI = GUICreate("ListView Set Column Width", 400, 300)
Local $hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3|Column 4", 2, 2, 394, 268)
GUISetState()

; Prevent resizing of columns
ControlDisable($hGUI, "", HWnd(_GUICtrlListView_GetHeader($hListView)))

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main
</syntaxhighlight>

[[#top | ReturnToContents]]

== Disable Specific Column Headers ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <HeaderConstants.au3>

; The 0-based column to be disabled
Global $iFix_Col

_Main()

Func _Main()
Local Const $hGUI = GUICreate("ListView Fix Column Width", 400, 300)

Local Const $hListView = GUICtrlCreateListView("Column 0|Column 1|Column 2|Column 3", 2, 2, 394, 268)

GUISetState(@SW_SHOWNORMAL)

; Prevent resizing of column 1
$iFix_Col = 1

GUIRegisterMsg($WM_NOTIFY, "_WM_NOTIFY")

; Loop until user exits
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>_Main

Func _WM_NOTIFY($hWnd, $iMsg, $wParam, $lParam)
#forceref $hWnd, $iMsg, $wParam

; Get details of message
Local Const $tNMHEADER = DllStructCreate($tagNMHEADER, $lParam)

; Look for header resize code
Local Const $iCode = DllStructGetData($tNMHEADER, "Code")

Switch $iCode
Case $HDN_BEGINTRACKW
; Now get column being resized
Local $iCol = DllStructGetData($tNMHEADER, "Item")

If $iCol = $iFix_Col Then
; Prevent resizing
Return True
Else
; Allow resizing
Return False
EndIf
EndSwitch
EndFunc ;==>_WM_NOTIFY
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Flash ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
; Change the background color of the GUI to a specified color

#include <WinAPI.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local Const $bGreen = 0x00FF00

Local Const $hGUI = GUICreate('')

GUISetState(@SW_SHOWNORMAL, $hGUI)

If MsgBox(4 + 4096, '', 'The following example contains flashing images. If you are sensitive to such things then please select "No".' & @CRLF & @CRLF & _
'Do you want to continue?') = 7 Then
Return 0
EndIf

; Change the background color of the GUI to a specified color and then back to the default grey.
For $i = 1 To 2
_Flash($hGUI, $bGreen)
Sleep(100)
Next

; Wait for 1 second to show the background color is changed to the default grey.
Sleep(1000)

GUIDelete($hGUI)
EndFunc ;==>Example

Func _Flash(Const $hWnd, Const $bColor)
For $A = 1 To 2
If Mod($A, 2) Then ; Odd.
GUISetBkColor($bColor, $hWnd)
Else ; Even.
GUISetBkColor(_WinAPI_GetSysColor($COLOR_MENU), $hWnd)
EndIf

Sleep(100)
Next
EndFunc ;==>_Flash
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Background Changer ==

{{Snippet Header
| AuthorURL = 69506-reaperx
| AuthorName = ReaperX
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>
#include <Misc.au3>

Global Const $gui_choose_color = GUICreate("Choose Color")

Global Const $button = GUICtrlCreateButton("Choose Color", 150, 150)

GUISetState(@SW_SHOWNORMAL, $gui_choose_color)

Global Const $iReturnType = 2

Global $color

While 1
Switch GUIGetMsg()
Case $button
$color = _ChooseColor($iReturnType)
GUISetBkColor($color)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Example 2
#include <GUIConstants.au3

MainGUI()

Func MainGUI()
GUICreate("ReaperX's Test GUI")

Local Const $file = GUICtrlCreateMenu("File")

Local Const $file_notepad = GUICtrlCreateMenuItem("Open Notepad", $file)

Local Const $file_computer = GUICtrlCreateMenuItem("Open My Computer", $file)

Local Const $file_exit = GUICtrlCreateMenuItem("Exit", $file)

Local Const $actions = GUICtrlCreateMenu("Actions")

Local Const $actions_txt_file = GUICtrlCreateMenuItem("Open Text File", $actions)

Local Const $actions_calc = GUICtrlCreateMenuItem("Open Calculator", $actions)

Local Const $help = GUICtrlCreateMenu("Help")

Local Const $help_about = GUICtrlCreateMenuItem("About", $help)

Local Const $tab_set = GUICtrlCreateTab(110, 100, 135, 150)

Local Const $tab_1 = GUICtrlCreateTabItem("Change BG")

Local Const $bg_red_radio = GUICtrlCreateRadio("Red", 115, 125)

Local Const $bg_green_radio = GUICtrlCreateRadio("Green", 115, 145)

Local Const $bg_yellow_radio = GUICtrlCreateRadio("Yellow", 115, 165)

Local Const $tab_2 = GUICtrlCreateTabItem("AutoIt Info")

GUISetState(@SW_SHOWNORMAL)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $file_notepad
Run("notepad.exe")
Case $file_computer
Run("explorer.exe")
Case $file_exit
Exit
Case $actions_txt_file
Local Const $txt_file_1 = FileOpenDialog("Choose a Text File to Open...", @DesktopDir, "Text Files(*.txt)")
FileOpen($txt_file_1)
Case $actions_calc
Run("calc.exe")
Case $help_about
MsgBox(0, "About", "This Test GUI Was Created by ReaperX")
Case $bg_red_radio
GUISetBkColor(0xED1C24)
Case $bg_green_radio
GUISetBkColor(0x22B14C)
Case $bg_yellow_radio
GUISetBkColor(0xFFF200)
EndSwitch
WEnd
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUICtrlGetID ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
Example()

Func Example()
Local Const $hGUI = GUICreate('')

Local Const $iLabel = GUICtrlCreateLabel('', 0, 0, 500, 500)

Local Const $iComboBox = GUICtrlCreateCombo('', 0, 0, 500, 500)

GUISetState(@SW_SHOWNORMAL, $hGUI)

MsgBox(4096, '', _
'AutoIt Label ID: ' & $iLabel & @CRLF & _
'AutoIt Label ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iLabel)) & @CRLF & _
'AutoIt ComboBox ID: ' & $iComboBox & @CRLF & _
'AutoIt ComboBox ID From Handle: ' & GUICtrlGetID(GUICtrlGetHandle($iComboBox)) & @CRLF)

Return GUIDelete($hGUI)
EndFunc ;==>Example

; Retrieve the control id of an AutoIt native control using the handle returned by GUICtrlGetHandle.
Func GUICtrlGetID(Const $hWnd)
Local Const $aResult = DllCall('user32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWnd) ; _WinAPI_GetDlgItem in WinAPI.au3.

If @error Then
Return SetError(@error, @extended, 0)
EndIf

Return $aResult[0]
EndFunc ;==>GUICtrlGetID
</syntaxhighlight>

[[#top | ReturnToContents]]

== _GUICtrlIpAddress_DisableField ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GUIIPAddress.au3>

Example()

Func Example()
Local $hGUI, $hIPAddress
$hGUI = GUICreate('IP Address Control Create Example', 400, 300)
$hIPAddress = _GUICtrlIpAddress_Create($hGUI, 10, 10)
GUISetState(@SW_SHOW, $hGUI)

_GUICtrlIpAddress_Set($hIPAddress, '127.0.0.1')
_GUICtrlIpAddress_DisableField($hIPAddress, 0)
_GUICtrlIpAddress_DisableField($hIPAddress, 3)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
_GUICtrlIpAddress_Destroy($hIPAddress)
EndFunc ;==>Example

; Disable an octet field. First octet field starts from index 0.
Func _GUICtrlIpAddress_DisableField($hIPAddress, $iField) ; Idea by Rover.
Local $aField[5] = [4, 3, 2, 1]
Return ControlDisable($hIPAddress, '', '[CLASSNN:Edit' & $aField[$iField] & ']')
EndFunc ;==>_GUICtrlIpAddress_DisableField
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI With Scrollable TabItem ==

{{Snippet Header
| AuthorURL = 46198-autobert
| AuthorName = AutoBert
}}

<syntaxhighlight lang="autoit">
; GUI With Scrollable TabItem

#include <GUIConstantsEx.au3>
#include <ScrollBarConstants.au3>
#include <GuiScrollBars.au3>
#include <WindowsConstants.au3>
#Include <GuiTab.au3>
$hGui = GUICreate("Gui with scrollable TabItem ", 633, 350, 190, 220)
GUISetBkColor(0xFFFFFF)
$idTab = GUICtrlCreateTab(10, 10, 613, 300)
$idTab0 = GUICtrlCreateTabItem("tab0")
$hChild = GUICreate("Scrollbereich", 588, 255, 26, 45, $WS_POPUP, $WS_EX_MDICHILD, $hGui)
$x = 6 ; +22
$y = 8
Local $aInputs[15]
For $i = 0 To 14
$aInputs[$i]=GUICtrlCreateInput('', $x, $y, 21, 20)
$x += 22
$y += 21
Next
_GUIScrollBars_Init($hChild,-1)
_GUIScrollBars_ShowScrollBar($hChild, $SB_HORZ, False) ; horizontale Scrollbar verstecken
_GUIScrollBars_SetScrollRange($hChild, $SB_VERT, 3, 30)
GUISetState(@SW_HIDE,$hChild)
GUISwitch($hGui)
$idTab1 = GUICtrlCreateTabItem("tab----1")
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
$idTab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon"); default Jon
$idTab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$idTab2 = GUICtrlCreateTabItem("tab2")
GUICtrlSetState(-1, $Gui_SHOW); will be display first
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
$idTab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); end tabitem definition
$idBtnBack = GUICtrlCreateButton("&Zurueck",72,320,100,25)
$idBtnCancel = GUICtrlCreateButton("&Beenden", 264, 320, 100, 25)
$idBtnContinue = GUICtrlCreateButton("&Weiter", 448, 320, 100, 25)
GUISetState()
GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $idTab
$iTab = _GUICtrlTab_GetCurSel($idTab)
Switch $iTab
case 0
GUISetState(@SW_SHOW, $hChild)
case 1
GUISetState(@SW_HIDE, $hChild)
EndSwitch
EndSwitch
WEnd
Func WM_VSCROLL($hWnd, $Msg, $wParam, $lParam)
#forceref $Msg, $wParam, $lParam
Local $nScrollCode = BitAND($wParam, 0x0000FFFF)
Local $index = -1, $yChar, $yPos
Local $Min, $Max, $Page, $Pos, $TrackPos
For $x = 0 To UBound($__g_aSB_WindowInfo) - 1 ; from GuiScrollBars.au3
If $__g_aSB_WindowInfo[$x][0] = $hWnd Then
$index = $x
$yChar = $__g_aSB_WindowInfo[$index][3]
ExitLoop
EndIf
Next
If $index = -1 Then Return 0

; Get all the vertial scroll bar information
Local $tSCROLLINFO = _GUIScrollBars_GetScrollInfoEx($hWnd, $SB_VERT)
$Min = DllStructGetData($tSCROLLINFO, "nMin")
$Max = DllStructGetData($tSCROLLINFO, "nMax")
$Page = DllStructGetData($tSCROLLINFO, "nPage")
; Save the position for comparison later on
$yPos = DllStructGetData($tSCROLLINFO, "nPos")
$Pos = $yPos
$TrackPos = DllStructGetData($tSCROLLINFO, "nTrackPos")
Switch $nScrollCode
Case $SB_TOP ; user clicked the HOME keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Min)
Case $SB_BOTTOM ; user clicked the END keyboard key
DllStructSetData($tSCROLLINFO, "nPos", $Max)
Case $SB_LINEUP ; user clicked the top arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos - 1)
Case $SB_LINEDOWN ; user clicked the bottom arrow
DllStructSetData($tSCROLLINFO, "nPos", $Pos + 1)
Case $SB_PAGEUP ; user clicked the scroll bar shaft above the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos - $Page)
Case $SB_PAGEDOWN ; user clicked the scroll bar shaft below the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $Pos + $Page)
Case $SB_THUMBTRACK ; user dragged the scroll box
DllStructSetData($tSCROLLINFO, "nPos", $TrackPos)
EndSwitch
;~ // Set the position and then retrieve it. Due to adjustments
;~ // by Windows it may not be the same as the value set.
DllStructSetData($tSCROLLINFO, "fMask", $SIF_POS)
_GUIScrollBars_SetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
_GUIScrollBars_GetScrollInfo($hWnd, $SB_VERT, $tSCROLLINFO)
;// If the position has changed, scroll the window and update it
$Pos = DllStructGetData($tSCROLLINFO, "nPos")
If ($Pos <> $yPos) Then
_GUIScrollBars_ScrollWindow($hWnd, 0, $yChar * ($yPos - $Pos))
$yPos = $Pos
EndIf
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_VSCROLL
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsAutoItGUI ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')

GUISetState(@SW_SHOW, $hGUI)

; Check if the handle is an AutoIt GUI.
MsgBox(4096, '', 'Is the handle of the GUI an AutoIt window: ' & _IsAutoItGUI($hGUI))

GUIDelete($hGUI)
EndFunc ;==>Example

; Check if a handle is an AutoIt GUI.
Func _IsAutoItGUI($hWnd)
Return _WinAPI_GetClassName($hWnd) = 'AutoIt v3 GUI'
EndFunc ;==>_IsAutoItGUI
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsEnabled ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICreate('')
Local $iButton = GUICtrlCreateButton('Button Example', 10, 10, 120, 25)
GUICtrlSetState($iButton, $aState[Random(0, 1, 1)]) ; Randomise whether or not the Button is enabled.
GUISetState(@SW_SHOW)

; Check the state of the Button.
MsgBox(4096, '', 'Is the Button enabled: ' & _IsEnabled($iButton))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
EndFunc ;==>Example

Func _IsEnabled($iControlID)
Return BitAND(GUICtrlGetState($iControlID), $GUI_ENABLE) = $GUI_ENABLE
EndFunc ;==>_IsEnabled
</syntaxhighlight>

[[#top | ReturnToContents]]

== _IsTransparent ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', Random(0, 255, 1))

MsgBox(4096, '', 'Check if the GUI is transparent: ' & _IsTransparent($hGUI))
GUIDelete($hGUI)
EndFunc ;==>Example

; Check if the GUI is transparent.
Func _IsTransparent($sTitle, $sText = '')
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency = 0
EndFunc ;==>_IsTransparent
</syntaxhighlight>

[[#top | ReturnToContents]]

== Limit GUI Resize ==

{{Snippet Header
| AuthorURL = 38576-melba23
| AuthorName = Melba23
}}

<syntaxhighlight lang="autoit">
; How to limit the minimum/maximum size of a resizable GUI
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")
Global $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetState()
Global $aPos = WinGetPos($hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_MAXIMIZE
WinMove($hGUI, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3]) ; resets intial size
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Func WM_GETMINMAXINFO($hwnd, $Msg, $wParam, $lParam)
#forceref $hwnd, $Msg, $wParam, $lParam
Local $GUIMINWID = 300, $GUIMINHT = 100 ; set your restrictions here
Local $GUIMAXWID = 800, $GUIMAXHT = 500
Local $tagMaxinfo = DllStructCreate("int;int;int;int;int;int;int;int;int;int", $lParam)
DllStructSetData($tagMaxinfo, 7, $GUIMINWID) ; min X
DllStructSetData($tagMaxinfo, 8, $GUIMINHT) ; min Y
DllStructSetData($tagMaxinfo, 9, $GUIMAXWID); max X
DllStructSetData($tagMaxinfo, 10, $GUIMAXHT) ; max Y
Return 0
EndFunc ;==>WM_GETMINMAXINFO
</syntaxhighlight>

[[#top | ReturnToContents]]

== Mixed Colored List View ==

{{Snippet Header
| AuthorURL = 23675-siao
| AuthorName = Siao
}}

<syntaxhighlight lang="autoit">
#Include <GuiConstantsEx.au3>
#Include <GuiListView.au3>
#include <WindowsConstants.au3>

;fonts for custom draw example
;bold
Global $aFont1 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 700, _
"dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")
;italic
Global $aFont2 = DLLCall("gdi32.dll","int","CreateFont", "int", 14, "int", 0, "int", 0, "int", 0, "int", 400, _
"dword", 1, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, "dword", 0, _
"dword", 0, "str", "")

$GUI = GUICreate("Listview Custom Draw", 400, 300)
$cListView = GUICtrlCreateListView("", 2, 2, 394, 268)
$hListView = GUICtrlGetHandle($cListView)
;or
;~ $hListView = _GUICtrlListView_Create($GUI, "", 2, 2, 394, 268)

_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
_GUICtrlListView_InsertColumn($hListView, 0, "Column 1", 100)
_GUICtrlListView_InsertColumn($hListView, 1, "Column 2", 100)
_GUICtrlListView_InsertColumn($hListView, 2, "Column 3", 100)

; Add items
For $i = 1 To 30
_GUICtrlListView_AddItem($hListView, "Row" & $i & ": Col 1", $i-1)
For $j = 1 To 2
_GUICtrlListView_AddSubItem ($hListView, $i-1, "Row" & $i & ": Col " & $j+1, $j)
Next
Next
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont1[0])
DLLCall("gdi32.dll","int","DeleteObject", "hwnd", $aFont2[0])
Exit

Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR

$tNMHDR = DllStructCreate($tagNMHDR, $lParam)
$hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
$iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
$iCode = DllStructGetData($tNMHDR, "Code")
Switch $hWndFrom
Case $hListView
Switch $iCode
Case $NM_CUSTOMDRAW
If Not _GUICtrlListView_GetViewDetails($hWndFrom) Then Return $GUI_RUNDEFMSG
Local $tCustDraw = DllStructCreate('hwnd hwndFrom;int idFrom;int code;' & _
'dword DrawStage;hwnd hdc;long rect[4];dword ItemSpec;int ItemState;dword Itemlparam;' & _
'dword clrText;dword clrTextBk;int SubItem;' & _
'dword ItemType;dword clrFace;int IconEffect;int IconPhase;int PartID;int StateID;long rectText[4];int Align', _ ;winxp or later
$lParam), $iDrawStage, $iItem, $iSubitem, $hDC, $iColor1, $iColor2, $iColor3
$iDrawStage = DllStructGetData($tCustDraw, 'DrawStage')
If $iDrawStage = $CDDS_PREPAINT Then Return $CDRF_NOTIFYITEMDRAW ;request custom drawing of items
If $iDrawStage = $CDDS_ITEMPREPAINT Then Return $CDRF_NOTIFYSUBITEMDRAW ;request drawing each cell separately
If Not BitAND($iDrawStage, $CDDS_SUBITEM) Then Return $CDRF_DODEFAULT
$iItem = DllStructGetData($tCustDraw, 'ItemSpec')
$iSubitem = DllStructGetData($tCustDraw, 'SubItem')
Switch $iItem
Case 0 To 9 ;for rows 1-10 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
$iColor3 = RGB2BGR(0xFF0000)
If Mod($iSubitem, 2) Then ;odd columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
DllStructSetData($tCustDraw, 'clrText', 0)
Else ;even columns
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
DllStructSetData($tCustDraw, 'clrText', $iColor3)
EndIf
Case 10 To 19 ;for rows 11-20 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(0x3DF8FF)
$hDC = DllStructGetData($tCustDraw, 'hdc')
If Mod($iItem, 2) Then
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont1[0]) ;select our chosen font into DC
Else
If Mod($iSubitem, 2) Then
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
DLLCall("gdi32.dll","hwnd","SelectObject", "hwnd", $hDC, "hwnd", $aFont2[0])
EndIf
Case 20 To 29 ;for rows 21-30 lets do this
$iColor1 = RGB2BGR(0xFBFFD8)
$iColor2 = RGB2BGR(-1)
If Mod($iItem, 2) Then ;odd rows
DllStructSetData($tCustDraw, 'clrTextBk', $iColor2)
Else
DllStructSetData($tCustDraw, 'clrTextBk', $iColor1)
EndIf
EndSwitch
Return $CDRF_NEWFONT
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

Func RGB2BGR($iColor)
Return BitAND(BitShift(String(Binary($iColor)), 8), 0xFFFFFF)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Move Message Box ==

{{Snippet Header
| AuthorURL = 423-herewasplato
| AuthorName = herewasplato
}}

<syntaxhighlight lang="autoit">
; Move Message Box

_MoveMsgBox(0, "testTitle", "testText", 0, 10)

Func _MoveMsgBox($MBFlag, $MBTitle, $MBText, $x, $y)
Local $file = FileOpen(EnvGet("temp") & "\MoveMB.au3", 2)
If $file = -1 Then Return;if error, give up on the move

Local $line1 = 'AutoItSetOption(' & '"WinWaitDelay", 0' & ')'
Local $line2 = 'WinWait("' & $MBTitle & '", "' & $MBText & '")'
Local $line3 = 'WinMove("' & $MBTitle & '", "' & $MBText & '"' & ', ' & $x & ', ' & $y & ')'
FileWrite($file, $line1 & @CRLF & $line2 & @CRLF & $line3)
FileClose($file)

Run(@AutoItExe & " /AutoIt3ExecuteScript " & EnvGet("temp") & "\MoveMB.au3")

Local $result = MsgBox($MBFlag, $MBTitle, $MBText)
;~ MsgBox($MBFlag, $MBTitle, $MBText)

FileDelete(EnvGet("temp") & "\MoveMB.au3")
Return ($result)
EndFunc;==>_MoveMsgBox
</syntaxhighlight>

[[#top | ReturnToContents]]

== Search In A Listview ==

{{Snippet Header
| AuthorURL = 7108-xenobiologist
| AuthorName = Xenobiologist
}}

<syntaxhighlight lang="autoit">
; Search in a Listview and show the row with the match as the top row in the listiview.
#include <GuiListView.au3>

_main()

Func _main()
Local $hGUI = GUICreate("Test", 500, 500)
Local $hListView = GUICtrlCreateListView("Items", 10, 10, 480, 380)
_GUICtrlListView_SetColumnWidth($hListView, 0, 450)
For $i = 0 To 250
Switch $i
Case 50, 100, 150, 200
GUICtrlCreateListViewItem("Item 999", $hListView)
Case Else
GUICtrlCreateListViewItem("Item " & StringFormat("%03i", $i), $hListView)
EndSwitch
Next
Local $hButton = GUICtrlCreateButton("Search", 10, 460, 100, 30, 0x0001) ; DEFAULT_BUTTON
Local $hInput = GUICtrlCreateInput("999", 200, 460, 100, 30)
GUICtrlSetState($hInput, 256) ; FOCUS
GUICtrlCreateLabel("Search for 999 - the listview will show the match as top row", 10, 410, 470, 30)
GUISetState()
While 1
Switch GUIGetMsg()
Case -3 ; EVENT_CLOSE
Exit
Case $hButton
_search($hListView, GUICtrlRead($hInput))
EndSwitch
WEnd
EndFunc ;==>_main
Func _search($hLV, $startPos = 0)
_GUICtrlListView_ClickItem($hLV, _GUICtrlListView_GetTopIndex($hLV)) ;
Local $selIndex_A = _GUICtrlListView_GetSelectedIndices($hLV, True)
Local $iIndex = _GUICtrlListView_FindInText($hLV, $startPos, $selIndex_A[1])
; Scroll to bottom
_GUICtrlListView_EnsureVisible($hLV, _GUICtrlListView_GetItemCount($hLV) - 1)
; Now click item and we get it at the top - or as close as it will go
_GUICtrlListView_SetItemFocused($hLV, $iIndex)
_GUICtrlListView_ClickItem($hLV, $iIndex)
EndFunc ;==>_search
</syntaxhighlight>

[[#top | ReturnToContents]]

== _SetWinTitle ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
}}

<syntaxhighlight lang="autoit">
Local $Frm_Main = GUICreate("")
_SetWinTitle($Frm_Main)
GUISetState()
While 1
Local $Msg = GUIGetMsg()
If @MIN = '00' Then _SetWinTitle($Frm_Main)
If $Msg = -3 Then Exit
WEnd

Func _SetWinTitle($hwnd)
Local $Greet, $Ttl
If @HOUR >= 5 And @HOUR <= 11 Then $Greet = 'Morning '
If @HOUR >= 12 And @HOUR < 17 Then $Greet = 'Afternoon '
If @HOUR >= 17 Then $Greet = 'Evening '
If @HOUR < 5 Then
$Ttl = "You're up a bit too late " & @UserName
Else
$Ttl = 'Good ' & $Greet & @UserName
EndIf
WinSetTitle($hwnd, '', $Ttl)
EndFunc ;==>_SetWinTitle
</syntaxhighlight>

[[#top | ReturnToContents]]

== Small Cue Banner ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
| Desc = Idea by: [http://www.autoitscript.com/forum/user/70983-autolaser/ Autolaser]
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <MsgBoxConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('Example', 300, 150)
GUISetFont(9, 400, 0, 'Segoe UI')

Local $iUsername = GUICtrlCreateInput('', 10, 10, 125, 25)
_GUICtrlEdit_SetCueBanner($iUsername, "Search folder")

Local $iPassword = GUICtrlCreateInput('', 10, 40, 125, 25)
_GUICtrlEdit_SetCueBanner($iPassword, "Search...")

Local $iClose = GUICtrlCreateButton("Close", 210, 120, 85, 25)
ControlFocus($hGUI, "", $iClose)

GUISetState(@SW_SHOW, $hGUI)

MsgBox($MB_SYSTEMMODAL, "", _GUICtrlEdit_GetCueBanner($iPassword))

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

GUIDelete($hGUI)
EndFunc ;==>Example

Func _GUICtrlEdit_GetCueBanner($hWnd)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = DllStructCreate("wchar[4096]")
If _SendMessage($hWnd, $EM_GETCUEBANNER, $tText, 4096, 0, "struct*") <> 1 Then Return SetError(-1, 0, "")
Return _WinAPI_WideCharToMultiByte($tText)
EndFunc ;==>_GUICtrlEdit_GetCueBanner

Func _GUICtrlEdit_SetCueBanner($hWnd, $sText)
If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)

Local $tText = _WinAPI_MultiByteToWideChar($sText)

Return _SendMessage($hWnd, $EM_SETCUEBANNER, False, $tText, 0, "wparam", "struct*") = 1
EndFunc ;==>_GUICtrlEdit_SetCueBanner
</syntaxhighlight>

[[#top | ReturnToContents]]

== Snapped Window ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global Const $SPI_GETWORKAREA = 0x30
Global $nGap = 20, $nEdge = BitOR(1, 2, 4, 8); Left, Top, Right, Bottom

$hGUI = GUICreate("Snapped Window", 300, 200)
GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
#cs
HWND hwnd;
HWND hwndInsertAfter;
int x;
int y;
int cx;
int cy;
UINT flags;
#ce
Local $stRect = DllStructCreate("int;int;int;int")
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
DllCall("User32.dll", "int", "SystemParametersInfo", "int", $SPI_GETWORKAREA, "int", 0, "ptr", DllStructGetPtr($stRect), "int", 0)
Local $nLeft = DllStructGetData($stRect, 1)
Local $nTop = DllStructGetData($stRect, 2)
Local $nRight = DllStructGetData($stRect, 3) - DllStructGetData($stWinPos, 5)
Local $nBottom = DllStructGetData($stRect, 4) - DllStructGetData($stWinPos, 6)
If BitAND($nEdge, 1) and Abs($nLeft - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nLeft)
If BitAND($nEdge, 2) and Abs($nTop - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nTop)
If BitAND($nEdge, 4) and Abs($nRight - DllStructGetData($stWinPos, 3)) <= $nGap Then DllStructSetData($stWinPos, 3, $nRight)
If BitAND($nEdge, 8) and Abs($nBottom - DllStructGetData($stWinPos, 4)) <= $nGap Then DllStructSetData($stWinPos, 4, $nBottom)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== GUI Snap To Corners ==

{{Snippet Header
| AuthorURL = 126-lazycat
| AuthorName = Lazycat
}}

<syntaxhighlight lang="autoit">
; GUI snap to corners

#include <GUIConstants.au3>

Global $nGap = 20
Global $ahGUI[3]
$ahGUI[0] = GUICreate("Snapped window 1", 300, 200, 100, 100)
GUISetState()
$ahGUI[1] = GUICreate("Snapped window 2", 300, 400, 300, 400)
GUISetState()
$ahGUI[2] = GUICreate("Snapped window 3", 150, 300, 500, 100)
GUISetState()

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")
While 1
$GUIMsg = GUIGetMsg()
Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint;uint;int;int;int;int;uint", $lParam)
Local $nLeft = DllStructGetData($stWinPos, 3)
Local $nTop = DllStructGetData($stWinPos, 4)
$pos_cur = WinGetPos($hWnd)
For $i = 0 To UBound($ahGUI) - 1
If $hWnd = $ahGUI[$i] Then ContinueLoop
$pos_win = WinGetPos($ahGUI[$i])

If Abs(($pos_win[0] + $pos_win[2]) - $nLeft) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] + $pos_win[2])
If Abs($nLeft + $pos_cur[2] - $pos_win[0]) <= $nGap Then DllStructSetData($stWinPos, 3, $pos_win[0] - $pos_cur[2])

If Abs(($pos_win[1] + $pos_win[3]) - $nTop) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] + $pos_win[3])
If Abs($nTop + $pos_cur[3] - $pos_win[1]) <= $nGap Then DllStructSetData($stWinPos, 4, $pos_win[1] - $pos_cur[3])
Next
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== TAB On TAB Resize ==

{{Snippet Header
| AuthorURL = 52-geosoft
| AuthorName = GEOSoft
| AuthorURL2 = 3602-martin
| AuthorName2 = martin
| AuthorURL3 = 5169-refran
| AuthorName3 = ReFran
}}

<syntaxhighlight lang="autoit">
; Example of TAB On TAB Resize

#include <GUIConstants.au3>

Global $mainGUI, $ok_button, $cancel_button

; This window has 2 ok/cancel-buttons
$mainGUI = GUICreate("Tab on Tab Resize", 260, 250, 20, 10, $WS_OVERLAPPEDWINDOW + $WS_CLIPCHILDREN + $WS_CLIPSIBLINGS)
GUISetStyle(BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_CAPTION, $WS_SIZEBOX, $WS_POPUP, $WS_SYSMENU))
GUISetBkColor(0x5686A9)
$ok_button = GUICtrlCreateButton("OK", 40, 220, 70, 20)
$cancel_button = GUICtrlCreateButton("Cancel", 150, 220, 70, 20)

; Create the first child window that is implemented into the main GUI
$child1 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)

GUISetBkColor(0x46860A)
$child_tab = GUICtrlCreateTab(10, 10, 210, 150)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
$child11tab = GUICtrlCreateTabItem("1")
$child12tab = GUICtrlCreateTabItem("2")
GUICtrlCreateTabItem("")
GUISetState()

; Create the second child window that is implemented into the main GUI
$child2 = GUICreate("", 230, 170, 15, 35, BitOR($WS_CHILD, $WS_TABSTOP), -1, $mainGUI)
GUISetBkColor(0x56869c)
$listview2 = GUICtrlCreateListView("Col1|Col2", 10, 10, 210, 150, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateListViewItem("ItemLong1|ItemLong12", $listview2)
GUICtrlCreateListViewItem("ItemLong2|Item22", $listview2)
;GUISetState()

; Switch back the main GUI and create the tabs
GUISwitch($mainGUI)
$main_tab = GUICtrlCreateTab(10, 10, 240, 200)
$child1tab = GUICtrlCreateTabItem("Child1")
$child2tab = GUICtrlCreateTabItem("Child2")
GUICtrlCreateTabItem("")
GUISetState()

GUIRegisterMsg($WM_SIZE, 'WM_SIZE')
Dim $tabItemLast = 0

While 1
$msg = GUIGetMsg(1)
Switch $msg[0]
Case $GUI_EVENT_CLOSE, $cancel_button
ExitLoop

Case $main_tab
$tabItem = GUICtrlRead($main_tab)
If $tabItem <> $tabItemLast Then TabSwitch($tabItem)

EndSwitch
WEnd

Func TabSwitch($tabItem)
GUISetState(@SW_HIDE, $child1)
GUISetState(@SW_HIDE, $child2)

If $tabItem = 0 Then GUISetState(@SW_SHOW, $child1)
If $tabItem = 1 Then GUISetState(@SW_SHOW, $child2)
$tabItemLast = $tabItem
EndFunc ;==>TabSwitch

Func WM_SIZE($hWnd, $iMsg, $iWParam, $iLParam)
$aMGPos = WinGetClientSize($mainGUI)
WinMove($child1, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
WinMove($child2, "", 15, 35, +$aMGPos[0] - 30, +$aMGPos[1] - 80)
;Guictrlsetpos($child_tab,10,10,+$aMGPos[0]-50,+$aMGPos[1]-100)
GUICtrlSetPos($main_tab, 10, 10, +$aMGPos[0] - 20, +$aMGPos[1] - 50)
GUICtrlSetPos($listview2, 10, 10, +$aMGPos[0] - 30 - 20, +$aMGPos[1] - 80 - 20)

EndFunc ;==>WM_SIZE
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_CheckOrUnCheck ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iCheckBox = GUICtrlCreateCheckbox('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently unchecked so this will toggle the state to checked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to checked the last time _Toggle_CheckOrUnCheck was called, so now toggle the state to unchecked.
_Toggle_CheckOrUnCheck($iCheckBox)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either unchecked or checked, depending on it's current state.
Func _Toggle_CheckOrUnCheck($iControlID)
Local $aState[2] = [$GUI_CHECKED, $GUI_UNCHECKED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlRead($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_CheckOrUnCheck
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_DropOrNoDrop ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Example()

Func Example()
Local $hGUI = GUICreate('', 500, 500, -1, -1, -1, $WS_EX_ACCEPTFILES)
Local $iLabel = GUICtrlCreateLabel('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently accepting no files to be dropped on it so this will toggle the state to allow dropped files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to allow dropped files the last time _Toggle_DropOrNoDrop was called, so now toggle the state to accept no dropping of files.
_Toggle_DropOrNoDrop($iLabel)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either accept or not accept dropped files, depending on it's current state.
Func _Toggle_DropOrNoDrop($iControlID)
Local $aState[2] = [$GUI_DROPACCEPTED, $GUI_NODROPACCEPTED]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_DropOrNoDrop
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_EnableOrDisable ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently enabled so this will toggle the state to disabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to disabled the last time _Toggle_EnableOrDisable was called, so now toggle the state to enabled.
_Toggle_EnableOrDisable($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either enabled or disabled, depending on it's current state.
Func _Toggle_EnableOrDisable($iControlID)
Local $aState[2] = [$GUI_ENABLE, $GUI_DISABLE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_EnableOrDisable
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_FocusOrNoFocus ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently not focused so this will toggle the state to focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to focused the last time _Toggle_FocusOrNoFocus was called, so now toggle the state to not focused.
_Toggle_FocusOrNoFocus($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either focused or not focused, depending on it's current state.
Func _Toggle_FocusOrNoFocus($iControlID)
Local $aState[2] = [$GUI_FOCUS, $GUI_NOFOCUS]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_FocusOrNoFocus
</syntaxhighlight>

[[#top | ReturnToContents]]

== _Toggle_ShowOrHide ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <GUIConstantsEx.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
Local $iButton = GUICtrlCreateButton('Example', 5, 10, 85, 25)
GUISetState(@SW_SHOW, $hGUI)

; Sleep for 2 seconds.
Sleep(2000)

; The control is currently shown so this will toggle the state to hide.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

; The control was changed to hide the last time _Toggle_ShowOrHide was called, so now toggle the state to show.
_Toggle_ShowOrHide($iButton)

; Sleep for 2 seconds.
Sleep(2000)

GUIDelete($hGUI)
EndFunc ;==>Example

; Toggle a control to either show or hide, depending on it's current state.
Func _Toggle_ShowOrHide($iControlID)
Local $aState[2] = [$GUI_SHOW, $GUI_HIDE]
GUICtrlSetState($iControlID, $aState[Number(BitAND(GUICtrlGetState($iControlID), $aState[0]) = $aState[0])])
EndFunc ;==>_Toggle_ShowOrHide
</syntaxhighlight>

[[#top | ReturnToContents]]

== Unmovable Window ==

{{Snippet Header
| AuthorURL = 19384-wemartiansarefriendly
| AuthorName = WeMartiansAreFriendly
}}

<syntaxhighlight lang="autoit">
#include <GUIConstants.au3>

Global $nConstXpos = @DesktopWidth/2 ;define the constant x position
Global $nConstYpos = @DesktopHeight/2 ;define the constant y position

$hGUI = GUICreate("Unmovable Window", 300, 200, $nConstXpos, $nConstYpos)

GUIRegisterMsg($WM_WINDOWPOSCHANGING, "MY_WM_WINDOWPOSCHANGING")

GUISetState()

While 1
$GUIMsg = GUIGetMsg()

Switch $GUIMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Func MY_WM_WINDOWPOSCHANGING($hWnd, $Msg, $wParam, $lParam)
Local $stWinPos = DllStructCreate("uint hwnd;uint hwndInsertAfter;int x;int y;int cx;int cy;uint flags", $lParam)

DllStructSetData($stWinPos, "x", $nConstXpos)
DllStructSetData($stWinPos, "y", $nConstYpos)
Return 0
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== Window Drag Using GUIRegister ==

{{Snippet Header
| AuthorURL = 20477-mrcreator
| AuthorName = MrCreatoR
}}

<syntaxhighlight lang="autoit">
; Window Drag using GUIRegister
#include <GuiConstants.au3>

Global Const $WM_LBUTTONDOWN = 0x0201
;Global Const $WM_SYSCOMMAND = 0x0112

$Gui = GuiCreate("Test", 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GuiRegisterMsg($WM_LBUTTONDOWN, "_WinMove")

GUISetState()

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
EndSwitch
WEnd

Func _WinMove($HWnd, $Command, $wParam, $lParam)
If BitAND(WinGetState($HWnd), 32) Then Return $GUI_RUNDEFMSG
DllCall("user32.dll", "long", "SendMessage", "hwnd", $HWnd, "int", $WM_SYSCOMMAND, "int", 0xF009, "int", 0)
EndFunc
</syntaxhighlight>

[[#top | ReturnToContents]]

== WinGetTrans ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <WinAPI.au3>

Example()

Func Example()
Local $hGUI = GUICreate('')
GUISetState(@SW_SHOW, $hGUI)

; Set the transparency of a GUI between 0 and 255. 255 = Solid, 0 = Invisible.
WinSetTrans($hGUI, '', 100)

MsgBox(4096, '', 'The transparency of the GUI is: ' & WinGetTrans($hGUI) & ', this should be 100.')
GUIDelete($hGUI)
EndFunc ;==>Example

; Find the transparency of a GUI.
Func WinGetTrans($sTitle, $sText = '') ; By Valik - http://www.autoitscript.com/forum/topic/...gettrans/page__view__findpost_
Local $iTransColor = 0, $iTransparency = 255
_WinAPI_GetLayeredWindowAttributes(WinGetHandle($sTitle, $sText), $iTransColor, $iTransparency)
Return $iTransparency
EndFunc ;==>WinGetTrans
</syntaxhighlight>

[[#top | ReturnToContents]]

== _WorkingArea ==

{{Snippet Header
| AuthorURL = 35302-guinness
| AuthorName = guinness
}}

<syntaxhighlight lang="autoit">
#include <APIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

Example()

Func Example()
; Set the working area of the Desktop, in this case 120px to the left and retaining the same height and width.
Local $aWorkingArea = _WorkingArea(150, Default, Default, Default)

; Create the GUI.
Local $hGUI = GUICreate('', 150, $aWorkingArea[1], $aWorkingArea[2], $aWorkingArea[3], $WS_POPUP)
Local $iClose = GUICtrlCreateButton('Close', 5, 5, 150 - 10, 25)
GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $iClose
ExitLoop

EndSwitch
WEnd

; Delete the GUI.
GUIDelete($hGUI)

; Reset the working area to the previous values.
_WorkingArea()
EndFunc ;==>Example

Func _WorkingArea($iLeft = Default, $iTop = Default, $iWidth = Default, $iHeight = Default)
Local Static $tWorkArea = 0
If IsDllStruct($tWorkArea) Then
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tWorkArea), $SPIF_SENDCHANGE)
$tWorkArea = 0
Else
$tWorkArea = DllStructCreate($tagRECT)
_WinAPI_SystemParametersInfo($SPI_GETWORKAREA, 0, DllStructGetPtr($tWorkArea))

Local $tCurrentArea = DllStructCreate($tagRECT)
Local $aArray[4] = [$iLeft, $iTop, $iWidth, $iHeight]
For $i = 0 To 3
If $aArray[$i] = Default Or $aArray[$i] < 0 Then
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
EndIf
DllStructSetData($tCurrentArea, $i + 1, $aArray[$i])
$aArray[$i] = DllStructGetData($tWorkArea, $i + 1)
Next
_WinAPI_SystemParametersInfo($SPI_SETWORKAREA, 0, DllStructGetPtr($tCurrentArea), $SPIF_SENDCHANGE)
$aArray[2] -= $aArray[0]
$aArray[3] -= $aArray[1]
Local $aReturn[4] = [$aArray[2], $aArray[3], $aArray[0], $aArray[1]]
Return $aReturn
EndIf
EndFunc ;==>_WorkingArea
</syntaxhighlight>

[[#top | ReturnToContents]]

Free Software

2015-02-15T17:48:58Z

Argumentum: /* Commandline */

'''Welcome To The Free Software Page ~ This page is a place to find useful free software recommended by the AutoIt community'''

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Archive '''</blockquote> =====
<blockquote>
* [http://www.7-zip.org/ 7 Zip] ~ Compression Utility ~ CyberSlug
* [http://legroom.net/software/uniextract Universal Extractor] ~ decompress and extract files from any type of archive or installer ~ wakillon

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Antivirus, Malware & Spyware Programs '''</blockquote> =====
<blockquote>
* [http://www.lavasoft.com/products/ad_aware_free.php Ad-Aware] ~ Antivirus Package ~ /dev/null
* [http://www.avast.com/index Avast] ~ Antivirus Package ~ killaz219
* [http://www.avira.com/en/avira-free-antivirus Avira] ~ Antivirus Package ~ MSLx Fanboy
* [http://free.avg.com/gb-en/homepage AVG Free] ~ Antivirus Package ~ LxP
* [http://antivirus.baidu.com/en/ Baidu Antivirus] ~ Antivirus ~ wakillon
* [http://www.trendmicro.co.uk/products/free-tools-and-services/ Hijack This] ~ Threat Removal Tool. Should only be used if you know what you are doing. ~ jefhal
* [http://www.microsoft.com/security/pc-security/mse.aspx Microsoft Security Essentials (WIN7 only)] ~ Malware/Spyware Tool ~ Valuater
* [http://www.safer-networking.org/en/index.html Spybot - Search & Destroy] ~ Spyware Removal ~ BigDod
* [http://www.javacoolsoftware.com/spywareblaster.html SpywareBlaster] ~ Spyware Tool ~ forger

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Audio '''</blockquote> =====
<blockquote>
* [http://audacity.sourceforge.net/ Audacity] ~ Audio Recording & Editing Tool ~ jefhal
* [http://mediaarea.net/en/MediaInfo MediaInfo] ~ Display technical and tag data for video and audio files ~ wakillon
* [http://mp3gain.sourceforge.net/ MP3Gain] ~ Normalize Music Files ~ maqleod
* [http://www.mp3tag.de/en/index.html Mp3tag] ~ Mp3 Metadata Editor ~ ning
* [http://www.synthfont.com/ SynthFont] ~ Midi Editing ~ LxP

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Browsers '''</blockquote> =====
<blockquote>
* [http://www.qksoft.com/favorites-management-master/ Bookmark Master] ~ IE Bookmark Manager ~ MHz
* [http://toolbarcleaner.com/ Toolbar Cleaner] ~ Remove unwanted toolbars, apps, add-ons, and plug-ins ~ wakillon
----
* [http://en.browser.baidu.com/ Baidu Spark Browser] ~ Web Browser ~ wakillon
* [http://chromium.woolyss.com/ Chromium] ~ Web Browser ~ wakillon
* [http://www.mozilla.org/en-US/firefox/fx/ Firefox] ~ Web Browser ~ LxP
* [http://www.srware.net/en/software_srware_iron.php Iron] ~ Web Browser ~ wakillon
* [http://www.maxthon.com/ Maxthon] ~ Web Browser ~ MHz
* [http://www.opera.com/ Opera] ~ Browser ~ photonbuddy
* [http://support.apple.com/kb/dl1531 Safari] ~ Web Browser ~ wakillon
* [http://www.slimbrowser.net/en/ Slim Browser] ~ Web Browser ~ jefhal
* [http://browser.yandex.com/ Yandex] ~ Web Browser ~ wakillon

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' CD & DVD Software '''</blockquote> =====
<blockquote>
* [http://www.daemon-tools.cc/eng/products/dtLite Daemon Tools Lite] ~ Virtual Disc Emulator ~ CyberSlug
* [http://www.deepburner.com/?r=products&pr=deepburner&prr=features DeepBurner ] ~ CD/DVD Burner ~ MSLx Fanboy
* [http://www.magiciso.com/tutorials/miso-magicdisc-mount.htm MagicDisc] ~ Virtual CD/DVD-ROM ~ wakillon

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Coding '''</blockquote> =====
<blockquote>
* [http://www.autoitscript.com/site/ AutoIt] ~ Scripting Language ~ layer
* [http://www.jrsoftware.org/isinfo.php Inno Setup] ~ Program Installer Setup ~ gcriaco
* [http://notepad-plus-plus.org/ Notepad++] ~ Source Code Editing ~ maqleod
* [http://www.pspad.com/en/ PSPad] ~ Universal Editor ~ LxP
* [http://www.codertools.com TotalEdit] ~ Universal Editor ~ JoeCool

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Commandline '''</blockquote> =====
<blockquote>
* [http://curl.haxx.se/ curl] ~ Commandline Https/Http/Ftp Client ~ /dev/null
* [http://www.ffmpeg.org/ FFmpeg] ~ Record, convert and stream audio and video ~ wakillon
* [http://www.poweradmin.com/paexec PAExec] ~ Launch Remote Windows Apps (PSEXEC '''Free''' alternative) ~ Pincopanco
* [http://wget.addictivecode.org/FrequentlyAskedQuestions#download wGet] ~ Commandline Https/Http/Ftp Client ~ Argumentum
</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Document Management '''</blockquote> =====
<blockquote>
* [http://www.openoffice.org/ Apache OpenOffice] ~ Office Suite ~ MSLx Fanboy
* [http://www.libreoffice.org/ LibreOffice] ~ Office Suite ~ Chimaera
* [http://liquidninja.com/metapad/ Metapad] ~ Notepad alternative ~ LxP
* [http://www.vim.org/ Vim] ~ Text Editor ~ /dev/null

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Explorer Replacements '''</blockquote> =====
<blockquote>
* [http://explorerplusplus.com/ Explorer++] ~ File manager for Windows ~ wakillon
* [http://www.softwareok.com/?Freeware/Q-Dir Q-Dir] ~ File manager for Windows ~ wakillon
* [http://wde.codeplex.com/ Windows Double Explorer] ~ File manager for Windows ~ wakillon
</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' FTP / Web Servers & Remote '''</blockquote> =====
<blockquote>
* [http://www.jtsoft.com.pl/ A-Term] ~ Terminal emulator with API (COM / DLL) ~ mlipok
* [http://httpd.apache.org/ Apache] ~ Web Server ~ maqleod
* [http://filezilla-project.org/ Filezilla] ~ FTP Client & Server ~ MHz
* [http://www.chiark.greenend.org.uk/~sgtatham/putty/download.html putty] ~ SSP client ~ /dev/null
* [http://www.realvnc.com/ RealVNC] ~ Remote Control Software ~ ning
* [http://www.smartftp.com/ SmartFTP] ~ FTP client ~ LxP
* [http://www.teamviewer.com TeamViewer] ~ Remote Desktop Software (More features than RealVNC and its free!)
* [http://www.ayera.com/teraterm/ TeraTerm Pro Web] ~ Enhanced Telnet/SSH2 Client ~ /dev/null
* [http://winscp.net/eng/index.php WinSCP] ~ FTP over SSH ~ LxP

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Image Editing '''</blockquote> =====
<blockquote>
* [http://blog.bahraniapps.com/ GifCam] ~ Animated gif creation ~ wakillon
* [http://imageresizer.codeplex.com/ Image Resizer] ~ Image Manipulation ~ maqleod
* [http://inkscape.org/ Inkscape] ~ Vector Graphics Editor ~ Josbe
* [http://www.irfanview.com/ IrfanView] ~ Universal image editor ~ LxP
* [http://www.photofiltre-studio.com/pf7-en.htm PhotoFiltre] ~ Photo Editor ~ wakillon
* [http://picasa.google.co.uk/ Picasa] ~ Photo Editing Tool ~ jefhal
* [http://www.gimp.org/ The Gimp] ~ Image Editing ~ Blue_Drache
* [http://www.xnview.com/en/index.html XnView] ~ Multimedia Convertor ~ LxP

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Internet Messaging '''</blockquote> =====
<blockquote>
* [http://www.miranda-im.org/ Miranda] ~ Multi IM ~ Lazycat
* [http://www.pidgin.im/ Pidgin] ~ Formerly Gaim ~ LxP

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Mail '''</blockquote> =====
<blockquote>
* [http://www.poppeeper.com/ POP Peeper] ~ Email Client&Notifier ~ wakillon
* [http://www.mozilla.org/en-US/thunderbird/ Thunderbird] ~ Email software ~ LxP

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Maintenance '''</blockquote> =====
<blockquote>
* [http://security.baidu.co.th/en/ Baidu PC Faster] ~ Advanced Optimization & Security Software ~ wakillon
* [http://www.piriform.com/ccleaner CCleaner] ~ PC Cleanup Tool ~ Valuater
* [http://eraser.heidi.ie/ Eraser] ~ Stubborn File Removal ~ maqleod
* [http://www.free-codecs.com/download/K_Lite_Codec_Pack.htm K-Lite Codec Pack] ~ Codecs ~ maqleod
* [http://www.bleepingcomputer.com/files/killbox.php Pocket Killbox] ~ Stubborn File Removal Tool ~ jefhal
* [http://www.steffengerlach.de/freeware/ Scanner] ~ Hard disk usage monitor ~ LxP

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Media Players '''</blockquote> =====
<blockquote>
* [http://www.foobar2000.org/ foobar2000] ~ Advanced audio player~ LxP
* [http://www.jetaudio.com/download/ JetAudio Basic] ~ Media Player ~ wakillon
* [http://sourceforge.net/projects/guliverkli/ Media Player Classic] ~ Media player~ LxP
* [http://mpc-hc.sourceforge.net/ Media Player Classic ( Home Cinema Edition )] ~ HD Video player ~ Chimaera
* [http://www.videolan.org/vlc/ VLC ] ~ Media Player ~ MSLx Fanboy
* [http://www.winamp.com/ WinAmp] ~ Media player ~ killaz219

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Network & Internet '''</blockquote> =====
<blockquote>
* [http://keir.net/neutron.html Neutron] ~ Accurate time ~ LxP
* [http://www.uvnc.com/index.php UltraVNC] ~ Visual remote computing ~ LxP
* [http://www.poweradmin.com/paexec PAExec] ~ Launch Remote Windows Apps (PSEXEC '''Free''' alternative) ~ Pincopanco

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Passwords & Encryption '''</blockquote> =====
<blockquote>
* [http://www.essentialpim.com/?r=products&pr=essentialpim&prr=features EssentialPIM] ~ Personal Information Manager ~ Josbe
* [http://keepass.info/ Keepass] ~ Password Manager ~ /dev/null
* [http://passwordsafe.sourceforge.net/ Password Safe] ~ Password Management ~ maqleod
* [http://www.truecrypt.org/ TrueCrypt] ~ Encryption ~ photonbuddy
* [https://lastpass.com/ LastPass] ~ Password Management ~ BrewManNH

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' PDF '''</blockquote> =====
<blockquote>
* [http://get.adobe.com/reader/ Adobe Reader] ~ PDF Reader ~ LxP
* [http://www.cutepdf.com/Products/CutePDF/writer.asp Cute PDF] ~ Convert To PDF ~ CyberSlug
* [http://www.foxitsoftware.com/Secure_PDF_Reader/ Foxit Reader] ~ PDF Reader ~ ReFran
* [http://www.pdfforge.org/ PDF Creator] ~ PDF writer ~ LxP
* [http://www.acropdf.com/products.html PDF Speedup] ~ Speed up Adobe ~ LxP

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Privacy * '''</blockquote> =====
<blockquote>* '''Using some of the software in this section will prevent normal access to the AutoIt site as proxies are not allowed. Discussions on automating these types of products is not permitted.'''</blockquote>
<blockquote>
* [http://www.privoxy.org/ Privoxy] ~ To filter incoming web pages ~ LxP
* [https://www.torproject.org/index.html Tor] ~ Anonymity software ~ killaz219

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Resource Management '''</blockquote> =====
<blockquote>
* [http://www.angusj.com/resourcehacker/ Resource Hacker] ~ Extract exe resources ~ LxP
* [http://www.chmaas.handshake.de/delphi/freeware/xvi32/xvi32.htm#new XVI32] ~ Hex Editor ~ /dev/null
* [http://www.httrack.com/index.php HTTTrack] ~ Website Copier ~ gcriaco
* [http://www.cthing.com/Meazure.asp Meazure] ~ Window Info Tool ~ MHz
----
* [http://www.nliteos.com/index.html nLite] ~ Win XP Deployment Tool ~ beerman
* [http://www.vlite.net/ vLite] ~ Win Vista Deployment Tool ~ Chimaera
* [http://www.rt7lite.com/ RT 7 Lite] ~ Win 7 Deployment Tool ~ Chimaera
* [http://www.2kr2.rt7lite.com/ RT Server Customizer] ~ Win Server 2008 R2 Deployment Tool ~ Chimaera
</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Searches and Comparison '''</blockquote> =====
<blockquote>
* [http://www.mythicsoft.com/page.aspx?type=agentransack&page=home Agent Ransack] ~ File Finder With Regex ~ OldGuyWalking
* [http://tools.tortoisesvn.net/grepWin.html grepWin] ~ File Finder With Regex ~ mlipok
* [http://www.wingrep.com/index.htm WinGrep] ~ File Finder With Regex ~ mlipok
* [http://winmerge.org WinMerge] ~ File Finder With Regex ~ mlipok

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Startup Applications Management '''</blockquote> =====
<blockquote>
* [http://codestuff.obninsk.ru/products_starter.html Starter] ~ Manage Windows startup applications ~ wakillon
* [http://www.windowsstartup.com/ Startup Inspector] ~ Manage Windows startup applications ~ wakillon
* [http://download.cnet.com/StartupMonitor/3000-2084_4-10637539.html Startup Monitor] ~ Startup applications Monitoring ~ wakillon

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Task Scheduling '''</blockquote> =====
<blockquote>
* [http://www.codeproject.com/Articles/5371/ToDoList-6-4-6-An-effective-and-flexible-way-to-ke ToDoList] ~ Task Scheduler ~ Valik

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Video Editing '''</blockquote> =====
<blockquote>
* [http://www.erightsoft.com/SUPER.html SUPER] ~ Audio & Video Converter, Recorder ~ wakillon
* [http://www.virtualdub.org/ Virtualdub ] ~ Video Capture / Processing Utility ~ HardCopy

</blockquote>

===== <blockquote style="background-color:white; padding:1em; border:2px solid #8FBC8F">''' Learning '''</blockquote> =====
<blockquote>
* [http://www.greatis.com/utilities/justtype/ Just Type] ~ Just Type ~ mLipok

</blockquote>