Code : Tout sélectionner
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#include <GDIPlus.au3>
#include <WinAPI.au3>
#include <Color.au3>
Opt("GUIOnEventMode", 1) ;0=disabled, 1=OnEvent mode enabled
Local $gui, $largeur=(@DesktopWidth), $hauteur=(@DesktopHeight), $oa, $ob, $oc, $ok, $width=600, $height=50, $n, $part, $posx, $posy, $ra=$largeur/4, $rb=$hauteur/4, $bx=100, $by=30, $pi=3.1418
$gui = GUICreate("Form1", $largeur, $hauteur, 1, 1, BitOR($WS_POPUP,$WS_CLIPSIBLINGS))
GUISetBkColor(0x006666, $gui)
GUISetState(@SW_SHOW)
; ("title", "Prompt", "Default", "password char", width, height, left, top, timeout, hwnd)
$ok = InputBox("AutoIt - fenêtre InputBox", " ", " GUI sans bordure, taille d'écran avec fenêtre InputBox qui ne passe pas derrière quand on clique dans le GUI ", "", $width, $height, (@DesktopWidth-$width)/2, (@DesktopHeight-$height)/2,'',$gui)
GUISetBkColor(0x660000, $gui)
GUISetState(@SW_SHOW)
$oa = InputBox("AutoIt - fenêtre 2 InputBox", " ", " 2ème fenêtre d'entrée InputBox semblable sur GUI dont la couleur de fond change en Rouge foncé", "", $width, $height, (@DesktopWidth-$width)/2, (@DesktopHeight-$height)/2,'',$gui)
GUISetBkColor(0x220055, $gui)
GUISetState(@SW_SHOW)
$ob = InputBox("AutoIt - fenêtre 3 InputBox", " ", " 3ème fenêtre InputBox semblable sur GUI de couleur Violet foncé ", "", $width, $height, (@DesktopWidth-$width)/2, (@DesktopHeight-$height)/2,'',$gui)
GUISetBkColor(0xcc9933, $gui)
GUISetState(@SW_SHOW)
$part = 9
For $n = 1 to 18
$posx = ($largeur/2 + cos($n*($pi/$part)-$pi/2)*$ra)-($bx/2)
$posy = ($hauteur/2 + sin($n*($pi/$part)-$pi/2)*$rb)-($by/2)
GUICtrlCreateButton("bouton n° " & $n, $posx, $posy, $bx, $by)
Next
$oc = InputBox("AutoIt - fenêtre 4 InputBox entourée de boutons", " ", " 4ème fenêtre InputBox semblable sur GUI couleur ocre, entourée par 18 boutons numérotés placés en ellipse ", "", $width, $height, (@DesktopWidth-$width)/2, (@DesktopHeight-$height)/2,'',$gui)
Exit