Hallo zusammen,
hier ist meine Funktion, bzw. mein Include ("PNG_Extender.au3"):
Spoiler anzeigen
#include-once
#include <GDIPlus.au3>
Func GUICtrlCreatePng($src, $top="", $left="")
[/autoit] [autoit][/autoit] [autoit]Local Const $STM_SETIMAGE = 0x0172
[/autoit] [autoit][/autoit] [autoit]Local $Pic = GUICtrlCreatePic("", $left, $top)
[/autoit] [autoit][/autoit] [autoit]_GDIPlus_Startup ()
Local $image = _GDIPlus_ImageLoadFromFile($src)
Local $hBmp = _GDIPlus_BitmapCreateHBITMAPFromBitmap($image)
GUICtrlSendMsg($Pic, $STM_SETIMAGE, 0, $hBmp)
_WinAPI_DeleteObject($hBmp)
_GDIPlus_ImageDispose($image)
_GDIPlus_Shutdown()
Return $Pic
[/autoit] [autoit][/autoit] [autoit]EndFunc
[/autoit]
Und hier ein Beispiel-Skript:
Spoiler anzeigen
#include-once
#include <PNG_Extender.au3>
#include <GUIConstants.au3>
$hMainWindow = GUICreate("Test", 320, 256)
$ok = GUICtrlCreatePng("ok.png", 20, 20)
$cancel = GUICtrlCreatePng("cancel.png", 20, 60)
GUISetState()
;Bilder löschen...
MsgBox("", "", "Bild 1 löschen...")
GUICtrlDelete($ok)
MsgBox("", "", "Bild 2 löschen...")
GUICtrlDelete($cancel)
;Warten auf das Ende
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
GUIDelete()
Exit
EndSelect
Sleep(50)
WEnd
Gruß Trainer