pls help: GUI transparent menu image , -NO buttons

a6000000

hallo ,

[EDIT] OK es geht , siehe last post [/EDIT] 8-)

[EDIT] frage verfeinert [/EDIT]

moechte GUI-menu-Image ; Es soll 3 Links/Funktionen aufrufen ; Es soll nur das Menu-Image gezeigt werden ; Es sollen Keine WINDOWS-KANTIGEN-3D-Buttons dargestellt werden , sondern nur drei "sensitive bereiche" wie im beispoiel zu sehen ; welche Func brauche ich ;

hier ist ein Beispiel-menu-Image , x=180px width y=230px height :
[Blockierte Grafik: http://a6000000.bplaced.net/AM/AMMenuTrans3003.jpg]
http://a6000000.bplaced.net/AM/AMMenuTrans3003.jpg

die drei farbigen bereiche sind keine 3D - buttons , sollen aber was ausloesen , wenn man draufklickt , und egal welche der drei bereiche geklickt werden , dann ist das bild weg = einfach

etwa so:

Code

[pre]
<pre>
if_single_left_mouse_click()
{
  actione_qqq = 0
  if_active_window_foreground(my_menu_image_qqq)
  {
if_mouse_on_area_A_exe_qqq(){ actione_qqq = 1 }
if_mouse_on_area_B_exe_qqq(){ actione_qqq = 2 }
if_mouse_on_area_EXIT_qqq(){ actione_qqq = 6 }
  }   ;// end if_active_window_foreground()
}   ;// end if_single_left_mouse_click()
</pre>
[/pre]

Alles anzeigen

3001. welche AutoIt Funktionen sollte ich lesen?
3002. muss ich mehrere Teil - Images verwenden und zusammen-setzen?

bitte um Tips

------------------
PS:
habe paar beispiel - scripts gefunden ; vielleicht ist die loesung enthalten ; ich weiss es nicht ;

3030. soll ich EzSkin_1-2-3 nehmen?
http://www.autoit.de/ ']http://www.autoitscript.com/forum/index.php?showtopic=41319[/url]
[Blockierte Grafik: http://img381.imageshack.us/img381/2370/ez1ps8.jpg]
http://img381.imageshack.us/img381/2370/ez1ps8.jpg ;
3031. kann ich mit EzSkin_1-2-3 funktionen ohne buttons aufrufen ? kann man die buttons weglassen oder ueberdecken ?

3040. eine floating toolbar gibt es hier
http://www.autoit.de/ ']http://www.autoitscript.com/forum/index.ph…topic=41099&hl=[/url]
http://www.autoitscript.com/forum/index.php?showtopic=41099&hl=
[Blockierte Grafik: http://img387.imageshack.us/img387/5042/clipboard01pw5.jpg]
http://img387.imageshack.us/img387/5042/clipboard01pw5.jpg ;
3041. sind dort die noetigen funktionen enthalten?

3050. AutoIt KODA FormDesigner , damit?
[Blockierte Grafik: http://www.autoitscript.com/fileman/users/…/koda_small.gif]
http://www.autoitscript.com/fileman/users/…/koda_small.gif
http://www.autoit.de/ ']http://www.autoitscript.com/fileman/users/…formdesign.html[/url]
http://www.autoitscript.com/fileman/users/…formdesign.html

3060. in AutoIt - HELP
GUICtrlCreatePic
;----- example 2 , existiert
"
GUICtrlCreatePic(@Systemdir & "\oobe\images\merlin.gif",0,0, 0,0)
"
3061. merlin.gif is transparent , aber ich seh ausser bewegen keine action zum aufrufen
[Blockierte Grafik: http://a6000000.bplaced.net/AM/merlin_moove.jpg]
http://a6000000.bplaced.net/AM/merlin_moove.jpg

------------------

**Xenobiologist**

HI,

erst Lob spitzen Post! Aber verstanden habe ich noch nicht ganz.

Du willst ein Bild anzeigen auf dem NICHTS zusehen ist und wenn man draufklickt sollen in verschiedenen Bereichen Fkt ausgeführt werden?

Mega

a6000000

das menu bild is doch zu sehen , das schwarze mit den drei "sensitiven bereichen" , die nicht wie eckige buttons aussehen ,

dass heisst , ich will ein (anderes) bild nicht mit eckigen standart buttons verschandeln

die drei farbigen bereiche sind keine 3D - buttons , sollen aber was ausloesen , wenn man draufklickt

in html waere das ein Bilder-Link , jetzt frag ich mich wie das in autoit geht

ach so das TRANSPARENT bezieht sich nur auf die bereiche ausserhalb der runden ecken , oder beim help beispiel merlin eben auf den transparenten hintergrund.

alles klar?

progandy

Hab ichs richtig verstanden?
Du willst ein Hintergrundbild, auf dem 3 Buttons zu sehen sind. Diese sollen klickbar sein, aber nicht verdeckt werden.
Du setzt also das Bild auf GUISetState($bild,$GUI_DISABLE)
dann erstellst du Labels an den vorgesehenen Stellen. Diese werden als Buttons verwendet.
Wenn du sie dann an der richtigen Stelle hast, fügst du nach jedem Label ein GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT) ein, damit sie durchsichtig werden.
z.B. so: (Hier fehlt nur das Hintergrundbild Und die Ecken sind mit API-Calls abgerundet.

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>
HotKeySet("{ESC}", "_end")

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$gui = GUICreate("GUI", 200, 300, -1, -1, $WS_POPUP)
GUISetBkColor(0x0000FF)
$labelbutt1 = GUICtrlCreateLabel("",30,40,40,40)
GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT)
$labelbutt2 = GUICtrlCreateLabel("",110,90,40,40)
GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT)
$labelbutt3 = GUICtrlCreateLabel("",88,220,40,40)
GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT)

[/autoit] [autoit][/autoit] [autoit]

; folgendes löschen, um Labels unsichtbar zu machen:
GUICtrlSetBkColor($labelbutt1,0xFFFFFF)
GUICtrlSetBkColor($labelbutt2,0xFFFFFF)
GUICtrlSetBkColor($labelbutt3,0xFFFFFF)
;Ende löschen

[/autoit] [autoit][/autoit] [autoit]

_GUICreateRoundRect($gui, 50,50)
GUISetState()

[/autoit] [autoit][/autoit] [autoit]

#include <GUIConstants.au3>

[/autoit] [autoit][/autoit] [autoit]

#region - GUI SelectLoop
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
Exit
Case $msg = $labelbutt1
MsgBox(0, '', "Labelbutt1")
Case $msg = $labelbutt2
MsgBox(0, '', "Labelbutt2")
Case $msg = $labelbutt3
MsgBox(0, '', "Labelbutt3 - Exit")
Exit
EndSelect
WEnd
#endregion

[/autoit] [autoit][/autoit] [autoit]

Func _GUICreateRoundRect($hwnd, $radx=15,$rady=15)
$pos = WinGetPos($hwnd)

[/autoit] [autoit][/autoit] [autoit]

$1 = 0
$2 = 0
$3 = $pos[2]
$4 = $pos[3]
$ret = DllCall("gdi32.dll", "long", "CreateRoundRectRgn", "long", $1, "long", $2, "long", $3, "long", $4,"long",$radx,"long",$rady)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $hwnd, "long", $ret[0], "int", 1)
EndFunc ;==>_GUICreateRoundRect

[/autoit] [autoit][/autoit] [autoit]

Func _end()
Exit(0)
EndFunc

[/autoit]

a6000000

wieso "Hintergrundbild"?

Zitat

Du willst ein Hintergrundbild, auf dem 3 Buttons zu sehen sind

.. ich hab heut wohl ein knoten im ausdruck

also einfach ein window , dass aber keinen rahmen hat und keine standard - buttond zu sehen hat
das window besteht aus einem zB gif , damit der hintergrund neben den runden ecken durchsichtig - transparent ist

dann zB drei sensitive bereiche , die was ausloesen ,
die linkumrahmung wie in html - bilder - links wuerde nicht stoeren , es sollen aber keine windows - buttons angezeigt werden , und beim draufklicken muss auch nicht das aussehen geaendert werden , wuerde aber auch nicht stoeren , dann geht das splash eh weg

a6000000

Zitat

Diese sollen klickbar sein, aber nicht verdeckt werden

.. was hier verdeckt ? , versteh ich NOCH nicht
.. jetzt schau ich erstmal die genannten funktions an

progandy

Ja, verdeckt bedeutet:
Die Buttons sind auf das Bild gemalt, richtig?
Wenn dann ein Button erstellt wird, liegt der über dem Bild, sodass man den gemalten Button nicht mehr sieht. -> verdeckt.

a6000000

HEY HEY HEYYAAA

@progandy

da passiert ja schon was in der richtigen richtung!

ich studier das ma

a6000000

dein code sieht schon sehr entgegenkommend aus

nochmal es braucht am bild sich nix veraendern

[Blockierte Grafik: http://a6000000.bplaced.net/AM/AMMenuTrans3003.jpg%3C/a%3E] [Blockierte Grafik: http://a6000000.bplaced.net/AM/AMMenuTrans3003.jpg]

egal auf welchen bereich man klickt , dann isses weg und entweder passiert nix= exit oda A.exe oda B.exe

so schnell hab ich dein code noch nit gelesen ,

heyy sieht aba guuuut aus

warum rundest du die ecken nit einfach mit transparentem gif ab??

EDIT: habe es gefunden , [ _GUICreateRoundRect($gui, 50,50) ], sieht elegant aus 8-)

a6000000

Zitat

Die Buttons sind auf das Bild gemalt, richtig?

NEIN
es ist einfach nur ein bild mit verschiedenfarbigen pixeln

a6000000

@progandy

HEYY danke , damit geht es wohl

nur noch kurz:: kann ich dein blaues fenster ::

$gui = GUICreate("GUI", 200, 300, -1, -1, $WS_POPUP)
GUISetBkColor(0x0000FF)

auch mit der mouse VERSCHIEBEN? dafuer was was veraendern?
, oder geht nicht , dann brauch ich nicht suchen ?

progandy

Du musst das MouseDown mit WinMove verbinden:
[ offen ] Popup-GUI verschieben -> POSt #2

//Edit: Direkt einbauen geht nicht Du musst es auf GUIRegisterMsg anpassen, da mein Bsp. nicht im Event-Mode arbeitet:

Spoiler anzeigen

[autoit]

; in die Gui erstellung
If Not Isdeclared("WM_LBUTTONDOWN") Then Global Const $WM_LBUTTONDOWN = 0x0201
GUIRegisterMsg($WM_LBUTTONDOWN, "_PrimeDown")

[/autoit] [autoit][/autoit] [autoit]

;Ans Ende des Skripts:
Func _PrimeDown($hWnd, $Msg, $wParam, $lParam)
Local $DifX, $DifY, $MouseData = GUIGetCursorInfo($hwnd)
Local $WinPos = WinGetPos($hwnd)
Local $MPos = MouseGetPos()

[/autoit] [autoit][/autoit] [autoit]

$DifX = $MPos[0] - $WinPos[0]
$DifY = $MPos[1] - $WinPos[1]

[/autoit] [autoit][/autoit] [autoit]

While $MouseData[2]
$MPos = MouseGetPos()
$WinPos = WinGetPos($hwnd)

[/autoit] [autoit][/autoit] [autoit]

If ($WinPos[0] <> ($MPos[0] - $DifX)) Or ($WinPos[1] <> ($MPos[1] - $DifY)) Then
WinMove($hwnd, '', $MPos[0] - $DifX, $MPos[1] - $DifY)
EndIf

[/autoit] [autoit][/autoit] [autoit]

Sleep(15)

[/autoit] [autoit][/autoit] [autoit]

$MouseData = GUIGetCursorInfo($hwnd)
WEnd
EndFunc

[/autoit]

a6000000

HEYYAA

@progandy
; so jetzt hab ich es 50/50 , fast super , ABER:
; LINE 45::
;$n=GUICtrlCreatePic("AMMenuTrans3006.gif",0,0, 180,215)
; mit mein background image geht mouse - move nit und ohne background img geht mousemove , aber es sieht nit so aus
..es koennt alles so einfach sein - isses aba nit ..
; wie sollte denn das img eingebunden werden?

@progandy

Zitat

..
Du setzt also das Bild auf GUISetState($bild,$GUI_DISABLE)
..

C

[pre]
<pre>
;amen3060.au3
;file:///I|/AutoIt/AM/AMMenuTrans3006.gif ;// 180,215 
; the BG-img in web :: http://a6000000.bplaced.net/AM/AMMenuTrans3003.jpg
; add/remove BG img in line 45 with ;comment;


#include <GUIConstants.au3>
HotKeySet("{ESC}", "_end")
HotKeySet(" ", "_end")


;~ http://www.autoit.de/index.php?page=Thread&postID=40266#post40266
;~ Hab ichs richtig verstanden?
;~ Du willst ein Hintergrundbild, auf dem 3 Buttons zu sehen sind. Diese sollen klickbar sein, aber nicht verdeckt werden.
;~ Du setzt also das Bild auf GUISetState($bild,$GUI_DISABLE)
;~ dann erstellst du Labels an den vorgesehenen Stellen. Diese werden als Buttons verwendet.
;~ Wenn du sie dann an der richtigen Stelle hast, fügst du nach jedem Label ein GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT) ein, damit sie durchsichtig werden.
;~ z.B. so: (Hier fehlt nur das Hintergrundbild :) Und die Ecken sind mit API-Calls abgerundet.


;file:///I|/AutoIt/AM/AMMenuTrans3006.gif ;// 180,215 
$gui = GUICreate("GUI", 180, 215, -1, -1, $WS_POPUP)


GUISetBkColor(0x0000FF) ; sonst dialog-grey
; ??????
; AND HOW TO SET A BACKGROUND IMAGE INSTAED OF BACKGROUND-COLOR 
; ??????
;"AMMenuTrans3006.gif"
; NIX  GUISetState("AMMenuTrans3006.gif")


$labelbutt1 = GUICtrlCreateLabel("",105,20,40,40)
GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT)
$labelbutt2 = GUICtrlCreateLabel("",20,65,40,40)
GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT)
$labelbutt3 = GUICtrlCreateLabel("",65,155,40,40)
GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT)


; folgendes loeschen, um Labels unsichtbar zu machen:
GUICtrlSetBkColor($labelbutt1,0xFFFFFF)
GUICtrlSetBkColor($labelbutt2,0xFFFFFF)
GUICtrlSetBkColor($labelbutt3,0xFFFFFF)
;Ende loeschen


;--- add2
;  :-(
; but with image it no longer move with mouse
;  :-(
$n=GUICtrlCreatePic("AMMenuTrans3006.gif",0,0, 180,215)
; the image in web :: http://a6000000.bplaced.net/AM/AMMenuTrans3003.jpg
;$n=GUICtrlCreatePic("http://a6000000.bplaced.net/AM/AMMenuTrans3003.jpg",0,0, 180,215)
;/---add2


_GUICreateRoundRect($gui, 40,40)


;-----------------add1


; in die Gui erstellung
If Not Isdeclared("WM_LBUTTONDOWN") Then Global Const $WM_LBUTTONDOWN = 0x0201
GUIRegisterMsg($WM_LBUTTONDOWN, "_PrimeDown")
;/-----------------add1
GUISetState() ; maybe here can add a background image ?????? 




#include <GUIConstants.au3>


#region - GUI SelectLoop
While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            Exit
        Case $msg = $labelbutt1
            MsgBox(0, '', "Labelbutt1")
        Case $msg = $labelbutt2
            MsgBox(0, '', "Labelbutt2")
        Case $msg = $labelbutt3
            ;MsgBox(0, '', "Labelbutt3 - Exit")
            Exit
    EndSelect
WEnd
#endregion


Func _GUICreateRoundRect($hwnd, $radx=15,$rady=15)
    $pos = WinGetPos($hwnd)


    $1 = 0
    $2 = 0
    $3 = $pos[2]
    $4 = $pos[3]
    $ret = DllCall("gdi32.dll", "long", "CreateRoundRectRgn", "long", $1, "long", $2, "long", $3, "long", $4,"long",$radx,"long",$rady)




    DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $hwnd, "long", $ret[0], "int", 1)
EndFunc   ;==>_GUICreateRoundRect


Func _end()
    Exit(0)
EndFunc




;----add
;Ans Ende des Skripts:
Func _PrimeDown($hWnd, $Msg, $wParam, $lParam)
    Local $DifX, $DifY, $MouseData = GUIGetCursorInfo($hwnd)
    Local $WinPos = WinGetPos($hwnd)
    Local $MPos = MouseGetPos()


    $DifX = $MPos[0] - $WinPos[0]
    $DifY = $MPos[1] - $WinPos[1]


    While $MouseData[2]
        $MPos = MouseGetPos()
        $WinPos = WinGetPos($hwnd)


        If ($WinPos[0] <> ($MPos[0] - $DifX)) Or ($WinPos[1] <> ($MPos[1] - $DifY)) Then
            WinMove($hwnd, '', $MPos[0] - $DifX, $MPos[1] - $DifY)
        EndIf


        Sleep(15)


        $MouseData = GUIGetCursorInfo($hwnd)
    WEnd
EndFunc
;/-------------add


; so fast super ABER:
; LINE 45::
; mit mein background image geht mouse - move nit und ohne background img geht mousemove , aber es sieht nit so aus :-( 
; wie sollte denn das img eingebunden werden?


;------
;~  .. here it is 50/50 OK , because:


;~  .. without img: line45:
;~ ;$n=GUICtrlCreatePic("AMMenuTrans3006.gif",0,0, 180,215)
;~ all works OK!


;~  .. WITH img: line45:
;~ $n=GUICtrlCreatePic("AMMenuTrans3006.gif",0,0, 180,215)
;~ it is no longer possible to move with the mouse :-(


;~  .. any ideas , how to set the background - image?
;------
</pre>
[/pre]

Alles anzeigen

progandy

Der Hintergrund muss auch als 1. GUI-Element erstellt werden, nicht als leztes.
Wenn du es so machst, sollte es gehen:

[autoit]

$gui = GUICreate("GUI", 180, 215, -1, -1, $WS_POPUP)
GUISetBkColor(0x0000FF) ; sonst dialog-grey
$n=GUICtrlCreatePic("AMMenuTrans3006.gif",0,0, 180,215)
GUICtrlSetState(-1,$GUI_DISABLE)

[/autoit]

a6000000

OK OK! closed!

DANKE , es funzt 8-)

C

;amen3071.au3
;file:///I|/AutoIt/AM/AMMenuTrans3006.gif ;// 180,215 
; the BG-img in web :: http://a6000000.bplaced.net/AM/AMMenuTrans3003.jpg
;; now ok: ; LINE 35 and LINE 36 // nu. add/remove BG img in line 45 with ;comment;nu.


#include <GUIConstants.au3>
HotKeySet("{ESC}", "_end")
HotKeySet(" ", "_end")


;~ http://www.autoit.de/index.php?page=Thread&postID=40266#post40266
;~ Hab ichs richtig verstanden?
;~ Du willst ein Hintergrundbild, auf dem 3 Buttons zu sehen sind. Diese sollen klickbar sein, aber nicht verdeckt werden.
;~ Du setzt also das Bild auf GUISetState($bild,$GUI_DISABLE)
;~ dann erstellst du Labels an den vorgesehenen Stellen. Diese werden als Buttons verwendet.
;~ Wenn du sie dann an der richtigen Stelle hast, fügst du nach jedem Label ein GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT) ein, damit sie durchsichtig werden.
;~ z.B. so: (Hier fehlt nur das Hintergrundbild :) Und die Ecken sind mit API-Calls abgerundet.




;file:///I|/AutoIt/AM/AMMenuTrans3006.gif ;// 180,215 
$gui = GUICreate("GUI", 180, 215, -1, -1, $WS_POPUP)
GUISetBkColor(0x0000FF) ; sonst dialog-grey
; ??????
; AND HOW TO SET A BACKGROUND IMAGE INSTAED OF BACKGROUND-COLOR 
; ??????
;"AMMenuTrans3006.gif"
; NIX  GUISetState("AMMenuTrans3006.gif")
;~ ;-----------------forum Re
;~ ;Der Hintergrund muss auch als 1. GUI-Element erstellt werden, nicht als leztes.
;~ ;Wenn du es so machst, sollte es gehen:
;~ $gui = GUICreate("GUI", 180, 215, -1, -1, $WS_POPUP)
;~ GUISetBkColor(0x0000FF) ; sonst dialog-grey
;~ $n=GUICtrlCreatePic("AMMenuTrans3006.gif",0,0, 180,215)
;~ GUICtrlSetState(-1,$GUI_DISABLE)
;~ ;;/------------------forum re
$n=GUICtrlCreatePic("AMMenuTrans3006.gif",0,0, 180,215)
GUICtrlSetState(-1,$GUI_DISABLE)


$labelbutt1 = GUICtrlCreateLabel("",105,20,60,40)
GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT)
$labelbutt2 = GUICtrlCreateLabel("",20,65,40,40)
GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT)
$labelbutt3 = GUICtrlCreateLabel("",65,155,60,40)
GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT)


;~ ; folgendes loeschen, um Labels unsichtbar zu machen:
;~ GUICtrlSetBkColor($labelbutt1,0xFFFFFF)
;~ GUICtrlSetBkColor($labelbutt2,0xFFFFFF)
;~ GUICtrlSetBkColor($labelbutt3,0xFFFFFF)
;~ ;Ende loeschen


;--- add2
;  :-(
; but with image it no longer move with mouse
;  :-(
;$n=GUICtrlCreatePic("AMMenuTrans3006.gif",0,0, 180,215)
; the image in web :: http://a6000000.bplaced.net/AM/AMMenuTrans3003.jpg
;not used >> see FORUM RE TOP^^  ;;;$n=GUICtrlCreatePic("http://a6000000.bplaced.net/AM/AMMenuTrans3003.jpg",0,0, 180,215)
;/---add2


_GUICreateRoundRect($gui, 40,40)


;-----------------add1


; in die Gui erstellung
If Not Isdeclared("WM_LBUTTONDOWN") Then Global Const $WM_LBUTTONDOWN = 0x0201
GUIRegisterMsg($WM_LBUTTONDOWN, "_PrimeDown")
;/-----------------add1
GUISetState() ; maybe here can add a background image ?????? 




#include <GUIConstants.au3>


#region - GUI SelectLoop
While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            Exit
        Case $msg = $labelbutt1
            MsgBox(0, '', "Labelbutt1")
        Case $msg = $labelbutt2
            MsgBox(0, '', "Labelbutt2")
        Case $msg = $labelbutt3
            ;MsgBox(0, '', "Labelbutt3 - Exit")
            Exit
    EndSelect
WEnd
#endregion


Func _GUICreateRoundRect($hwnd, $radx=15,$rady=15)
    $pos = WinGetPos($hwnd)


    $1 = 0
    $2 = 0
    $3 = $pos[2]
    $4 = $pos[3]
    $ret = DllCall("gdi32.dll", "long", "CreateRoundRectRgn", "long", $1, "long", $2, "long", $3, "long", $4,"long",$radx,"long",$rady)




    DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $hwnd, "long", $ret[0], "int", 1)
EndFunc   ;==>_GUICreateRoundRect


Func _end()
    Exit(0)
EndFunc




;----add
;Ans Ende des Skripts:
Func _PrimeDown($hWnd, $Msg, $wParam, $lParam)
    Local $DifX, $DifY, $MouseData = GUIGetCursorInfo($hwnd)
    Local $WinPos = WinGetPos($hwnd)
    Local $MPos = MouseGetPos()


    $DifX = $MPos[0] - $WinPos[0]
    $DifY = $MPos[1] - $WinPos[1]


    While $MouseData[2]
        $MPos = MouseGetPos()
        $WinPos = WinGetPos($hwnd)


        If ($WinPos[0] <> ($MPos[0] - $DifX)) Or ($WinPos[1] <> ($MPos[1] - $DifY)) Then
            WinMove($hwnd, '', $MPos[0] - $DifX, $MPos[1] - $DifY)
        EndIf


        Sleep(15)


        $MouseData = GUIGetCursorInfo($hwnd)
    WEnd
EndFunc
;/-------------add


; so fast super ABER:
; LINE 45::
;$n=GUICtrlCreatePic("AMMenuTrans3006.gif",0,0, 180,215)
; mit mein background image geht mouse - move nit und ohne background img geht mousemove , aber es sieht nit so aus :-( 
; wie sollte denn das img eingebunden werden?


;------
;~  .. here it is 50/50 OK , because:


;~  .. without img: line45:
;~ ;$n=GUICtrlCreatePic("AMMenuTrans3006.gif",0,0, 180,215)
;~ all works OK!


;~  .. WITH img: line45:
;~ $n=GUICtrlCreatePic("AMMenuTrans3006.gif",0,0, 180,215)
;~ it is no longer possible to move with the mouse :-(


;~  .. any ideas , how to set the background - image?
;------


; now ok: ; LINE 35 and LINE 36
;$n=GUICtrlCreatePic("AMMenuTrans3006.gif",0,0, 180,215)
;GUICtrlSetState(-1,$GUI_DISABLE)

Alles anzeigen

**Greenhorn**

Du kannst das Fenster auch einfacher verschiebbar machen ...
Jedenfalls, wenn Du ein Bild als Hintergrund hast, dann kannst Du es mit '$GUI_WS_EX_PARENTDRAG' machen:

[autoit]

$Pic = GUICtrlCreatePic('', 0, 0, 635, 476, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS), $GUI_WS_EX_PARENTDRAG)

[/autoit]

Gruß
Greenhorn

progandy

Noch zum Schluss: $GUI_WS_EX_PARENTDRAG funzt nicht mit $GUI_DISABLE. Das wird aber benötigt, damit man die "Buttons" noch drücken kann

**Greenhorn**

So geht's ...

Spoiler anzeigen

[autoit]

$hWnd = GUICreate('Mein unsichtbarer GUI Button', 170, 215, -1, -1, $WS_POPUP)
$pic = GUICtrlCreatePic(@ScriptDir & '\AMMenuTrans3003.jpg', 0, 0, 170, 215, -1, $GUI_WS_EX_PARENTDRAG)
GUICtrlSetTip(-1, '... verschieb mich !')
$btnHidRed = GUICtrlCreateLabel('', 68, 160, 35, 35)
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT )
GUICtrlSetState(-1, $GUI_ONTOP)
$btnHidYellow = GUICtrlCreateLabel('', 20, 65, 35, 35)
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT )
GUICtrlSetState(-1, $GUI_ONTOP)
$btnHidBlue = GUICtrlCreateLabel('', 115, 20, 35, 35)
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT )
GUICtrlSetState(-1, $GUI_ONTOP)

[/autoit] [autoit][/autoit] [autoit]

GUISetState()

[/autoit] [autoit][/autoit] [autoit]

While 1

$nMsg = GUIGetMsg()

Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $btnHidRed
MsgBox(0, '', 'Der rote Button wurde gedrückt.')
Exit
Case $btnHidBlue
MsgBox(0, '', 'Der blaue Button wurde gedrückt.', 2)
Case $btnHidYellow
MsgBox(0, '', 'Der gelbe Button wurde gedrückt.', 2)
EndSwitch

WEnd

[/autoit]

Gruß
Greenhorn

a6000000

danke

so siehts aus => geloest 8-)

[ neu ] Bilder in dir DEL > RENAME Bild 1, Bild 2 > in Word je 2 Bilder 10x15 pro Seite mit "Bild 1" , "Bild 2"

.