Sign in to follow this  
Followers 0
john123

Create Loading GUI with dot

6 posts in this topic

Hello everyone!

Please help me create loading label with dot, like this:

Loading...

with dot (".") repeat from 1 to 3, as below:

Loading.

Loading..

Loading...

I have search but no result.

Thank you so much.

Share this post


Link to post
Share on other sites



I would do it with 4 labels; 'Loading', '.', '..','...', replacing the second with the third, then the third with the fourth, then the fourth with the second, and so on... I would use a timed loop to replace the labels. By replace I mean write over. After I figure out how to get it working, I would probably also find that it can be done another way too..


- Bruce /*somdcomputerguy */  If you change the way you look at things, the things you look at change.

Share this post


Link to post
Share on other sites

something like this?

#include <GUIConstantsEx.au3>
$loading=GUICreate("",300,75,-1,-1)
$text=GUICtrlCreateLabel("Loading",100,30)
$dot=GUICtrlCreateLabel(".",139,30)
GUISetState(@SW_SHOW)
While 1
    $msg=GUIGetMsg()
    
    If $msg=$GUI_EVENT_CLOSE Then
        Exit(1)
    ElseIf $msg=0 Then
        Sleep(250)
        GUICtrlSetData($dot,"..")
        Sleep(250)
        GUICtrlSetData($dot,"...")
        Sleep(250)
        GUICtrlSetData($dot,".")    
    EndIf
WEnd

there's a slight delay when clicking the "X" to close and the exit of the script because of the "..." updates.


010101000110100001101001011100110010000001101001011100110010000

001101101011110010010000001110011011010010110011100100001

My Android cat and mouse game
https://play.google.com/store/apps/details?id=com.KaosVisions.WhiskersNSqueek

We're gonna need another Timmy!

Share this post


Link to post
Share on other sites

Thanks kaotkbliss so much. Code works well. I've lost 3 days for this.

You are my hero.

Thanks again.

Share this post


Link to post
Share on other sites

john123,

Here is one that does not make you wait to exit:

#include <GUIConstantsEx.au3>

Global $aDots[4] = ["Loading", "Loading.", "Loading..", "Loading..."]
Global $iDotCount = 0

$hGUI = GUICreate("Test", 500, 500)

$hLabel_Load = GUICtrlCreateLabel("Loading", 20, 20, 250, 40)
GUICtrlSetFont(-1, 15)

GUISetState()

AdlibRegister("_Dotter", 250)
;AdlibEnable("_Dotter", 250)

While 1

    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch

WEnd

Func _Dotter()

    $iDotCount += 1
    If $iDotCount = 4 Then $iDotCount = 0
    GUICtrlSetData($hLabel_Load, $aDots[$iDotCount])

EndFunc

If you are not using the Beta, you need to comment out the AdlibRegister and uncomment the AdlibEnable lines. ;)

M23


Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind._______My UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Share this post


Link to post
Share on other sites

john123,

Here is one that does not make you wait to exit:

#include <GUIConstantsEx.au3>

Global $aDots[4] = ["Loading", "Loading.", "Loading..", "Loading..."]
Global $iDotCount = 0

$hGUI = GUICreate("Test", 500, 500)

$hLabel_Load = GUICtrlCreateLabel("Loading", 20, 20, 250, 40)
GUICtrlSetFont(-1, 15)

GUISetState()

AdlibRegister("_Dotter", 250)
;AdlibEnable("_Dotter", 250)

While 1

    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch

WEnd

Func _Dotter()

    $iDotCount += 1
    If $iDotCount = 4 Then $iDotCount = 0
    GUICtrlSetData($hLabel_Load, $aDots[$iDotCount])

EndFunc

If you are not using the Beta, you need to comment out the AdlibRegister and uncomment the AdlibEnable lines. ;)

M23

Thanks Melba23, I am looking for this.

Thank you very much.

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0