Beiträge von Jam00

C:\Dokumente und Einstellungen\Hendrik\Favoriten\Eigene Dateien\AutoIt\Übungen\DLL Verwenden.au3(23,23) : ERROR: _GDIPlus_Startup(): undefined function.
_GDIPlus_Startup ()
~~~~~~~~~~~~~~~~~~~~~~^
C:\Dokumente und Einstellungen\Hendrik\Favoriten\Eigene Dateien\AutoIt\Übungen\DLL Verwenden.au3(24,60) : ERROR: _GDIPlus_BitmapCreateFromHBITMAP(): undefined function.
Local $hBitmap = _GDIPlus_BitmapCreateFromHBITMAP($hBMP)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Dokumente und Einstellungen\Hendrik\Favoriten\Eigene Dateien\AutoIt\Übungen\DLL Verwenden.au3(25,60) : ERROR: _GDIPlus_GraphicsCreateFromHWND(): undefined function.
Local $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGUI)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Dokumente und Einstellungen\Hendrik\Favoriten\Eigene Dateien\AutoIt\Übungen\DLL Verwenden.au3(26,59) : ERROR: _GDIPlus_GraphicsDrawImage(): undefined function.
_GDIPlus_GraphicsDrawImage($hGraphic, $hBitmap, $X, $Y)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Dokumente und Einstellungen\Hendrik\Favoriten\Eigene Dateien\AutoIt\Übungen\DLL Verwenden.au3(27,39) : ERROR: _GDIPlus_GraphicsDispose(): undefined function.
_GDIPlus_GraphicsDispose($hGraphic)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Dokumente und Einstellungen\Hendrik\Favoriten\Eigene Dateien\AutoIt\Übungen\DLL Verwenden.au3(28,35) : ERROR: _GDIPlus_ImageDispose(): undefined function.
_GDIPlus_ImageDispose($hBitmap)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Dokumente und Einstellungen\Hendrik\Favoriten\Eigene Dateien\AutoIt\Übungen\DLL Verwenden.au3(29,23) : ERROR: _GDIPlus_ShutDown(): undefined function.
_GDIPlus_ShutDown()
~~~~~~~~~~~~~~~~~~~~~~^
C:\Dokumente und Einstellungen\Hendrik\Favoriten\Eigene Dateien\AutoIt\Übungen\DLL Verwenden.au3 - 7 error(s), 0 warning(s)

#NoTrayIcon
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

Opt("WinTitleMatchMode", 4)
$taskbar_pos = WinGetPos("classname=Shell_TrayWnd")
$taskbar_pos = $taskbar_pos[3]

#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Hendrik\Favoriten\Eigene Dateien\AutoIt\INC\Benutzeroberfläche\MsgBox.kxf
$MsgBox = GUICreate("", 250, 150,@DesktopWidth -250, @DesktopHeight -150 - $taskbar_pos, BitOR($WS_SYSMENU,$WS_POPUP),$WS_EX_TOPMOST , $WS_EX_TOOLWINDOW)
GUISetBkColor(0x21FE00)
$MBSenden = GUICtrlCreateButton("MBSenden", 225, 108, 18, 13, 0)
GUICtrlSetState(-1, $GUI_HIDE)
$MBClose = GUICtrlCreateButton("X", 231, 3, 15, 15, 0,$BS_Bitmap)
GUICtrlSetImage(-1,@ScriptDir & "\Pic\Close.bmp", 0)
;~ GUICtrlSetFont(-1, 10, 400, 0, "Arial")
;~ GUICtrlSetColor(-1, 0xFF0000)
$MBNachrichtSenden = GUICtrlCreateInput("", 12, 129, 226, 17, -1, 0)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$MBNachricht = GUICtrlCreateEdit("", 3, 34, 242, 89, $ES_ReadOnly, 0)
GUICtrlSetData(-1, "MsgBoxNachricht")
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1,0x21FE00)
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $MsgBox, "int", 400, "long", 0x00040008);Slide von unten ein
Dim $Form2_AccelTable[2][2] = [["{ENTER}", $MBSenden],["{ESC}", $MBClose]]
GUISetAccelerators($Form2_AccelTable)
$MBHintergrund = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Hendrik\Favoriten\Eigene Dateien\AutoIt\INC\Pic\MsgBox.gif", 0, 0, 250, 150, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

$sec = @sec +10
While 1
$MBNachrichtSendenRead = GUICtrlRead ($MBNachrichtSenden)
If $sec <= @SEC Then
$sec = @sec +10
If $MBNachrichtSendenRead = "" Then _MBClose()
EndIf
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
_MBClose()
Case $MBClose
_MBClose()
Case $MBSenden
GUICtrlSetData ($MBNachrichtSenden,"")
Sleep (100)
EndSwitch
WEnd
Func _MBClose ()
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $MsgBox, "int", 500, "long", 0x00050004);Slide nach unten aus
;~ GUISetState (@SW_HIDE)
Exit
EndFunc