You last visited: Today at 11:53
Advertisement
GUIGetMsg() Problem
Discussion on GUIGetMsg() Problem within the AutoIt forum part of the Coders Den category.
05/14/2010, 17:18
#16
elite*gold: 964
Join Date: Mar 2008
Posts: 2,634
Received Thanks: 1,637
Sorce erneuert. Bitte nochmals Testen danke
PHP Code:
#include <GUIConstantsEx.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>
Opt ( "GUIOnEventMode" , 1 )
$Form1 = GUICreate ( "Form1" , 624 , 442 , 207 , 167 , $WS_POPUP , BitOR ( $WS_EX_TOPMOST , $WS_EX_LAYERED ))
$pic1 = GUICtrlCreatePic ( "C:\Dokumente und Einstellungen\Marius\Eigene Dateien\Eigene Bilder\ddugoöud.bmp" , - 1 , - 1 , 625 , 443 , - 1 , $GUI_WS_EX_PARENTDRAG )
$pic2 = GUICtrlCreatePic ( "C:\Dokumente und Einstellungen\Marius\Eigene Dateien\Eigene Bilder\piece.bmp" , - 1 , - 1 , 79 , 84 )
GUISetState (@ SW_SHOW )
HotKeySet ( "{ESC}" , "_esc" )
While 1
$k = GUIGetMsg ()
If $k = $GUI_EVENT_CLOSE Then Exit
If $k = $pic2 Then Exit
WEnd
Func _esc ()
Exit
EndFunc
#EDIT
Alte Include Raus neue rein: (Ist viel einfacher und von MarcoPolo)
PHP Code:
; #INDEX# =======================================================================================================================
; Title .........: GuiRounder
; AutoIt Version : 3.2.8 ++
; Sprache : Deutsch
; Beschreibung ...: Lässt ein GUI rund machen
; Author ........: MarcoPolo ( www . MarcoPoloHomePage .************** )
; ===============================================================================================================================
; #FUNCS# =====================================================================================================================
; _ClipBoard_ChangeChain
; ===============================================================================================================================
; #FUNCTION# ====================================================================================================================
; Name ...........: _GUIRoundIt
; Beschreibung ...: Rundet das Angesprochene GUI
; Syntax .........: _GUIRoundIt ( $hwnd , $radx , $rady )
; Parameters ....: $hwnd - GuiHandle ( $hwnd = WinGetHandle ( " $GuiTitel " ) ) oder ( $hwnd = GuiCreate ( ... ) )
; $radx - Radius in X Koord ( normal 15 )
; $rady - Radius in Y Koord ( normal 15 )
; Author ........: MarcoPolo
; Example ........: $hwnd = GUICreate ( "GUI" , 100 , 100 , 100 , 100 , - 1 , $WS_EX_TOPMOST )
; _GUICreateRoundRect ( $hwnd , 15 , 15 )
;
; ===============================================================================================================================
Func _GUIRoundIt ( $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 ;==> _GUIRoundIt
Attached Files
GUIRoundIt.rar
(699 Bytes, 1 views)
05/14/2010, 17:26
#17
elite*gold: 77
Join Date: May 2008
Posts: 5,430
Received Thanks: 5,878
Quote:
Originally Posted by
FooFightah
OK, dann such du mal^^
Aber leider klappts immernoch nicht. Außer die Switch Combi in ne If Combo zu ändern haste ja auch nix gemacht
Ich hab irgendwie das Gefühl, dass man GUIGetMsg, $pic2 und $GUI_EVENT_PRIMARYDOWN/$GUI_EVENT_PRIMARYUP
zusammenbringen muss, aber wie?
PHP Code:
#include <GUIConstantsEx.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
;~ Opt ( "GUIOnEventMode" , 1 )
HotKeySet ( "{ESC}" , "_esc" )
$Form1 = GUICreate ( "Form1" , 624 , 442 , 207 , 167 , $WS_POPUP , BitOR ( $WS_EX_TOPMOST , $WS_EX_LAYERED ))
$pic1 = GUICtrlCreatePic ( "C:\Dokumente und Einstellungen\Marius\Eigene Dateien\Eigene Bilder\ddugoöud.bmp" , - 1 , - 1 , 625 , 443 , $GUI_Disable , $GUI_WS_EX_PARENTDRAG )
$pic2 = GUICtrlCreatePic ( "C:\Dokumente und Einstellungen\Marius\Eigene Dateien\Eigene Bilder\piece.bmp" , - 1 , - 1 , 79 , 84 , BitOR ( $SS_NOTIFY , $WS_GROUP , $WS_CLIPSIBLINGS , $GUI_ONTOP ), $GUI_WS_EX_PARENTDRAG )
GUISetState (@ SW_SHOW )
While 1
$k = GUIGetMsg ()
If $k = $GUI_EVENT_CLOSE Then Exit
If $k = $pic2 Then Exit
WEnd
Func _esc ()
Exit
EndFunc
So gehts .
Btw . Warum setzt du GUIOnEvent auf 1 wenn du sowieso nicht damit arbeitest ?
05/14/2010, 17:28
#18
elite*gold: 964
Join Date: Mar 2008
Posts: 2,634
Received Thanks: 1,637
Habe ich net auf 1 gestezt O.o das warst du ^-^
Kannst es gerne löschen.
Greatz Benhero
05/14/2010, 17:32
#19
elite*gold: 77
Join Date: May 2008
Posts: 5,430
Received Thanks: 5,878
Quote:
Originally Posted by
Benhero
Habe ich net auf 1 gestezt O.o das warst du ^-^
Kannst es gerne löschen.
Greatz Benhero
Ahso du hast es nicht auf 1 gesetzt und deswegen ist es in deinem Post auch auf 1 ? Logisch ? ^^
Ist ja kein Problem , dachte nur , dass es einen tieferen Sinn hat
05/14/2010, 17:35
#20
elite*gold: 20
Join Date: Dec 2009
Posts: 1,850
Received Thanks: 484
Nope Shadow, das klappt nicht.
Wenn ich das Programm jetzt starte, kann ich es nichtmehr verschieben und das Kreuz sieht man nichtmehr.
05/14/2010, 17:37
#21
elite*gold: 77
Join Date: May 2008
Posts: 5,430
Received Thanks: 5,878
Quote:
Originally Posted by
FooFightah
Nope Shadow, das klappt nicht.
Wenn ich das Programm jetzt starte, kann ich es nichtmehr verschieben und das Kreuz sieht man nichtmehr.
Wenigstens kannste es beenden
05/14/2010, 17:39
#22
elite*gold: 20
Join Date: Dec 2009
Posts: 1,850
Received Thanks: 484
Quote:
Originally Posted by
Shadow992
Wenigstens kannste es beenden
Ich glaub du hast mich falsch verstanden^^
Ich kann die GUI nicht verschieben und das rote Kreuz sieht man nicht,
also kann ich sie auch nicht schlißen, außer ich drück auf ESC.
€dit: OK, hab einfach die normalen Styles vom Kreuz weggemacht und jetzt klappts
€dit2: Aber jetzt kann ich die GUI nichtmehr verschieben D:
Similar Threads
GuiGetMsg() registriert nicht alle Ereignisse
04/20/2010 - AutoIt - 10 Replies
Habe gerade das Problem das mein Bot eigenartigerweise auf einmal bei 6 Inputfelder nicht nicht mehr richtig auf seine Ereignisse reagiert. Das bedeutet manchmal erkennt er das Ereignis auf eine Veränderung im Inputfeld manchmal nicht.
Ich lese momentan die GUIGetMsg() aus und die bekommt leider nicht alles mit, alle anderen GUIElemente funktionieren einwandfrei.
Hier ein Auszug (vielleicht burnt mir heut schon zu sehr der Kopf und bin einfach blind)
...
$Input1 = GUICtrlCreateInput("0",...
[Problem] Problem with server starting - cannot find quest index for PaxHeader
12/22/2009 - Metin2 Private Server - 1 Replies
Hello!
I have this same problem as here when i'm starting my server:
http://www.elitepvpers.com/forum/metin2-pserver-di scussions-questions/307143-metin2-serverfiles-ques t-index-fehler.html
But I didn't know the answer.. how to repair this?
Greetings
All times are GMT +1. The time now is 11:53 .