Hy
ich möchte ein Programm schreiben was einen Counter runter laufen lassen soll (30min, diese auch anzeigt) und dann ein Programm startet und dann wieder von vorne anfängt zu zählen.
thx
-
guck dir mal die countdown.au3 von bugfix an!
müsstest du mit der suchfunktion finden
hab noch mal den link besorgt : countdown.au3
-
Hallo!
GuictrlsetData()Sollte gehen .. =)
Lenny
-
genau einfach mit dem gefehle guictrlsetdata()
also du musst die zahl in eine variable schreiben wenn sie sich ändern soll da du ja von einem countdown spricht. das guictrlsetdata befehl sieht dann folgendermaßen aus:
Spoiler anzeigen
[autoit]guictrlsetdata($deinlabel,$deinezahl)
[/autoit] -
sowas in der art....
Spoiler anzeigen
[autoit]HotKeySet("{ESC}","ex")
[/autoit] [autoit][/autoit] [autoit]
Global $TIME
Const $ar_time_choose[6] = [1,60,3600,86400,2592000,31536000]#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <GuiCombo.au3>
$Form1 = GUICreate("Counter",180,200)$auswahl = GUICtrlCreateCombo("Zeitauswahl", 8, 10, 147, 25)
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetData(-1,"Sekunden")
GUICtrlSetData(-1,"Minuten")
GUICtrlSetData(-1,"Stunden")
GUICtrlSetData(-1,"Tage")
GUICtrlSetData(-1,"Monate(30 Tage)")
GUICtrlSetData(-1,"Jahre (365 Tage)")
$TIME = GUICtrlCreateInput("Zeit eingeben.", 8, 40, 147, 25)
$start = GUICtrlCreateButton("Start",10,70,147,25)
$counter = GUICtrlCreateLabel("Please Wait....", 10, 110, 147, 25)
GUISetState(@SW_SHOW)While 1
[/autoit] [autoit][/autoit] [autoit]
;GUICtrlSetData($counter,$TIME-$i)
;Sleep(100)
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $start
If GuiCtrlRead($TIME) = "Zeit, die heruntergezählt werden soll." Or GuiCtrlRead($TIME) <= 0 Then
MsgBox(48,"Ungültige Zeit.","Bitte geben Sie eine gültige Zeit ein.")
ElseIf GuiCtrlRead($auswahl) = "Zeitauswahl" Then
MsgBox(48,"Ungültige Zeit.","Bitte geben Sie eine gültige Zeit ein.")
Else
MsgBox(64,"Hinweiß","Zum beenden bitte Escape drücken.")
$i = 0
Do
GUICtrlSetData($counter,"Zeitverbleibend:"&@CRLF&((GUICtrlRead($TIME)*$ar_time_choose[_GUICtrlComboGetCurSel($auswahl)-1])-$i)&" Sekunden")
$i = $i+1
Sleep(1000)
Until ((GUICtrlRead($TIME)*$ar_time_choose[_GUICtrlComboGetCurSel($auswahl)-1])-$i) < 0
EndIf
EndSwitch
WEndFunc ex()
[/autoit]
Exit
EndFunc
grad mal selbste gebastelt....hatte langeweile..zwar nicht der sinn und zweck anderen zu helfen aber grad mal egal^^snoozy
-
- Offizieller Beitrag
ZitatOriginal von Masterraven9
...
Jetzt steh ich gerade vor mehreren Problemen z.B.
mit welchem Befehl kann ich das regeln das ich das Program auch während es runterzählt mit einem Klick auf "x" beenden kann oder
wie kann ich ein neues GUI Fenster erstellen in dem ich auch Anweisungen ausführen kann.
thxDas geht nicht.
Während die Zeitsetzung läuft bist du in der Schleife 'gefangen'.
Andere Ereignisse lassen sich erst abfragen, wenn die Schleife beendet ist.
Ein zeitgleiches Ausführen eines anderen Fensters geht ebenfalls nicht - AutoIt ist nicht multithreadfähig. -
- Offizieller Beitrag
Hi!
TimerStart und TimerDiff sind die Lösung, denke ich - etwas aufwändiger, aber machbar.
peethebee
-
- Offizieller Beitrag
Hi,
oder halt adlibenable.
So long,
Mega
-
Ich hab hier mal Bugfix' Counter.au3 auf Adlibenable geändert, Ich hoffe, das ist OK:
Spoiler anzeigen
[autoit];#### BEISPIEL ####
[/autoit] [autoit][/autoit] [autoit]
#region --- GuiBuilder code Start ---
; Script generated by AutoBuilder 0.6 Prototype#include <GuiConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <CountdownAdlib.au3>GuiCreate("MyGUI", 392, 317,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))
[/autoit] [autoit][/autoit] [autoit]$Label_1 = GuiCtrlCreateLabel("Label1", 80, 100, 200, 70)
[/autoit] [autoit][/autoit] [autoit]GuiSetState()
[/autoit] [autoit][/autoit] [autoit]
_CountDown(10,0,0,0,True,$Label_1)While 1
[/autoit] [autoit][/autoit] [autoit]
$msg = GuiGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case Else
;;;
EndSelect
WEnd
Exit
#endregion --- GuiBuilder generated code End ---;#### BEISPIEL ENDE ####
[/autoit] [autoit][/autoit] [autoit];#### CountdownAdlib.au3 ####
[/autoit] [autoit][/autoit] [autoit];----------------------------------------------------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]
; Funktion _CountDown($SEC [, $MIN=0 [, $HOUR=0 [, $DAY=0 [, $VISIBLEDOWN=True [, $ALTERNATECTRL='TT']]]]])
;
; Beschreibung zählt vorgegebene Zeitspanne (Tage, Stunden, Minuten, Sekunden) herunter mit Anzeige Tooltip (Standard)
; oder Ausgabe in GUI-Ctrl; wahlweise Anzeige von Restzeit (Standard) oder abgelaufener Zeit
;
; Parameter $SEC: Sekunden
; optional $MIN: Minuten
; optional $HOUR: Stunden
; optional $DAY: Tage
; optional $VISIBLEDOWN: Ansicht (herunterzählen/heraufzählen)
; optional $ALTERNATECTRL: GUI-Ctrl in das die Ausgabe mittels GUICtrlSetData() ausgegeben wird
;
; Erfordernisse #include <Date.au3>
;
; Autor BugFix ([email='bugfix@autoit.de'][/email])
;----------------------------------------------------------------------------------------------------------------------
#include <Date.au3>
Global $_CountDown_Sekunden
Global $_CountDown_end
Global $_CountDown_VISIBLEDOWN
Global $_CountDown_ALTERNATECTRL
Func _CountDown($SEC, $MIN=0, $HOUR=0, $DAY=0, $VISIBLEDOWN=True, $ALTERNATECTRL='TT')
Global $_CountDown_Sekunden = $SEC + $MIN*60 + $HOUR*3600 + $DAY*86400
Global $_CountDown_end = _DateAdd('s', $_CountDown_Sekunden, _NowCalc())
Global $_CountDown_VISIBLEDOWN = $VISIBLEDOWN
Global $_CountDown_ALTERNATECTRL = $ALTERNATECTRL
AdlibEnable("_Counter",300)
EndFunc ;==>_CountDown;----------------------------------------------------------------------------------------------------------------------
[/autoit]
; Funktion _Counter
; Wird von _CountDown mit AdlibEnable aufgerufen, um
;
; Autor BugFix ([email='bugfix@autoit.de'][/email])
; aufgeteilt auf 2 Funktionen für AdLib von Prog@ndy
;----------------------------------------------------------------------------------------------------------------------
Func _Counter()
Local $message
$sec = _DateDiff('s', _NowCalc(), $_CountDown_end)
If Not $_CountDown_VISIBLEDOWN Then
$secShow = $_CountDown_Sekunden - $sec
Else
$secShow = $sec
EndIf
Select
Case $secShow < 60
If $_CountDown_ALTERNATECTRL = 'TT' Then
ToolTip(StringFormat('%02u', $secShow) & ' s')
Else
GUICtrlSetData($_CountDown_ALTERNATECTRL, StringFormat('%02u', $secShow) & ' s')
EndIf
Case $secShow < 60*60
$message = StringFormat('%02u', Floor($secShow/60)) & ':' & _
StringFormat('%02u', Mod($secShow,60)) & ' min'
If $_CountDown_ALTERNATECTRL = 'TT' Then
ToolTip($message)
Else
GUICtrlSetData($_CountDown_ALTERNATECTRL, $message)
EndIf
Case $secShow < 60*60*24
$message = StringFormat('%02u', Floor($secShow/3600)) & ':' & _
StringFormat('%02u', Floor(Mod($secShow,3600)/60)) & ':' & _
StringFormat('%02u', Mod(Mod($secShow,3600),60)) & ' h'
If $_CountDown_ALTERNATECTRL = 'TT' Then
ToolTip($message)
Else
GUICtrlSetData($_CountDown_ALTERNATECTRL, $message)
EndIf
Case Else
$message = Floor($secShow/86400) & ' d / ' & _
StringFormat('%02u', Floor(Mod($secShow,86400)/3600)) & ':' & _
StringFormat('%02u', Floor(Mod(Mod($secShow,86400),3600)/60)) & ':' & _
StringFormat('%02u', Mod(Mod(Mod($secShow,86400),3600),60)) & ' h'
If $_CountDown_ALTERNATECTRL = 'TT' Then
ToolTip($message)
Else
GUICtrlSetData($_CountDown_ALTERNATECTRL, $message)
EndIf
EndSelect
If $sec <= 0 Then AdlibDisable()
EndFunc