hi
warum sieht man bei folgendem code die punkte nicht? oder wie griegt man sie über das bild?
Spoiler anzeigen
#include <GUIConstants.au3>
#include <Misc.au3>
Local $Label5, $Label6, $example
#Region ### START Koda GUI section ### Form=D:\desktop\autoit\mama projekt\AForm1.kxf
$Form1_1 = GUICreate("AForm1", 650, 500, 193, 115, BitOR($WS_SYSMENU,$WS_CAPTION,$WS_POPUPWINDOW,$WS_TABSTOP,$WS_BORDER,$WS_CLIPSIBLINGS))
$Group1 = GUICtrlCreateGroup("Map", 16, 8, 601, 313)
$Pic1 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\All Users\Dokumente\Eigene Bilder\Beispielbilder\Sonnenuntergang.jpg", 32, 24, 577, 289, BitOR($SS_NOTIFY,$WS_GROUP))
GUICtrlSetState($Pic1, $GUI_DISABLE)
$Label5 = GUICtrlCreateGraphic(100, 40, 10, 10);, -1, -1,$SS_CENTERIMAGE) ;Eine verschiebbare Grafik
GUICtrlSetCursor(-1, 0) ;Setzt einen Cursor über der Control
GUICtrlSetGraphic(-1, $GUI_GR_COLOR, 0x000000, 0xffffff) ;Farben der folgenden Ellipse (oder in diesem Fall ein Kreis)
GUICtrlSetGraphic(-1, $GUI_GR_ELLIPSE, 0, 0, 10, 10) ;Setzt einen Punkt als Grafik
$Label6 = GUICtrlCreateGraphic(100, 60, 10, 10);, -1, -1,$SS_CENTERIMAGE) ;Eine verschiebbare Grafik
GUICtrlSetCursor(-1, 0) ;Setzt einen Cursor über der Control
GUICtrlSetGraphic(-1, $GUI_GR_COLOR, 0x000000, 0xffffff) ;Farben der folgenden Ellipse (oder in diesem Fall ein Kreis)
GUICtrlSetGraphic(-1, $GUI_GR_ELLIPSE, 0, 0, 10, 10) ;Setzt einen Punkt als Grafik
GUICtrlSetState($Pic1, $GUI_DISABLE)
[/autoit] [autoit][/autoit] [autoit]GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Legende", 16, 336, 601, 97)
$Label1 = GUICtrlCreateLabel("Bad Homburger Intensivklinik", 40, 360, 142, 17)
$Label2 = GUICtrlCreateLabel("Frankfurter Uni Klinik", 40, 384, 102, 17)
$Label3 = GUICtrlCreateLabel("1", 24, 360, 10, 17)
$Label4 = GUICtrlCreateLabel("2", 24, 384, 10, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Label5
$coords = WinGetPos($Form1_1) ;Auslesen der Fensterposition für _MouseTrap
_MouseTrap($coords[0], $coords[1] + 27, $coords[0] + $coords[2], $coords[1] + $coords[3]) ;Begrenzt den Cursor auf die GUI
Do
$a = GUIGetCursorInfo() ;Cursorposition auslesen
GUICtrlSetPos($Label5, $a[0] - 10, $a[1] - 10);Die Position der Control an Cursorposition anpassen
Until $a[2] = 0
Case $Label6
$coords = WinGetPos($Form1_1) ;Auslesen der Fensterposition für _MouseTrap
_MouseTrap($coords[0], $coords[1] + 27, $coords[0] + $coords[2], $coords[1] + $coords[3]) ;Begrenzt den Cursor auf die GUI
Do
$a = GUIGetCursorInfo() ;Cursorposition auslesen
GUICtrlSetPos($Label6, $a[0] - 10, $a[1] - 10);Die Position der Control an Cursorposition anpassen
Until $a[2] = 0
EndSwitch
WEnd
mfg bjoerni