Android Programming Press on the image to return to the main documentation page.

ICOSTitleBarAnimation

Written by Giuseppe Salvi

List of types:

ICOSTitleBarAnimation

ICOSTitleBarAnimation


This is an 'Activity Object', it cannot be declared under Sub Process_Globals.

Events:

animationend

Members:


  AutoRepeat

  AutoReverse

  FadeInTitleBar (EventName As String, Duration As Long)

  FadeOutTitleBar (EventName As String, Duration As Long)

  FLIP_HORIZONTAL As Int

  FLIP_VERTICAL As Int

  Flip3DTitleBar (EventName As String, Degrees As Float, Duration As Long, Direction As Int)

  InfinityFadeTitleBar (EventName As String, Duration As Long)

  InfinitySlideReverseTitleBar (EventName As String, SlideValue As Float, Duration As Long)

  InfinitySlideTitleBar (EventName As String, SlideValue As Float, Duration As Long)

  IsInitialized As Boolean

  ScaleTitleBarFromCentreToLeftRight (EventName As String, Duration As Long)

  ScaleTitleBarFromLeftRightToCentre (EventName As String, Duration As Long)

  ScaleTitleBarToLeft (EventName As String, Duration As Long)

  ScaleTitleBarToRight (EventName As String, Duration As Long)

  SlideTitleBarFromLeftToRight (EventName As String, SlideValue As Float, Duration As Long)

  SlideTitleBarFromRightToLeft (EventName As String, SlideValue As Float, Duration As Long)

  StartAnimAtTime As Long  [write only]

  StartAnimTitleBar

  StopAnimTitleBar

  Version As Double  [read only]

Members description:

AutoRepeat
Set repeat infinity automatically
AutoReverse
Set reverse automatically
FadeInTitleBar (EventName As String, Duration As Long)
Example:
Dim anim As ICOSAnimation
Dim ImageView1 As ImageView
Dim Button1 As Button

Sub b1_Click
anim.FadeInTitleBar("anim",2)
anim.StartAnimTitleBar
End Sub
FadeOutTitleBar (EventName As String, Duration As Long)
Example:
Dim anim As ICOSAnimation
Dim ImageView1 As ImageView
Dim Button1 As Button

Sub b1_Click
anim.FadeOutTitleBar("anim",2)
anim.StartAnimTitleBar
End Sub
FLIP_HORIZONTAL As Int
FLIP_VERTICAL As Int
Flip3DTitleBar (EventName As String, Degrees As Float, Duration As Long, Direction As Int)
Direction -> FLIP_HORIZONTAL = 1
Direction -> FLIP_VERTICAL = 2
Example:
Dim anim As ICOSAnimation
Dim ImageView1 As ImageView
Dim Button1 As Button

Sub b1_Click
anim.Flip3DTitleBar("anim",ImageView1,180,3,anim.FLIP_HORIZONTAL)
anim.StartAnim(ImageView1)
End Sub
InfinityFadeTitleBar (EventName As String, Duration As Long)
Example:
Dim anim As ICOSAnimation
Dim ImageView1 As ImageView
Dim Button1 As Button

Sub b1_Click
anim.InfiniteFadeTitleBar("anim",2)
anim.StartAnimTitleBar
End Sub
InfinitySlideReverseTitleBar (EventName As String, SlideValue As Float, Duration As Long)
Example:
Dim anim As ICOSAnimation
Dim Button1 As Button

Sub b1_Click
anim.InfinitySlideReverseTitleBar("anim",600,2)
anim.StartAnimTitleBar
End Sub
InfinitySlideTitleBar (EventName As String, SlideValue As Float, Duration As Long)
Example:
Dim anim As ICOSAnimation
Dim Button1 As Button

Sub b1_Click
anim.SlideInfinityTitleBar("anim",600,2)
anim.StartAnimTitleBar
End Sub
IsInitialized As Boolean
ScaleTitleBarFromCentreToLeftRight (EventName As String, Duration As Long)
Example:
Dim anim As ICOSAnimation
Dim Button1 As Button

Sub b1_Click
anim.SaleTitleBarFromCentreToLeftRight("anim",2)
anim.StartAnimTitleBar
End Sub
ScaleTitleBarFromLeftRightToCentre (EventName As String, Duration As Long)
Example:
Dim anim As ICOSAnimation
Dim Button1 As Button

Sub b1_Click
anim.ScaleTitleBarFromLeftRightToCentre("anim",2)
anim.StartAnimTitleBar
End Sub
ScaleTitleBarToLeft (EventName As String, Duration As Long)
Example:
Dim anim As ICOSAnimation
Dim Button1 As Button

Sub b1_Click
anim.SaleTitleBarToLeft("anim",2)
anim.StartAnimTitleBar
End Sub
ScaleTitleBarToRight (EventName As String, Duration As Long)
Example:
Dim anim As ICOSAnimation
Dim Button1 As Button

Sub b1_Click
anim.SaleTitleBarToRight("anim",2)
anim.StartAnimTitleBar
End Sub
SlideTitleBarFromLeftToRight (EventName As String, SlideValue As Float, Duration As Long)
Example:
Dim anim As ICOSAnimation
Dim Button1 As Button

Sub b1_Click
anim.SlideTitleBarFromLeftToRight("anim",600,2)
anim.StartAnimTitleBar
End Sub
SlideTitleBarFromRightToLeft (EventName As String, SlideValue As Float, Duration As Long)
Example:
Dim anim As ICOSAnimation
Dim Button1 As Button

Sub b1_Click
anim.SlideTitleBarFromRightToLeft("anim",600,2)
anim.StartAnimTitleBar
End Sub
StartAnimAtTime As Long  [write only]
Example:
Dim anim As ICOSAnimation
Dim ImageView1 As ImageView
Dim Button1 As Button

Sub b1_Click
anim.StartAnimAtTime=5000 The Animation Will start after 5 seconds
anim.FadeOut(2)
anim.StartAnim(ImageView1)
End Sub
StartAnimTitleBar
anim.StartAnimTitleBar
StopAnimTitleBar
Stop the animation
Version As Double  [read only]
Return the version of this library
Top