Round Gui? Picture Gui?

[commenti]

Hello, it has been a while since I last wrote something in here.

Normaly I use autoit to write loginscripts etc.

Now I would like to try to do something different with it, not work related.

So I have a question is it possible to use a Picture as gui, even

is has transparent parts?

Basicly what I would like to have is a picture with transparent parts shown with autoit and add a right click menue. Is this possible? I searched the forum for "tranparent gui", "transparent picuture" but did not find the right thing.

If this is somehow possible or has been discussed before a hint where I can find related informations would be great.

Thank you...

commenti

[JoshDB]

Search these forums for "How to make a Gui look better" or for posts by me.

[BigDod]

This might help.

[Xenobiologist]

HI,

maybe this helps.

RoundGUI

Func RoundGUI($h_win, $i_x1, $i_y1, $i_x3, $i_y3)
    Dim $pos, $ret, $ret2
    $pos = WinGetPos($h_win)
    $ret = DllCall("gdi32.dll", "long", "CreateRoundRectRgn", "long", $i_x1, "long", $i_y1, "long", $pos[2], "long", $pos[3], "long", $i_x3, "long", $i_y3)
    If $ret[0] Then
        $ret2 = DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $h_win, "long", $ret[0], "int", 1)
        If $ret2[0] Then
            Return 1
        Else
            Return 0
        EndIf
    Else
        Return 0
    EndIf
EndFunc   ;==>RoundGUI

guictrlcreatepic()

guictrlsetstate( -1, $GUI_DISABLE) ; this disables the picture

So long,

Mega

[BigDod]

Probably not what you want but it is round.

#include <GUIConstants.au3>
; == GUI generated with Koda ==);
$Form1 = GUICreate("AForm1", 400, 400, -1, -1, BitOR($WS_SYSMENU,$WS_POPUPWINDOW,$WS_BORDER), 0)
_GuiRoundCorners($Form1, 0, 0, 400, 400)
GUISetState(@SW_SHOW)
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
    ;;;;;;;
    EndSelect
WEnd
Func _GuiRoundCorners($h_win, $i_x1, $i_y1, $i_x3, $i_y3)
   Dim $pos, $ret, $ret2
   $pos = WinGetPos($h_win)
    $ret = DllCall("gdi32.dll", "long", "CreateRoundRectRgn", "long",  $i_x1, "long", $i_y1, "long", $pos[2], "long", $pos[3], "long", $i_x3,  "long", $i_y3)
   If $ret[0] Then
      $ret2 = DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $h_win, "long", $ret[0], "int", 1)
      If $ret2[0] Then
         Return 1
      Else
         Return 0
      EndIf
   Else
      Return 0
   EndIf
EndFunc;==>_GuiRoundCorners

[commenti]

Hello,

thank you all for this usefull responses. I´ll try everything suggested out and let you know if I have made something out off this. This could take a little time because I have not much time for coding.

Thank you all again

commenti