Class TPGTrayIconAnimation (unit PGTray95) |
Inherits from
TPersistent
procedure AnimationEvent(Sender: TObject);
Loads the next icon in the animation, ignoring icons that } { can't be loaded.
procedure SetIconIndex(Value: Integer);
Restart the animation if there was one already in progress.
procedure SetIcons(Value: TStringList);
Restart the animation if there was one already in progress.
procedure SetInterval(Value: Integer);
Used to set the speed of a TrayIcon animation.
procedure StartAnimation;
css TPGTrayIconAnimation
procedure StopAnimation;
Create the animation timer that is used to track when different frames } { of the animation should be displayed.
property Icons : TStringList
property Interval : Integer
css
property Options : TPGTrayIconAnimationOptions
property IconIndex : Integer
AnimationTimer : TPGTimerItem;
FIconIndex : Integer;
FIcons : TStringList;
FInterval : Integer;
FOptions : TPGTrayIconAnimationOptions;
TrayIcon : TPGTrayIcon95;
procedure AnimationEvent(Sender: TObject);
Loads the next icon in the animation, ignoring icons that } { can't be loaded. Also fires the OnAnimation event.
procedure SetIconIndex(Value: Integer);
Restart the animation if there was one already in progress.
procedure SetIcons(Value: TStringList);
Restart the animation if there was one already in progress.
procedure SetInterval(Value: Integer);
Used to set the speed of a TrayIcon animation.
procedure StartAnimation;
css
TPGTrayIconAnimation
procedure StopAnimation;
Create the animation timer that is used to track when different frames } { of the animation should be displayed.
property Icons : TStringList
property Interval : Integer
css
property Options : TPGTrayIconAnimationOptions
property IconIndex : Integer
AnimationTimer : TPGTimerItem;
FIconIndex : Integer;
FIcons : TStringList;
FInterval : Integer;
FOptions : TPGTrayIconAnimationOptions;
TrayIcon : TPGTrayIcon95;