WaitCursor

[petrbury]

Hi,
I'm using command WaitCursor and it works on device but not on desktop.
Is it normal, or am I doing something wrong ?
Thanks Petr

 

[Erel]

WaitCursor does nothing on the desktop.

 

[petrbury]

Thank you for your response Erel. Do you think that it could be possible in future ?
Petr

 

[Erel]

Yes. I'll add it to the DesktopOnly library soon.

 

[RandomCoder]

Has this been implemented yet?
Can't believe this is the first time I've felt the need to use the hour glass on a desktop application!!!!!

Regards,
RandomCoder

 

[agraham]

A FormEx can do it with its Cursor property or use the Door library. "Default" is the usual arrow cursor.

Sub Globals
   'Declare the global variables here.
End Sub

Sub App_Start
   obj1.New1(False)
   obj2.New1(False)
   Form1.Show
   SetCursor("WaitCursor")
End Sub

'Cursor  is Case-insensitive and can be one of :
'AppStarting, Arrow, Cross, Default, Hand, Help, HSplit, IBeam, 
'No, NoMove2D, NoMoveHoriz, NoMoveVert,
'PanEast, PanNE, PanNorth, PanNW, PanSE, PanSouth, PanSW, PanWest,
'SizeAll, SizeNESW, SizeNS, SizeNWSE, SizeWE, UpArrow, VSplit, WaitCursor.
Sub SetCursor(cursor)
   obj1.CreateNew("System.Windows.Forms.CursorConverter" & obj1.System_Windows_Forms)
   obj1.Value = obj1.RunMethod2("ConvertFromString", cursor, "System.String")   
   obj2.FromControl("Form1")
   obj2.SetProperty2("Cursor", obj1.Value)
End Sub

 

[RandomCoder]

Thanks Andrew.

Regards,
RandomCoder