Hallo.
Ich möchte gerne das nur ein Bild, ohne Gui angezeigt wird und auf Maus-Klick (li. Seite) das nächste Bild angezeigt wird.
Nach dem 12-ten Bild dann Exit.
Geht das eigentlich und wenn wie?
Grusssssss, Crazy-A.
Hallo.
Ich möchte gerne das nur ein Bild, ohne Gui angezeigt wird und auf Maus-Klick (li. Seite) das nächste Bild angezeigt wird.
Nach dem 12-ten Bild dann Exit.
Geht das eigentlich und wenn wie?
Grusssssss, Crazy-A.
Hi,
hier mal eine Lösungsvariante:
#include<Misc.au3>
#include<WindowsConstants.au3>
#include <GUIConstantsEx.au3>
Opt("GUIOnEventMode", 1)
Global $i = -1, $gui = 0, $pic[5][3] = [ _
[@Systemdir & "\oobe\images\merlin.gif",150,180], _
[@SystemDir & "\oobe\images\mslogo.jpg",255,40], _
[@Systemdir & "\oobe\images\hand1.gif",105,121], _
[@Systemdir & "\oobe\images\monitor2.gif",345,232], _
[@Systemdir & "\oobe\images\prodkey.gif",205,35]]
HotKeySet("!e", '_ende')
[/autoit] [autoit][/autoit] [autoit]While True
If _IsPressed('01') Then
$i += 1
_showPic($i)
EndIf
Sleep(100)
WEnd
Func _ende()
Exit
EndFunc
Func _showPic($Indx)
If $Indx < UBound($pic) Then
If $gui <> 0 Then GUIDelete($gui)
$gui = GUICreate('', $pic[$Indx][1], $pic[$Indx][2], -1, -1, $WS_POPUP, $WS_EX_TOPMOST)
GUICtrlCreatePic($pic[$Indx][0], 0, 0,$pic[$Indx][1], $pic[$Indx][2])
GUISetState()
Else
Exit
EndIf
EndFunc
Ich hätte da noch eine andere Variante:
#include <Misc.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
Opt("GUIOnEventMode", 1)
Global $i = 0, $gui = 0, $pic[5][3] = [ _
[@Systemdir & "\oobe\images\merlin.gif",150,180], _
[@SystemDir & "\oobe\images\mslogo.jpg",255,40], _
[@Systemdir & "\oobe\images\hand1.gif",105,121], _
[@Systemdir & "\oobe\images\monitor2.gif",345,232], _
[@Systemdir & "\oobe\images\prodkey.gif",205,35]]
$gui = GUICreate("Show", $pic[$i][1], $pic[$i][2], -1, -1, $WS_POPUP, $WS_EX_TOPMOST)
$gui_pic = GUICtrlCreatePic($pic[$i][0], 0, 0,$pic[$i][1], $pic[$i][2])
GUICtrlSetOnEvent(-1, "_showPic")
GUISetState()
HotKeySet("!e", '_ende')
While True
Sleep(100)
WEnd
Func _ende()
Exit
EndFunc
Func _showPic()
$i += 1
If $i = UBound($pic) Then Exit
WinMove("Show", "", @DesktopWidth/2-Int($pic[$i][1]/2), @DesktopHeight/2-Int($pic[$i][2]/2), $pic[$i][1], $pic[$i][2])
GUICtrlSetPos($gui_pic, 0, 0,$pic[$i][1], $pic[$i][2])
GUICtrlSetImage($gui_pic, $pic[$i][0])
EndFunc
Danke Danke.
Super LSg's
LG, Crazy-A(Lina).