#Region Project Attributes
#ApplicationLabel: SpinKitView
#VersionCode: 1
#VersionName:
'SupportedOrientations possible values: unspecified, landscape or portrait.
#SupportedOrientations: portrait
#CanInstallToExternalStorage: False
#End Region
#Region Activity Attributes
#FullScreen: False
#IncludeTitle: True
#End Region
Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
End Sub
Sub Globals
'These global variables will be redeclared each time the activity is created.
'These variables can only be accessed from this module.
Private skv1 As SpinKitView
Private skv2 As SpinKitView
Private skv3 As SpinKitView
Private skv4 As SpinKitView
Private skv5 As SpinKitView
Private skv6 As SpinKitView
Private skv7 As SpinKitView
Private skv8 As SpinKitView
Private skv9 As SpinKitView
Private skv10 As SpinKitView
Private skv11 As SpinKitView
End Sub
Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
Activity.LoadLayout("main")
skv1.Visible = True
skv1.SpinKitColor = Colors.blue
skv1.SpinKitType = skv1.CHASING_DOTS
skv1.goForIt
skv2.Visible = True
skv2.SpinKitColor = Colors.Yellow
skv2.SpinKitType = skv2.CIRCLE
skv2.goForIt
skv3.Visible = True
skv3.SpinKitColor = Colors.Green
skv3.SpinKitType = skv3.CUBE_GRID
skv3.goForIt
skv4.Visible = True
skv4.SpinKitColor = Colors.Magenta
skv4.SpinKitType = skv4.DOUBLE_BOUNCE
skv4.goForIt
skv5.Visible = True
skv5.SpinKitColor = Colors.Cyan
skv5.SpinKitType = skv5.FADING_CIRCLE
skv5.goForIt
skv6.Visible = True
skv6.SpinKitColor = Colors.Red
skv6.SpinKitType = skv6.FOLDING_CUBE
skv6.goForIt
skv7.Visible = True
skv7.SpinKitColor = Colors.Blue
skv7.SpinKitType = skv7.PULSE
skv7.goForIt
skv8.Visible = True
skv8.SpinKitColor = Colors.Yellow
skv8.SpinKitType = skv8.ROTATING_PLANE
skv8.goForIt
skv9.Visible = True
skv9.SpinKitColor = Colors.Green
skv9.SpinKitType = skv9.THREE_BOUNCE
skv9.goForIt
skv10.Visible = True
skv10.SpinKitColor = Colors.Magenta
skv10.SpinKitType = skv10.WANDERING_CUBES
skv10.goForIt
skv11.Visible = True
skv11.SpinKitColor = Colors.Cyan
skv11.SpinKitType = skv11.WAVE
skv11.goForIt
End Sub
Sub Activity_Resume
End Sub
Sub Activity_Pause (UserClosed As Boolean)
End Sub