mit
[autoit]MouseGetPos ( [dimension] )
[/autoit]
bekommst du übriegens die position von der Maus raus
mit
[autoit]MouseGetPos ( [dimension] )
[/autoit]
bekommst du übriegens die position von der Maus raus
sieht voll witzig aus
also ich bleibe bei AMD ich werde mir auch bald so einen 8 Kerner holen wenn du ein passendet Mainboard sucht
http://www.gigabyte.at/products/product-page.aspx?pid=3900#
hab ich mir erst vor kurzen gekauft und bin sehr zufreiden damit
Habs auch hienbekommen.
is wirkle cool.
mir fällt leider die <GDIConstants.au3>
wo find ich die?
noch ein kleiner Bug
C:\Users\Martin\Desktop\RPG\DATA\UDF\UDF_Laden.au3 (548) : ==> Variable used without being declared.:
IniWrite(@ScriptDir & "\PLAYER\DATA.ini", "INV", IniRead(@ScriptDir & "\DATA\Laden.ini", "F_NR", $obj_var, ""), "-")
IniWrite(@ScriptDir & "\PLAYER\DATA.ini", "INV", IniRead(@ScriptDir & "\DATA\Laden.ini", "F_NR", ^ ERROR
>Exit code: 1 Time: 14.910
wollte das OIH ändern
Hab einen kleiner Bug gefunden
wenn man mit dem Bott(Floß) immer nach unten schiffert kommt man irgendwann nicht mehr zurück.
Hast du dein Ipod, Iphone, IPad oder was auch immer zu fällig gejailbreakt?
Ich kann dir zwar nicht helfen ob das alles so stimmt
aber ich finds cool
jetzt gehts
edit: es wehre cool wenn das hier im Forum öffters genutzt wird !
Bei mir kommt leider ein Fehler
Voll cool
Danke
is ja mal voll cool
kannste das auch noch machen das das mit oben und unten auch geht?
Wenn man mit nen großen Bildschirm arbeitet (so wie ich) ist das volll gut^^
Edit: hab grade noch einen kleinen Bug gefunden. Wenn man direkt an den Rand geht flackert die Maus.
BOA ist das viel
aber ma im erst wie lange Arbeitest du schon mit Autoit
Und wie viele Scripte sind das?
also
mit dem Beispiel von Fresapore
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
;GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
;Opt("GUIOnEventMode", 1)
$anzeige=0
$ini = IniReadSectionNames ( "progs.ini" )
$h = IniRead ( "config.ini", "config", "top", "20" )
$size = IniRead ( "config.ini", "config", "size", "20" )
$ini[0] += 1
Global $pic[$ini[0]] , $pic1[$ini[0]]
$ini[0] -= 1
$width = @DesktopWidth
$width -=$size
$width1 = @DesktopWidth
$width1 -=$size
$h1 = $size + $h
$gui = GUICreate("", 0, 0,0,0,$WS_POPUP)
$startpicgui= GUICreate("", $size, $size, $width, $h, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $gui)
[/autoit] [autoit][/autoit] [autoit]$startpic = GUICtrlCreatePic("startbutton.gif", 0, 0, $size, $size)
;$cDummy1 = GUICtrlCreateDummy()
For $i = 1 to $ini[0] Step +1
$width -=$size
$pic[$i]= GUICreate("", $size, $size, $width, $h, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $gui)
$pic1[$i] = GUICtrlCreatePic(IniRead ( "progs.ini", $ini[$i], "bild", "default" ), 0, 0,$size,$size)
; GUICtrlSetOnEvent(-1, "_Click")
Next
;$cDummy2 = GUICtrlCreateDummy()
GUISetState(@SW_SHOW,$startpicgui)
While 1
If WinGetTitle("[ACTIVE]") = "Program Manager" Or WinGetTitle("[ACTIVE]") = "" or WinGetTitle ("[ACTIVE]") = "Start" Then
$mousepos = MouseGetPos ()
if ($mousepos[1] >= $h and $mousepos[1] <= $h1 and $mousepos[0] >= $width1) Then
if ($anzeige==0)then
For $i = 1 to $ini[0] Step +1
GUISetState(@SW_SHOW, $pic[$i])
GUIctrlSetState($pic1[$i],$Gui_SHOW )
$anzeige=1
Next
EndIf
Else
if ($anzeige==1) Then
if ($mousepos[1] >= $h and $mousepos[1] <= $h1 and $mousepos[0] >= $width) then
else
For $i = 1 to $ini[0] Step +1
GUISetState(@SW_HIDE, $pic[$i])
GUIctrlSetState($pic1[$i],$Gui_Hide )
$anzeige=0
Next
EndIf
EndIf
endif
EndIf
$nMsg = GUIGetMsg(1)
For $i = 1 to $ini[0] Step +1
If $nMsg[1] = $pic[$i] And $nMsg[0] = $pic1[$i] Then run (IniRead ( "progs.ini", $ini[$i], "pfad", default ))
Next
WEnd
;Func _Click()
; If @GUI_CtrlId > $cDummy1 And @GUI_CtrlId < $cDummy2 Then
; MsgBox(0, "", "Bild Nr.: " & @GUI_CtrlId - $cDummy1 & " wurde geklickt")
; EndIf
;EndFunc ;==>_Click
und hier noch ma mit dem Beispiel von eukalyptus
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
Opt("GUIOnEventMode", 1)
$anzeige=0
$ini = IniReadSectionNames ( "progs.ini" )
$h = IniRead ( "config.ini", "config", "top", "20" )
$size = IniRead ( "config.ini", "config", "size", "20" )
$ini[0] += 1
Global $pic[$ini[0]] , $pic1[$ini[0]]
$ini[0] -= 1
$width = @DesktopWidth
$width -=$size
$width1 = @DesktopWidth
$width1 -=$size
$h1 = $size + $h
$gui = GUICreate("", 0, 0,0,0,$WS_POPUP)
$startpicgui= GUICreate("", $size, $size, $width, $h, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $gui)
[/autoit] [autoit][/autoit] [autoit]$startpic = GUICtrlCreatePic("startbutton.gif", 0, 0, $size, $size)
$cDummy1 = GUICtrlCreateDummy()
For $i = 1 to $ini[0] Step +1
$width -=$size
$pic[$i]= GUICreate("", $size, $size, $width, $h, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $gui)
$pic1[$i] = GUICtrlCreatePic(IniRead ( "progs.ini", $ini[$i], "bild", "default" ), 0, 0,$size,$size)
GUICtrlSetOnEvent(-1, "_Click")
Next
$cDummy2 = GUICtrlCreateDummy()
GUISetState(@SW_SHOW,$startpicgui)
While 1
If WinGetTitle("[ACTIVE]") = "Program Manager" Or WinGetTitle("[ACTIVE]") = "" or WinGetTitle ("[ACTIVE]") = "Start" Then
$mousepos = MouseGetPos ()
if ($mousepos[1] >= $h and $mousepos[1] <= $h1 and $mousepos[0] >= $width1) Then
if ($anzeige==0)then
For $i = 1 to $ini[0] Step +1
GUISetState(@SW_SHOW, $pic[$i])
GUIctrlSetState($pic1[$i],$Gui_SHOW )
$anzeige=1
Next
EndIf
Else
if ($anzeige==1) Then
if ($mousepos[1] >= $h and $mousepos[1] <= $h1 and $mousepos[0] >= $width) then
else
For $i = 1 to $ini[0] Step +1
GUISetState(@SW_HIDE, $pic[$i])
GUIctrlSetState($pic1[$i],$Gui_Hide )
$anzeige=0
Next
EndIf
EndIf
endif
EndIf
;$nMsg = GUIGetMsg(1)
; For $i = 1 to $ini[0] Step +1
; If $nMsg[1] = $pic[$i] And $nMsg[0] = $pic1[$i] Then run (IniRead ( "progs.ini", $ini[$i], "pfad", default ))
; Next
WEnd
Func _Click()
If @GUI_CtrlId > $cDummy1 And @GUI_CtrlId < $cDummy2 Then
MsgBox(0, "", "Bild Nr.: " & @GUI_CtrlId - $cDummy1 & " wurde geklickt")
EndIf
EndFunc ;==>_Click
ich hab bestimmt bloß so einen selten dämlichen Fehler drin den ich einfach nicht finde
ma sehen ob du helfen kannst
PS: es das erst bild geht nicht habe ich grad rausgefunden aber der rest geht komischer weise
sehr cool
nur ein paar mehr Datei Formate müsste es unterstützen
ich bekomme es blos hin das das letzte ertstellte bild funktioniert die anderen gehen einfach nicht
deins geht fast perfeckt nur man muss fast immer mehrmals klicken damit es reagiert ist natürlich auch nicht das gelbe vom ei
Ich danke euch wirkle für eure Hilfe
Aber ich glaube ich brauch noch mehr Hilfe
ich glaube ich habs leider nicht verstanden
endweden bin ich zu dumm oder es geht wirkle nicht
habt ihr vllt noch ein paar vorschläge
oder könntet ihr mir das einbauen ?
Hey ,
ich hab da ma wieder nen problem und zwar.
Ich weiß garne wie ich das richtig beschreiben soll.
erstma Quellcode
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$anzeige=0
$ini = IniReadSectionNames ( "progs.ini" )
$h = IniRead ( "config.ini", "config", "top", "20" )
$size = IniRead ( "config.ini", "config", "size", "20" )
$ini[0] += 1
Global $pic[$ini[0]] , $pic1[$ini[0]]
$ini[0] -= 1
$width = @DesktopWidth
$width -=$size
$width1 = @DesktopWidth
$width1 -=$size
$h1 = $size + $h
;MsgBox (0,0,$ini[1])
$gui = GUICreate("", 0, 0,0,0,$WS_POPUP)
[/autoit] [autoit][/autoit] [autoit]$startpicgui= GUICreate("", $size, $size, $width, $h, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $gui)
$startpic = GUICtrlCreatePic("startbutton.gif", 0, 0, $size, $size)
For $i = 1 to $ini[0] Step +1
$width -=$size
$pic[$i]= GUICreate("", $size, $size, $width, $h, $WS_POPUP, $WS_EX_MDICHILD, $gui)
$pic1[$i] = GUICtrlCreatePic(IniRead ( "progs.ini", $ini[$i], "bild", "default" ), 0, 0,$size,$size)
Next
GUISetState(@SW_SHOW,$startpicgui)
While 1
If WinGetTitle("[ACTIVE]") = "Program Manager" Or WinGetTitle("[ACTIVE]") = "" or WinGetTitle ("[ACTIVE]") = "Start" Then
$mousepos = MouseGetPos ()
if ($mousepos[1] >= $h and $mousepos[1] <= $h1 and $mousepos[0] >= $width1) Then
if ($anzeige==0)then
For $i = 1 to $ini[0] Step +1
GUISetState(@SW_SHOW, $pic[$i])
GUIctrlSetState($pic1[$i],$Gui_SHOW )
$anzeige=1
Next
EndIf
Else
if ($anzeige==1) Then
if ($mousepos[1] >= $h and $mousepos[1] <= $h1 and $mousepos[0] >= $width) then
else
For $i = 1 to $ini[0] Step +1
GUISetState(@SW_HIDE, $pic[$i])
GUIctrlSetState($pic1[$i],$Gui_Hide )
$anzeige=0
Next
EndIf
EndIf
endif
EndIf
$nMsg = GUIGetMsg()
;AB HIER
Switch $nMsg
For $i = 1 to $ini[0] Step +1
case $pic[$i]
run (IniRead ( "progs.ini", $ini[$i], "pfad", default )
Next
EndSwitch
;HIER ENDE
Sleep (10)
WEnd
Ich muss halt wissen ob das Bild geklickt wurde oder nicht.
ich hab versucht das case so zu erstellen
[autoit]
For $i = 1 to $ini[0] Step +1
case $pic[$i]
run (IniRead ( "progs.ini", $ini[$i], "pfad", default )
Next
aber das geht leider nicht
hat jemannd vllt noch ne idee
bilder uns so sind im anhang
Gruß Nitrama
Du musst "F11" drücken