AutoIt Français

Code : Tout sélectionner

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

$cat = @TempDir & "\cat.jpg"
InetGet("http://image.gilawhost.com/14/01/10/b33zrcy6.jpeg", $cat)
$gui = GUICreate("", 300, 225)
GUICtrlCreatePic($cat, 0, 0, 300, 225)
GUICtrlSetState(-1, $GUI_DISABLE)
GUISetState()

$inputgui = GUICreate("Editgui", 300, 200, 0, 0, $WS_POPUP, BitOr($WS_EX_LAYERED, $WS_EX_TOPMOST, $WS_EX_MDICHILD), $gui)
GUISetBkColor(0xABCDEF)
$toto = GUICtrlCreateInput ("", 20, 30, 250, 150, -1, $WS_EX_TRANSPARENT)
GUICtrlSetFont(-1, 32, 40, 1, "Comic Sans MS")
GUICtrlSetColor(-1, 0xffffff)
GUICtrlSetBkColor(-1, 0xABCDEF)
GUICtrlSetState(-1, $GUI_ONTOP)
_WinAPI_SetLayeredWindowAttributes($inputgui, 0xABCDEF)
GUISetState()

GUIRegisterMsg($WM_ACTIVATE, "WM_ACTIVATE")
GUIRegisterMsg($WM_MOVING, "WM_MOVING") 

While GuiGetMsg()<>-3
 WEnd

Func WM_ACTIVATE($hWnd, $iMsg, $iwParam, $ilParam)
  if $hWnd = $gui Then _WinAPI_SetWindowPos($inputgui, $gui, -1, -1, -1, -1, BitOR(0x0001, 0x0002)) ; $SWP_NOSIZE, $SWP_NOMOVE
EndFunc

Func WM_MOVING($hWnd, $Msg, $wParam, $lParam)
  if $hWnd = $gui Then _WinAPI_SetWindowPos($inputgui, $gui, -1, -1, -1, -1, BitOR(0x0001, 0x0002))
EndFunc