AutoIt Français

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Global $aUtil_MinMax[4]

GUICreate('WM_GETMINMAXINFO',320,240,-1,-1,$WS_SIZEBOX)
GUISetState()
InitMinMax(320,240,800,600)   ; C'est ici que l'on règle les valeurs Min et Max de la fenêtre.

While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd

Func InitMinMax($x0,$y0,$x1,$y1)
    Local Const $WM_GETMINMAXINFO = 0x24
    $aUtil_MinMax[0]=$x0
    $aUtil_MinMax[1]=$y0
    $aUtil_MinMax[2]=$x1
    $aUtil_MinMax[3]=$y1
    GUIRegisterMsg($WM_GETMINMAXINFO,'MY_WM_GETMINMAXINFO')
EndFunc

Func MY_WM_GETMINMAXINFO($hWnd, $Msg, $wParam, $lParam)
    Local $minmaxinfo = DllStructCreate('int;int;int;int;int;int;int;int;int;int',$lParam)
    DllStructSetData($minmaxinfo,7,$aUtil_MinMax[0]); min X
    DllStructSetData($minmaxinfo,8,$aUtil_MinMax[1]); min Y
    ;DllStructSetData($minmaxinfo,9,$aUtil_MinMax[2]); max X
    ;DllStructSetData($minmaxinfo,10,$aUtil_MinMax[3]); max Y
    Return $GUI_RUNDEFMSG
EndFunc

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Global $aUtil_MinMax[4]

GUICreate('WM_GETMINMAXINFO',320,240,-1,-1,$WS_SIZEBOX)                                     ; C'est ici que l'on règle les valeurs de la fenêtre.
GUISetState()
InitMinMax(320,240,-1,-1)                                                                   ; C'est ici que l'on règle les valeurs Min de la fenêtre.

While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd

Func InitMinMax($x0,$y0,$x1,$y1)
    Local Const $WM_GETMINMAXINFO = WinGetHandle("Sans titre - Bloc-notes", "")             ; Fixe la valeur de $WM_GETMINMAXINFO avec la valeur 0x24 (valeur hexadécimale attribuée de 36)
    $aUtil_MinMax[0]=$x0
    $aUtil_MinMax[1]=$y0
    $aUtil_MinMax[2]=$x1
    $aUtil_MinMax[3]=$y1
    GUIRegisterMsg($WM_GETMINMAXINFO,'MY_WM_GETMINMAXINFO')                                 ; Lance la fonction GUIRegisterMsg() pour la valeur $WM_GETMINMAXINFO et la re-dirige vers la fonction MY_WM_GETMINMAXINFO().
EndFunc

Func MY_WM_GETMINMAXINFO($hWnd, $Msg, $wParam, $lParam)
    Local $minmaxinfo = DllStructCreate('int;int;int;int;int;int;int;int;int;int',$lParam)
    DllStructSetData($minmaxinfo,7,$aUtil_MinMax[0]); min X
    DllStructSetData($minmaxinfo,8,$aUtil_MinMax[1]); min Y
    ;DllStructSetData($minmaxinfo,9,$aUtil_MinMax[2]); max X
    ;DllStructSetData($minmaxinfo,10,$aUtil_MinMax[3]); max Y
    Return $GUI_RUNDEFMSG                                                                   ; Renvois la valeur $GUI_RUNDEFMSG à la commande qui à lancé la fonction (c'est à dire GUIRegisterMsg()). Cette valeur est une valeur fixe qui est déterminée dans GUIConstantsEx.au3
EndFunc

Code : Tout sélectionner

While 1
    $size = WinGetPos("[CLASS:Notepad]")
    If $size[2] < 320 Then
        WinMove("[CLASS:Notepad]", "", $size[0], $size[1], 320, $size[3])
    EndIf
    If $size[3] < 240 Then
        WinMove("[CLASS:Notepad]", "", $size[0], $size[1], $size[2], 240)
    EndIf
WEnd

Code : Tout sélectionner

#cs
AutoIt script for MMB
Autoit Controls in MMB App
Written by Yuraj
#ce

#NoTrayIcon
#Include <WindowsConstants.au3>
#include <Constants.au3>
#Include <GDIPlus.au3>
#Include <GuiButton.au3>
#Include <GuiEdit.au3>
#Include <GuiToolBar.au3>

;~ Global Settings
AutoItSetOption("MustDeclareVars",1)
HotKeySet("{F2}","stop")

;~ Variables declaration
Global $Loop = true,$hwnd,$title
Local $btn,$hmod,$graphics,$edit,$toolbar ; Controls /hwnds
Local Enum $idNew = 1000,$idOpen,$idSave,$idHelp ; Toolbar buttons /hwnds

; Get Window handle by title
;~ $title = "Welcome!"
if @Compiled AND $CmdLine[0] == 0 then
    MsgBox(16,"Error","Missing cmd parameters!")
    Exit
endif

if @Compiled then
    $title = $CmdLine[1] ; Get window title from CMD
Else
    $title = "Welcome!" ; only for debugging
endif

$hwnd = WinGetHandle("[TITLE:" & $title & ";CLASS:#32770]")

if @error then
    MsgBox(48,"","Can't find window with title: " & $title)
    Exit
EndIf

;~ Constructor, create controls etc.
$btn = _GUICtrlButton_Create($hwnd,"Get text",55,50,80,20)
$edit = _GUICtrlEdit_Create($hwnd,"Type something here...",145,50,150,20,$ES_AUTOHSCROLL)
; Create toolbar
$toolbar = _GUICtrlToolbar_Create ($hwnd, BitOR(0x0800,$WS_DLGFRAME))
_GUICtrlToolbar_AddBitmap ($toolbar, 1, -1, $IDB_STD_SMALL_COLOR)
_GUICtrlToolbar_AddButton ($toolbar, $idNew, $STD_FILENEW)
_GUICtrlToolbar_AddButton ($toolbar, $idOpen, $STD_FILEOPEN)
_GUICtrlToolbar_AddButton ($toolbar, $idSave, $STD_FILESAVE)
_GUICtrlToolbar_AddButtonSep ($toolbar)
_GUICtrlToolbar_AddButton ($toolbar, $idHelp, $STD_HELP)
;

;~ Main loop (and check if the window exist)
While $Loop AND WinExists($hwnd)

;~ CONTROLS EVENTS
if BitAND(_GUICtrlButton_GetState($btn), $BST_PUSHED) then ; If is button pressed
    Sleep(50)
    MsgBox(64,"","You have written:" & @CRLF & _GUICtrlEdit_GetText($edit),0,$hwnd)
endif

; If is toolbar button pressed
if _GUICtrlToolbar_IsButtonPressed($toolbar,$idNew) then
    Sleep(50)
    MsgBox(64,"","New file ...",0,$hwnd)
elseif _GUICtrlToolbar_IsButtonPressed($toolbar,$idOpen) then
    Sleep(50)
    MsgBox(64,"","Open file ...",0,$hwnd)
elseif _GUICtrlToolbar_IsButtonPressed($toolbar,$idSave) then
    Sleep(50)
    MsgBox(64,"","Save file ...",0,$hwnd)
elseif _GUICtrlToolbar_IsButtonPressed($toolbar,$idHelp) then
    Sleep(50)
    MsgBox(64,"","AutoIt Script" & @CRLF & "Written by Yuraj!",0,$hwnd)
endif
;

Sleep(20)
WEnd

;~~~DESTUCTOR
;~ Destroy Controls
_GUICtrlToolbar_Destroy($toolbar)
_GUICtrlButton_Destroy($btn)
_GUICtrlEdit_Destroy($edit)
;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;~ FUNCTIONS
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;
Func stop()
    $Loop = false
EndFunc
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Code : Tout sélectionner

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

Global $aUtil_MinMax[4]

$MMBTitle = "MMB Title"
$AutoItTitle = "GUI AutoIt"

;GUICreate( $AutoItTitle,228,300,800,600,$WS_SIZEBOX, $WS_MINIMIZEBOX, $WS_CAPTION, $WS_POPUP, $WS_SYSMENU, $WS_MAXIMIZEBOX)
GUICreate( $AutoItTitle,228,300,800,600, $WS_SIZEBOX)
GUISetState()
InitMinMax(228,300,800,600)

GUISwitch($MMBTitle)

While 1
    $size = WinGetPos( $AutoItTitle)
    WinActivate( $MMBTitle)
    WinMove( $MMBTitle, "", $size[0] + 8, $size[1] + 30, $size[2] - 16, $size[3] - 38)
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd

Func InitMinMax($x0,$y0,$x1,$y1)
    Local Const $WM_GETMINMAXINFO = 0x24
    $aUtil_MinMax[0]=$x0
    $aUtil_MinMax[1]=$y0
    $aUtil_MinMax[2]=$x1
    $aUtil_MinMax[3]=$y1
    GUIRegisterMsg($WM_GETMINMAXINFO,'MY_WM_GETMINMAXINFO')
EndFunc

Func MY_WM_GETMINMAXINFO($hWnd, $Msg, $wParam, $lParam)
    Local $minmaxinfo = DllStructCreate('int;int;int;int;int;int;int;int;int;int',$lParam)
    DllStructSetData($minmaxinfo,7,$aUtil_MinMax[0]); min X
    DllStructSetData($minmaxinfo,8,$aUtil_MinMax[1]); min Y
    DllStructSetData($minmaxinfo,9,$aUtil_MinMax[2]); max X
    DllStructSetData($minmaxinfo,10,$aUtil_MinMax[3]); max Y
    Return $GUI_RUNDEFMSG
EndFunc

Code : Tout sélectionner

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

Global $aUtil_MinMax[4]

$MMBTitle = "MMB Title"
$AutoItTitle = "GUI AutoIt"

;GUICreate( $AutoItTitle,228,300,800,600,$WS_SIZEBOX, $WS_MINIMIZEBOX, $WS_CAPTION, $WS_POPUP, $WS_SYSMENU, $WS_MAXIMIZEBOX)
GUICreate( $AutoItTitle,228,300,800,600, $WS_SIZEBOX)                                       ; C'est ici que l'on règle les valeurs de la fenêtre.
GUISetState()
InitMinMax(228,300,800,600)                                                                 ; C'est ici que l'on règle les valeurs Min de la fenêtre.

GUISwitch($MMBTitle)

While 1
    $size = WinGetPos( $AutoItTitle)
    WinActivate( $MMBTitle)
    WinMove( $MMBTitle, "", $size[0] + 8, $size[1] + 30, $size[2] - 16, $size[3] - 38)
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd

Func InitMinMax($x0,$y0,$x1,$y1)
    Local Const $WM_GETMINMAXINFO = 0x24                                                    ; Fixe la valeur de $WM_GETMINMAXINFO avec la valeur 0x24 (valeur hexadécimale attribuée de 36)
    $aUtil_MinMax[0]=$x0
    $aUtil_MinMax[1]=$y0
    $aUtil_MinMax[2]=$x1
    $aUtil_MinMax[3]=$y1
    GUIRegisterMsg($WM_GETMINMAXINFO,'MY_WM_GETMINMAXINFO')                                 ; Lance la fonction GUIRegisterMsg() pour la valeur $WM_GETMINMAXINFO et la re-dirige vers la fonction MY_WM_GETMINMAXINFO().
EndFunc

Func MY_WM_GETMINMAXINFO($hWnd, $Msg, $wParam, $lParam)
    Local $minmaxinfo = DllStructCreate('int;int;int;int;int;int;int;int;int;int',$lParam)
    DllStructSetData($minmaxinfo,7,$aUtil_MinMax[0]); min X
    DllStructSetData($minmaxinfo,8,$aUtil_MinMax[1]); min Y
    DllStructSetData($minmaxinfo,9,$aUtil_MinMax[2]); max X
    DllStructSetData($minmaxinfo,10,$aUtil_MinMax[3]); max Y
    Return $GUI_RUNDEFMSG                                                                   ; Renvois la valeur $GUI_RUNDEFMSG à la commande qui à lancé la fonction (c'est à dire GUIRegisterMsg()). Cette valeur est une valeur fixe qui est déterminée dans GUIConstantsEx.au3
EndFunc

Code : Tout sélectionner

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

; Change into the WinTitleMatchMode that supports classnames and handles
AutoItSetOption("WinTitleMatchMode", 4)
AutoItSetOption("WinSearchChildren", 1)

Global $aUtil_MinMax[4]

$MMBTitle = "MMB Title"
$AutoItTitle = "GUI AutoIt"

;GUICreate( $AutoItTitle,228,300,800,600,$WS_SIZEBOX, $WS_MINIMIZEBOX, $WS_CAPTION, $WS_POPUP, $WS_SYSMENU, $WS_MAXIMIZEBOX)
GUICreate( $AutoItTitle,228,300,800,600, $WS_SIZEBOX)   ; C'est ici que l'on règle les valeurs de la fenêtre.
GUISetState()
InitMinMax(228,300,800,600)     ; C'est ici que l'on règle les valeurs Min de la fenêtre.

GUISwitch($MMBTitle)

SendScriptMMB($MMBTitle, "RunScript("&CHR(34)&"TextBTN"&CHR(34)&")")    ; Désactive Window Caption (MMB)
SendScriptMMB($MMBTitle, "RunScript("&CHR(34)&"TextBTN5"&CHR(34)&")")   ; Désactive Window Resize  (MMB)

While 1
    $size = WinGetPos( $AutoItTitle)    
    ;WinMove( $MMBTitle, "", $size[0] + 8, $size[1] + 30, $size[2] - 16, $size[3] - 38)
    SendScriptMMB($MMBTitle, "SysCommand("&CHR(34)&"MoveWindow"&CHR(34)&","&CHR(34)& $size[0]+8 &','& $size[1]+30 &CHR(34)&")")
    SendScriptMMB($MMBTitle, "SysCommand("&CHR(34)&"ResizeWindow"&CHR(34)&","&CHR(34)& $size[2]-16 &','& $size[3]-38 &CHR(34)&")")  ; Redimentionne Sans Window Caption
    ;SendScriptMMB($MMBTitle, "SysCommand("&CHR(34)&"ResizeWindow"&CHR(34)&","&CHR(34)& $size[2]-32 &','& $size[3]-77 &CHR(34)&")") ; Redimentionne Avec Window Caption
    WinActivate( $MMBTitle)     
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd

Func InitMinMax($x0,$y0,$x1,$y1)
    Local Const $WM_GETMINMAXINFO = 0x24    ; Fixe la valeur de $WM_GETMINMAXINFO avec la valeur 0x24 (valeur hexadécimale attribuée de 36)
    $aUtil_MinMax[0]=$x0
    $aUtil_MinMax[1]=$y0
    $aUtil_MinMax[2]=$x1
    $aUtil_MinMax[3]=$y1
    GUIRegisterMsg($WM_GETMINMAXINFO,'MY_WM_GETMINMAXINFO')     ; Lance la fonction GUIRegisterMsg() pour la valeur $WM_GETMINMAXINFO et la re-dirige vers la fonction MY_WM_GETMINMAXINFO().
EndFunc

Func MY_WM_GETMINMAXINFO($hWnd, $Msg, $wParam, $lParam)
    Local $minmaxinfo = DllStructCreate('int;int;int;int;int;int;int;int;int;int',$lParam)
    DllStructSetData($minmaxinfo,7,$aUtil_MinMax[0]); min X
    DllStructSetData($minmaxinfo,8,$aUtil_MinMax[1]); min Y
    DllStructSetData($minmaxinfo,9,$aUtil_MinMax[2]); max X
    DllStructSetData($minmaxinfo,10,$aUtil_MinMax[3]); max Y
    Return $GUI_RUNDEFMSG   ; Renvois la valeur $GUI_RUNDEFMSG à la commande qui à lancé la fonction (c'est à dire GUIRegisterMsg()). Cette valeur est une valeur fixe qui est déterminée dans GUIConstantsEx.au3
EndFunc

Code : Tout sélectionner

; Rewritten by Yuraj, originally by Odklizec

#include-once
#include <SendMessage.au3>
#Include <Memory.au3>

Global Const $WM_RUNSCRIPTCODE = 0x08C7
Global Const $RUNSCRIPTCODE_LOUD = 0
Global Const $RUNSCRIPTCODE_QUIET = 1
Local $iItem, $pMemory, $tMemMap, $pText,$pid

Func SendScriptMMB($title,$script)

; get handle of MMB window
$hwnd = WinGetHandle($title)
if @error Then
;~     MsgBox(48,"","Can't find window with title " & $title)
    exit
endif

$slen = stringlen($script) +1

$str = "char[" & $slen & "]"; structure item must be "char"
$struct= DllStructCreate($str); create a struct for the string so we can get a pointer to it
if @error Then
;~     MsgBox(0,"","Error in DllStructCreate " & @error)
    exit
endif

$iItem   = DllStructGetSize($struct); get structure size
$pMemory = _MemInit($hwnd, $iItem, $tMemMap); init memory and return pointer to initialized memory in target app
DllStructSetData($struct, 1, $script); set string to structure
$pointer = DllStructGetPtr($struct,1); pointer to string in structure
_MemWrite($tMemMap, $pointer, $pMemory, $iItem); write string pointer to application memory

_SendMessage($hwnd,$WM_RUNSCRIPTCODE,$RUNSCRIPTCODE_LOUD,$pMemory)
If @error Then
;~  MsgBox(0,"", "_SendMessage Error: " & @error)
    Exit
EndIf

_MemFree($tMemMap);release the memory
EndFunc