GUI-Fenster aktualisieren

SchrotterCh

Wann ich die größe des fensters ändere hängt es bzw die anzeigen (zb. uhr bleibt dort und ist noch mal an einer 2ten stelle

Spoiler anzeigen

[autoit]

--EDIT--
Wann du das hier siehst bist du heiß auf meinen code xD

[/autoit]

**Schnitzel**

hab paar kleine änderungen vorgenommen:
1. Opt auf die zwingenden verringert (alle anderen Optionen die du hattest waren default)
2. Bitand bei guicreate eingefügt
3. Quellcode übersichtlicher gemacht (man könnte auch sagen ich hab ihn lesbar gemacht )

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
#Include <Timers.au3>
#include <Date.au3>
#Include <GuiStatusBar.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

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

HotKeySet ("{F5}", "_button")
HotKeySet ("{ESC}", "_exit")

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

Opt ("TrayAutoPause",0)
Opt ("TrayIconDebug", 0)
Opt ("TrayMenuMode",1)
Opt ("WinSearchChildren", 1)

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

Global $Secs, $Mins, $Hour, $Time

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

$gui00001 = GUICreate ("GUI", -1, -1, -1, -1, BitAND($WS_MAXIMIZEBOX, $WS_MINIMIZEBOX, $WS_SIZEBOX, $WS_SYSMENU, $WS_CAPTION))
GUISetCursor (3)
GUISetBkColor (0x000000)
GUISetState (@SW_SHOW, $gui00001)

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

_GUICtrlStatusBar_Create($gui00001)
_GUICtrlStatusBar_GetHeight($gui00001)

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

$iconmenu0001 = TrayCreateItem ("GUI-Fenster schließen")
$iconmenu0002 = TrayCreateItem ("GUI-Fenster öffnen")
TrayCreateItem ("")
$iconmenu0003 = TrayCreateItem ("Information")
$iconmenu0004 = TrayCreateItem ("Information")
$iconmenu0005 = TrayCreateItem ("Information")
$iconmenu0006 = TrayCreateItem ("Information")
TrayCreateItem ("")
$iconmenu0007 = TrayCreateItem ("Info")
TrayCreateItem ("")
$iconmenu0008 = TrayCreateItem ("Pause")
$iconmenu0009 = TrayCreateItem ("Exit")

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

$0001_0001 = _Timer_SetTimer($gui00001, 1000, "_information0001", -1)
$0002_0001 = _NowCalc ()

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

Send ("{F5}")

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

Func _button ()
While True
$tmsg = TrayGetMsg()
Switch $tmsg
Case $iconmenu0001
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0002
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0003
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0004
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0005
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0006
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0007
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0008
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0009
MsgBox (64, "Fehler", _exit ())
EndSwitch
WEnd
EndFunc

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

Func _information0001 ($hWnd, $Msg, $0001_0001, $dwTime)
GUICtrlCreateLabel ("Uhrzeit:", 4, 4, 40, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFF00)
GUICtrlCreateLabel (@HOUR & ":" & @MIN & ":" & @SEC, 44, 4, 50, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFFFF)
GUICtrlCreateLabel ("Datum:", 104, 4, 40, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFF00)
GUICtrlCreateLabel (@MDAY & "." & @MON & "." & @YEAR, 144, 4, 60, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFFFF)
GUICtrlCreateLabel ("Jahrestag:", 214, 4, 60, 13)
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFF00)
GUICtrlCreateLabel (@YDAY, 274, 4, 20, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFFFF)
GUICtrlCreateLabel ("Laufzeit:", 304, 4 , 40, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFF00)
$0002_0002 = _DateDiff('s', $0002_0001 , _NowCalc ())
$0002_0003 = StringFormat("%.02d" & ":" & "%.02d" & ":" & "%.02d", Floor($0002_0002 / 3600), Mod(($0002_0002 / 60),60), $0002_0002 - Floor($0002_0002 / 60) * 60)
GUICtrlCreateLabel ($0002_0003, 350, 4 , 150, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1,0xFFFFFF)
EndFunc

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

Func _exit ()
Exit
EndFunc

[/autoit]

SchrotterCh

thx aber jetzt lässt sich eben die größe des fensters nicht mehr ändern xD

und hatte mit absicht alle opt drinnen weil ich eine vorlage habe mit allem drinnen und naja da stell ich dann einfach die zahl um wann ich was anders habe

**Andy**

so gehts, die Kommentare sollten zeigen woran es lag^^

Spoiler anzeigen

[autoit]

HotKeySet ("{F5}", "_button")
HotKeySet ("{ESC}", "_exit")

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

#include <GUIConstantsEx.au3>
#Include <Timers.au3>
#include <Date.au3>
#Include <GuiStatusBar.au3>
#include <StaticConstants.au3>
#include <DateTimeConstants.au3>
#include <WindowsConstants.au3>

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

Opt ("CaretCoordMode", 1)
Opt ("ExpandEnvStrings", 0)
Opt ("ExpandVarStrings", 0)
Opt ("FtpBinaryMode", 1)
Opt ("GUICloseOnESC", 1)
Opt ("GUICoordMode", 1)
Opt ("GUIDataSeparatorChar","|")
Opt ("GUIOnEventMode", 0)
Opt ("GUIResizeMode", 0)
Opt ("GUIEventOptions",0)
Opt ("MouseClickDelay", 10)
Opt ("MouseClickDownDelay", 10)
Opt ("MouseClickDragDelay", 250)
Opt ("MouseCoordMode", 1)
Opt ("MustDeclareVars", 0)
Opt ("OnExitFunc","OnAutoItExit")
Opt ("PixelCoordMode", 1)
Opt ("SendAttachMode", 0)
Opt ("SendCapslockMode", 1)
Opt ("SendKeyDelay", 5)
Opt ("SendKeyDownDelay", 5)
Opt ("TCPTimeout",100)
Opt ("TrayAutoPause",0)
Opt ("TrayIconDebug", 0)
Opt ("TrayIconHide", 0)
Opt ("TrayMenuMode",1)
Opt ("TrayOnEventMode",0)
Opt ("WinDetectHiddenText", 0)
Opt ("WinSearchChildren", 1)
Opt ("WinTextMatchMode", 1)
Opt ("WinTitleMatchMode", 1)
Opt ("WinWaitDelay", 250)

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

; FileInstall

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

$gui00001 = GUICreate ("GUI", -1, -1, -1, -1, $WS_MAXIMIZEBOX + $WS_MINIMIZEBOX + $WS_SIZEBOX + $WS_SYSMENU + $WS_CAPTION)
GUISetCursor (3)
GUISetBkColor (0x000000)
GUISetState (@SW_SHOW, $gui00001)

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

$hstatus=_GUICtrlStatusBar_Create($gui00001)
_GUICtrlStatusBar_GetHeight($gui00001)

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

GUICtrlCreateLabel ("Uhrzeit:", 4, 4, 40, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFF00)
$time=GUICtrlCreateLabel ("", 44, 4, 50, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFFFF)
GUICtrlCreateLabel ("Datum:", 104, 4, 40, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFF00)
GUICtrlCreateLabel (@MDAY & "." & @MON & "." & @YEAR, 144, 4, 60, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFFFF)
GUICtrlCreateLabel ("Jahrestag:", 214, 4, 60, 13)
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFF00)
GUICtrlCreateLabel (@YDAY, 274, 4, 20, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFFFF)
GUICtrlCreateLabel ("Laufzeit:", 304, 4 , 40, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFF00)

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

$laufzeit=GUICtrlCreateLabel ("", 350, 4 , 150, 13)
GUICtrlSetBkColor (-1, 0x000000)
GUICtrlSetColor (-1, 0xFFFFFF)

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

GUIRegisterMsg($WM_SIZE, "WM_SIZE") ;wenn fenster vergrössert wird, statusbar anpassen

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

Global $Secs, $Mins, $Hour, $Time

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

; GUICtrlCreateButton

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

$iconmenu0001 = TrayCreateItem ("GUI-Fenster schließen")
$iconmenu0002 = TrayCreateItem ("GUI-Fenster öffnen")
TrayCreateItem ("")
$iconmenu0003 = TrayCreateItem ("Information")
$iconmenu0004 = TrayCreateItem ("Information")
$iconmenu0005 = TrayCreateItem ("Information")
$iconmenu0006 = TrayCreateItem ("Information")
TrayCreateItem ("")
$iconmenu0007 = TrayCreateItem ("Info")
TrayCreateItem ("")
$iconmenu0008 = TrayCreateItem ("Pause")
$iconmenu0009 = TrayCreateItem ("Exit")

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

$0001_0001 = _Timer_SetTimer($gui00001, 1000, "_information0001", -1)
$0002_0001 = _NowCalc ()

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

Send ("{F5}")

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

Func _button ()
While True
$tmsg = TrayGetMsg()
Switch $tmsg
Case $iconmenu0001
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0002
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0003
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0004
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0005
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0006
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0007
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0008
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0009
MsgBox (64, "Fehler", _exit ())
EndSwitch
WEnd
EndFunc

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

Func _information0001 ($hWnd, $Msg, $0001_0001, $dwTime)

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

$0002_0002 = _DateDiff('s', $0002_0001 , _NowCalc ())
$0002_0003 = StringFormat("%.02d" & ":" & "%.02d" & ":" & "%.02d", Floor($0002_0002 / 3600), Mod(($0002_0002 / 60),60), $0002_0002 - Floor($0002_0002 / 60) * 60)
GUICtrlsetdata ($laufzeit,$0002_0003)
GUICtrlsetdata ($time,@HOUR & ":" & @MIN & ":" & @SEC)
;Datum und Jahrestag noch aktualisieren!

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

EndFunc

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

Func _exit ()
Exit
EndFunc

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

Func WM_SIZE($hWnd, $iMsg, $iwParam, $ilParam)
_GUICtrlStatusBar_Resize($hStatus) ;bewirkt, daß sich die statusbar der grössenänderung des Fensters anpasst
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_SIZE

[/autoit]

**autoBert**

Hallo SchrotterCh,

hab dir auch eine Lösung gebastelt (weitgehend identisch mit Andy

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
#include <Timers.au3>
#include <Date.au3>
#include <GuiStatusBar.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

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

;HotKeySet ("{F5}", "_button")
HotKeySet("{ESC}", "_exit")

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

Opt("TrayAutoPause", 0)
Opt("TrayIconDebug", 0)
Opt("TrayMenuMode", 1)
Opt("WinSearchChildren", 1)

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

Global $Secs, $Mins, $Hour, $Time
Global $hTime, $hDate, $hYDay, $hRSince, $hStatus ;<Variablen für Control-ID's

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

$hGui = GUICreate("GUI", -1, -1, -1, -1, $WS_MAXIMIZEBOX + $WS_MINIMIZEBOX + $WS_SIZEBOX + $WS_SYSMENU + $WS_CAPTION)
GUISetCursor(3)
GUISetBkColor(0x000000)
GUICtrlCreateLabel("Uhrzeit:", 4, 4, 40, 13)
GUICtrlSetResizing(-1, BitOR($GUI_DOCKLEFT, $GUI_DOCKTOP, $GUI_DOCKWIDTH, $GUI_DOCKHEIGHT))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFF00)
$hTime = GUICtrlCreateLabel("", 44, 4, 50, 13)
GUICtrlSetResizing(-1, BitOR($GUI_DOCKLEFT, $GUI_DOCKTOP, $GUI_DOCKWIDTH, $GUI_DOCKHEIGHT))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlCreateLabel("Datum:", 104, 4, 40, 13)
GUICtrlSetResizing(-1, BitOR($GUI_DOCKLEFT, $GUI_DOCKTOP, $GUI_DOCKWIDTH, $GUI_DOCKHEIGHT))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFF00)
$hDate = GUICtrlCreateLabel("", 144, 4, 60, 13)
GUICtrlSetResizing(-1, BitOR($GUI_DOCKLEFT, $GUI_DOCKTOP, $GUI_DOCKWIDTH, $GUI_DOCKHEIGHT))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlCreateLabel("Jahrestag:", 214, 4, 60, 13)
GUICtrlSetResizing(-1, BitOR($GUI_DOCKLEFT, $GUI_DOCKTOP, $GUI_DOCKWIDTH, $GUI_DOCKHEIGHT))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFF00)
$hYDay = GUICtrlCreateLabel("", 274, 4, 20, 13)
GUICtrlSetResizing(-1, BitOR($GUI_DOCKLEFT, $GUI_DOCKTOP, $GUI_DOCKWIDTH, $GUI_DOCKHEIGHT))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlCreateLabel("Laufzeit:", 304, 4, 40, 13)
GUICtrlSetResizing(-1, BitOR($GUI_DOCKLEFT, $GUI_DOCKTOP, $GUI_DOCKWIDTH, $GUI_DOCKHEIGHT))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFF00)
$hRSince = GUICtrlCreateLabel("", 350, 4, 150, 13)
GUICtrlSetResizing(-1, BitOR($GUI_DOCKLEFT, $GUI_DOCKTOP, $GUI_DOCKWIDTH, $GUI_DOCKHEIGHT))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFFFF)
$hStatus = _GUICtrlStatusBar_Create($hGui) ;<=======================
_GUICtrlStatusBar_GetHeight($hGui)
GUISetState(@SW_SHOW, $hGui)

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

GUIRegisterMsg($WM_SIZE, "WM_SIZE")

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

$iconmenu0001 = TrayCreateItem("GUI-Fenster schließen")
$iconmenu0002 = TrayCreateItem("GUI-Fenster öffnen")
TrayCreateItem("")
$iconmenu0003 = TrayCreateItem("Information")
$iconmenu0004 = TrayCreateItem("Information")
$iconmenu0005 = TrayCreateItem("Information")
$iconmenu0006 = TrayCreateItem("Information")
TrayCreateItem("")
$iconmenu0007 = TrayCreateItem("Info")
TrayCreateItem("")
$iconmenu0008 = TrayCreateItem("Pause")
$iconmenu0009 = TrayCreateItem("Exit")

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

$0001_0001 = _Timer_SetTimer($hGui, 1000, "_information0001", -1)
$0002_0001 = _NowCalc()

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

;Send ("{F5}")

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

;Func _button ()
While True
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
#cs
$tmsg = TrayGetMsg()
Switch $tmsg
Case $iconmenu0001
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0002
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0003
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0004
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0005
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0006
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0007
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0008
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0009
MsgBox (64, "Fehler", _exit ())
EndSwitch
#ce
WEnd
;EndFunc

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

Func _information0001($hWnd, $msg, $0001_0001, $dwTime)
GUICtrlSetData($hTime, @HOUR & ":" & @MIN & ":" & @SEC)
GUICtrlSetData($hDate, @MDAY & "." & @MON & "." & @YEAR)
GUICtrlSetData($hYDay, @YDAY)
$0002_0002 = _DateDiff('s', $0002_0001, _NowCalc())
$0002_0003 = StringFormat("%.02d" & ":" & "%.02d" & ":" & "%.02d", Floor($0002_0002 / 3600), Mod(($0002_0002 / 60), 60), $0002_0002 - Floor($0002_0002 / 60) * 60)
GUICtrlSetData($hRSince, $0002_0003)
EndFunc ;==>_information0001

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

Func _Exit()
Exit
EndFunc ;==>_Exit

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

; Bewirkt, dass sich die Statusbar bei Größenänderung des Fensters mitanpasst
Func WM_SIZE($hWnd, $iMsg, $iwParam, $ilParam)
_GUICtrlStatusBar_Resize($hStatus)
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_SIZE

[/autoit]

Edit: Resizing angepasst ($GUI_DOCKHEIGHT hat gefehlt)
mfg (Auto)Bert

SchrotterCh

Zitat von AutoBert

Hallo SchrotterCh,

hab dir auch eine Lösung gebastelt (weitgehend identisch mit Andy

Spoiler anzeigen

[autoit]
#include <GUIConstantsEx.au3>
#include <Timers.au3>
#include <Date.au3>
#include <GuiStatusBar.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
;HotKeySet ("{F5}", "_button")
HotKeySet("{ESC}", "_exit")
[/autoit] [autoit][/autoit] [autoit]
Opt("TrayAutoPause", 0)
Opt("TrayIconDebug", 0)
Opt("TrayMenuMode", 1)
Opt("WinSearchChildren", 1)
[/autoit] [autoit][/autoit] [autoit]
Global $Secs, $Mins, $Hour, $Time
Global $hTime, $hDate, $hYDay, $hRSince, $hStatus ;<Variablen für Control-ID's
[/autoit] [autoit][/autoit] [autoit]
$hGui = GUICreate("GUI", -1, -1, -1, -1, $WS_MAXIMIZEBOX + $WS_MINIMIZEBOX + $WS_SIZEBOX + $WS_SYSMENU + $WS_CAPTION)
GUISetCursor(3)
GUISetBkColor(0x000000)
GUICtrlCreateLabel("Uhrzeit:", 4, 4, 40, 13)
GUICtrlSetResizing(-1,BitOr($GUI_DOCKLEFT,$GUI_DOCKTOP,$GUI_DOCKWIDTH))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFF00)
$hTime = GUICtrlCreateLabel("", 44, 4, 50, 13)
GUICtrlSetResizing(-1,BitOr($GUI_DOCKLEFT,$GUI_DOCKTOP,$GUI_DOCKWIDTH))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlCreateLabel("Datum:", 104, 4, 40, 13)
GUICtrlSetResizing(-1,BitOr($GUI_DOCKLEFT,$GUI_DOCKTOP,$GUI_DOCKWIDTH))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFF00)
$hDate = GUICtrlCreateLabel("", 144, 4, 60, 13)
GUICtrlSetResizing(-1,BitOr($GUI_DOCKLEFT,$GUI_DOCKTOP,$GUI_DOCKWIDTH))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlCreateLabel("Jahrestag:", 214, 4, 60, 13)
GUICtrlSetResizing(-1,BitOr($GUI_DOCKLEFT,$GUI_DOCKTOP,$GUI_DOCKWIDTH))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFF00)
$hYDay = GUICtrlCreateLabel("", 274, 4, 20, 13)
GUICtrlSetResizing(-1,BitOr($GUI_DOCKLEFT,$GUI_DOCKTOP,$GUI_DOCKWIDTH))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlCreateLabel("Laufzeit:", 304, 4, 40, 13)
GUICtrlSetResizing(-1,BitOr($GUI_DOCKLEFT,$GUI_DOCKTOP,$GUI_DOCKWIDTH))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFF00)
$hRSince = GUICtrlCreateLabel("", 350, 4, 150, 13)
GUICtrlSetResizing(-1,BitOr($GUI_DOCKLEFT,$GUI_DOCKTOP,$GUI_DOCKWIDTH))
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xFFFFFF)
$hStatus = _GUICtrlStatusBar_Create($hgui) ;<=======================
_GUICtrlStatusBar_GetHeight($hgui)
GUISetState(@SW_SHOW, $hgui)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
GUIRegisterMsg($WM_SIZE, "WM_SIZE")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$iconmenu0001 = TrayCreateItem("GUI-Fenster schließen")
$iconmenu0002 = TrayCreateItem("GUI-Fenster öffnen")
TrayCreateItem("")
$iconmenu0003 = TrayCreateItem("Information")
$iconmenu0004 = TrayCreateItem("Information")
$iconmenu0005 = TrayCreateItem("Information")
$iconmenu0006 = TrayCreateItem("Information")
TrayCreateItem("")
$iconmenu0007 = TrayCreateItem("Info")
TrayCreateItem("")
$iconmenu0008 = TrayCreateItem("Pause")
$iconmenu0009 = TrayCreateItem("Exit")
[/autoit] [autoit][/autoit] [autoit]
$0001_0001 = _Timer_SetTimer($hgui, 1000, "_information0001", -1)
$0002_0001 = _NowCalc()
[/autoit] [autoit][/autoit] [autoit]
;Send ("{F5}")
[/autoit] [autoit][/autoit] [autoit]
;Func _button ()
While True
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
#cs
$tmsg = TrayGetMsg()
Switch $tmsg
Case $iconmenu0001
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0002
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0003
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0004
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0005
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0006
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0007
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0008
MsgBox (64, "Fehler", "Befehl nicht verfügbar")
Case $iconmenu0009
MsgBox (64, "Fehler", _exit ())
EndSwitch
#ce
WEnd
;EndFunc
[/autoit] [autoit][/autoit] [autoit]
Func _information0001($hWnd, $msg, $0001_0001, $dwTime)
GUICtrlSetData($hTime, @HOUR & ":" & @MIN & ":" & @SEC)
GUICtrlSetData($hDate,@MDAY & "." & @MON & "." & @YEAR)
GUICtrlSetData($hYDay,@YDAY)
$0002_0002 = _DateDiff('s', $0002_0001, _NowCalc())
$0002_0003 = StringFormat("%.02d" & ":" & "%.02d" & ":" & "%.02d", Floor($0002_0002 / 3600), Mod(($0002_0002 / 60), 60), $0002_0002 - Floor($0002_0002 / 60) * 60)
GUICtrlSetData($hRSince,$0002_0003)
EndFunc ;==>_information0001
[/autoit] [autoit][/autoit] [autoit]
Func _Exit()
Exit
EndFunc ;==>_Exit
[/autoit] [autoit][/autoit] [autoit]
; Bewirkt, dass sich die Statusbar bei Größenänderung des Fensters mitanpasst
Func WM_SIZE($hWnd, $iMsg, $iwParam, $ilParam)
_GUICtrlStatusBar_Resize($hStatus)
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_SIZE
[/autoit]

mfg (Auto)Bert

Alles anzeigen

danke andy nimm deine version die funkzt am besten aber weißt du vielleicht noch warum jetzt wann man es fast ganz zu verkleinert von der höhe ein schwarzer balken über die schrift fährt? xD aber falls du auch nciht weißt warum ist nicht wichtig xD hauptsache es geht so

**autoBert**

Hallo SchrotterCh,

meine Version unterscheidet sich von Andy 's Version hauptsächlich im Resizing, habe in meinem Skript auch noch die Höhe berücksichtigt.

Wenn du nach jedem Control folgende Zeile einfügst (bei Andy Skript) bzw. austauscht (bei meinem Skript) ist die zu geringe Höhe der Cotrols behoben,

[autoit]

GUICtrlSetResizing(-1, BitOR($GUI_DOCKLEFT, $GUI_DOCKTOP, $GUI_DOCKWIDTH, $GUI_DOCKHEIGHT))

[/autoit]

mfg (Auto)Bert

**Schnitzel**

das problem mit den schwarzen balken hast du weil die Labelhöhe sich % zum windowfenster verhält

abhilfe schafft man in dem du deine GUICtrlSetResizing erweiterst mit $GUI_DOCKHEIGHT:

[autoit]

GUICtrlSetResizing(-1, BitOR($GUI_DOCKLEFT, $GUI_DOCKTOP, $GUI_DOCKWIDTH, $GUI_DOCKHEIGHT))

[/autoit]

SchrotterCh

ok thx werds nochmal versuchen mit dem befehl ob das schwarze nochmal komtm