wasd-w Posted August 20, 2016 Share Posted August 20, 2016 (edited) $TimeLabel = _GUICtrlFFLabel_Create($ParentWindow, "Time: "&"00:00:00", 2, 7, 120, 20) $timer = TimerInit () AdlibRegister ("Timer", 50) Func Timer() _TicksToTime ( Int ( TimerDiff ($timer)), $Hour, $Mins, $Secs) Local $sTime = $Time $Time = StringFormat ("Time: "&"%02i:%02i:%02i", $Hour, $Mins, $Secs) _GUICtrlFFLabel_SetData($TimeLabel,$Time) EndFunc Edited August 20, 2016 by Melba23 Added code tags Link to comment Share on other sites More sharing options...
Moderators Melba23 Posted August 20, 2016 Moderators Share Posted August 20, 2016 wasd-w, Welcome to the AutoIt forums. And your question is? M23 P.S. When you post code please use Code tags - see here how to do it. Then you get syntax colouring as you can see above now I have added the tags. Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Spoiler ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area Link to comment Share on other sites More sharing options...
wasd-w Posted August 20, 2016 Author Share Posted August 20, 2016 $TimeLabel = _GUICtrlFFLabel_Create($ParentWindow, "Time: "&"00:00:00", 2, 7, 120, 20)$timer = TimerInit () AdlibRegister ("Timer", 50)Func Timer() _TicksToTime ( Int ( TimerDiff ($timer)), $Hour, $Mins, $Secs) $Time = StringFormat ("Time: "&"%02i:%02i:%02i", $Hour, $Mins, $Secs) _GUICtrlFFLabel_SetData($TimeLabel,$Time)EndFunc Link to comment Share on other sites More sharing options...
wasd-w Posted August 20, 2016 Author Share Posted August 20, 2016 4 minutes ago, wasd-w said: $TimeLabel = _GUICtrlFFLabel_Create($ParentWindow, "Time: "&"00:00:00", 2, 7, 120, 20) $timer = TimerInit () AdlibRegister ("Timer", 50) Func Timer() _TicksToTime ( Int ( TimerDiff ($timer)), $Hour, $Mins, $Secs) $Time = StringFormat ("Time: "&"%02i:%02i:%02i", $Hour, $Mins, $Secs) _GUICtrlFFLabel_SetData($TimeLabel,$Time) EndFunc Link to comment Share on other sites More sharing options...
wasd-w Posted August 20, 2016 Author Share Posted August 20, 2016 Sorry Spoiler Link to comment Share on other sites More sharing options...
Developers Jos Posted August 20, 2016 Developers Share Posted August 20, 2016 (edited) merged and please this time simply add a post in this thread actually asking the question you have! Jos Edited August 20, 2016 by Jos SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
wasd-w Posted August 20, 2016 Author Share Posted August 20, 2016 (edited) How do I assign a specific value of the timer Edited August 20, 2016 by Jos Link to comment Share on other sites More sharing options...
Developers Jos Posted August 20, 2016 Developers Share Posted August 20, 2016 Do you Seriously think it will help by posting this in big font? SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
wasd-w Posted August 20, 2016 Author Share Posted August 20, 2016 2 minutes ago, Jos said: Do you Seriously think it will help by posting this in big font? No , I accidentally Link to comment Share on other sites More sharing options...
Developers Jos Posted August 20, 2016 Developers Share Posted August 20, 2016 Did you actually read my post, and please answer in normal font and text as the next time you do this again in this thread will not go down well! SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
wasd-w Posted August 20, 2016 Author Share Posted August 20, 2016 1 minute ago, Jos said: Did you actually read my post, and please answer in normal font and text as the next time you do this again in this thread will not go down well! I also do not know much English Link to comment Share on other sites More sharing options...
wasd-w Posted August 20, 2016 Author Share Posted August 20, 2016 2 hours ago, wasd-w said: $TimeLabel = _GUICtrlFFLabel_Create($ParentWindow, "Time: "&"00:00:00", 2, 7, 120, 20) $timer = TimerInit () AdlibRegister ("Timer", 50) Func Timer() _TicksToTime ( Int ( TimerDiff ($timer)), $Hour, $Mins, $Secs) Local $sTime = $Time $Time = StringFormat ("Time: "&"%02i:%02i:%02i", $Hour, $Mins, $Secs) _GUICtrlFFLabel_SetData($TimeLabel,$Time) EndFunc How do I assign a specific value of the timer Link to comment Share on other sites More sharing options...
InunoTaishou Posted August 20, 2016 Share Posted August 20, 2016 TimerInit() maybe? Link to comment Share on other sites More sharing options...
AutoBert Posted August 20, 2016 Share Posted August 20, 2016 2 hours ago, wasd-w said: _GUICtrlFFLabel_Create this is no standard func of AutoIt, so i suggest contact the author of the UDF. Link to comment Share on other sites More sharing options...
wasd-w Posted August 20, 2016 Author Share Posted August 20, 2016 4 minutes ago, AutoBert said: this is no standard func of AutoIt, so i suggest contact the author of the UDF. $timer = TimerInit() AdlibRegister("Timer", 50) $TimeLabel = _WinAPI_CreateWindowEx(0, 'Static', '', BitOR($WS_CHILD, $WS_VISIBLE), 5, 228, 100, 14, $ParentWindow) Func Timer() _TicksToTime(Int(TimerDiff($timer)), $Hour, $Mins, $Secs) $Time = StringFormat("Time: "&"%02i:%02i:%02i", $Hour, $Mins, $Secs) _WinAPI_SetWindowText($TimeLabel,$Time) EndFunc Link to comment Share on other sites More sharing options...
wasd-w Posted August 20, 2016 Author Share Posted August 20, 2016 21 minutes ago, AutoBert said: this is no standard func of AutoIt, so i suggest contact the author of the UDF. does it change anything? Link to comment Share on other sites More sharing options...
AutoBert Posted August 20, 2016 Share Posted August 20, 2016 Your snipet isn't runable: $timer = TimerInit() AdlibRegister("Timer", 50) $TimeLabel = _WinAPI_CreateWindowEx(0, 'Static', '', BitOR($WS_CHILD, $WS_VISIBLE), 5, 228, 100, 14, $ParentWindow) Func Timer() _TicksToTime(Int(TimerDiff($timer)), $Hour, $Mins, $Secs) $Time = StringFormat("Time: "&"%02i:%02i:%02i", $Hour, $Mins, $Secs) _WinAPI_SetWindowText($TimeLabel,$Time) EndFunc make a runable reproducer script, showing your issue(s). Link to comment Share on other sites More sharing options...
wasd-w Posted August 21, 2016 Author Share Posted August 21, 2016 1 hour ago, AutoBert said: Your snipet isn't runable: $timer = TimerInit() AdlibRegister("Timer", 50) $TimeLabel = _WinAPI_CreateWindowEx(0, 'Static', '', BitOR($WS_CHILD, $WS_VISIBLE), 5, 228, 100, 14, $ParentWindow) Func Timer() _TicksToTime(Int(TimerDiff($timer)), $Hour, $Mins, $Secs) $Time = StringFormat("Time: "&"%02i:%02i:%02i", $Hour, $Mins, $Secs) _WinAPI_SetWindowText($TimeLabel,$Time) EndFunc make a runable reproducer script, showing your issue(s). #include <GUIConstants.au3> #include <WinAPI.au3> #include <Timers.au3> Global $TimeLabel Global $timer Global $Secs Global $Mins Global $Hour Global $Time $ParentWindow = GUICreate('MyGUI', 400, 400) $timer = TimerInit() AdlibRegister("Timer", 50) $TimeLabel = _WinAPI_CreateWindowEx(0, 'Static', '', BitOR($WS_CHILD, $WS_VISIBLE), 5, 228, 100, 14, $ParentWindow) GUISetState() Func Timer() _TicksToTime(Int(TimerDiff($timer)), $Hour, $Mins, $Secs) $Time = StringFormat("Time: "&"%02i:%02i:%02i", $Hour, $Mins, $Secs) _WinAPI_SetWindowText($TimeLabel,$Time) EndFunc Do Until GUIGetMsg() = -3 Link to comment Share on other sites More sharing options...
wasd-w Posted August 21, 2016 Author Share Posted August 21, 2016 Just now, wasd-w said: #include <GUIConstants.au3> #include <WinAPI.au3> #include <Timers.au3> Global $TimeLabel Global $timer Global $Secs Global $Mins Global $Hour Global $Time $ParentWindow = GUICreate('MyGUI', 400, 400) $timer = TimerInit() AdlibRegister("Timer", 50) $TimeLabel = _WinAPI_CreateWindowEx(0, 'Static', '', BitOR($WS_CHILD, $WS_VISIBLE), 5, 228, 100, 14, $ParentWindow) GUISetState() Func Timer() _TicksToTime(Int(TimerDiff($timer)), $Hour, $Mins, $Secs) $Time = StringFormat("Time: "&"%02i:%02i:%02i", $Hour, $Mins, $Secs) _WinAPI_SetWindowText($TimeLabel,$Time) EndFunc Do Until GUIGetMsg() = -3 #include <Date.au3> Link to comment Share on other sites More sharing options...
AutoBert Posted August 21, 2016 Share Posted August 21, 2016 add #include <Date.au3> this is needed while using _TicksToTime and While 1 If GUIGetMsg()=-3 Then Exit WEnd is needed that GUI stays alive. After this changess it's a runable script with no issues: Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now