Bild anzeigen & tauschen

[autoit]

#include<Misc.au3>
#include<WindowsConstants.au3>
#include <GUIConstantsEx.au3>

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

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]]

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

HotKeySet("!e", '_ende')

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

While True
If _IsPressed('01') Then
$i += 1
_showPic($i)
EndIf
Sleep(100)
WEnd

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

Func _ende()
Exit
EndFunc

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

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

[/autoit]

[autoit]

#include <Misc.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>

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

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]]

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

$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')

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

While True
Sleep(100)
WEnd

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

Func _ende()
Exit
EndFunc

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

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

[/autoit]