Class TPGTrayIconAnimation (unit PGTray95)

Inherits from

TPersistent

Constructors



Functions

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.

Properties

property Icons : TStringList


property Interval : Integer

css

property Options : TPGTrayIconAnimationOptions


property IconIndex : Integer


Events

Variables

AnimationTimer : TPGTimerItem;


FIconIndex : Integer;


FIcons : TStringList;


FInterval : Integer;


FOptions : TPGTrayIconAnimationOptions;


TrayIcon : TPGTrayIcon95;



Constructors


Functions


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.


Properties


property Icons : TStringList


property Interval : Integer

css


property Options : TPGTrayIconAnimationOptions


property IconIndex : Integer


Events


Variables


AnimationTimer : TPGTimerItem;


FIconIndex : Integer;


FIcons : TStringList;


FInterval : Integer;


FOptions : TPGTrayIconAnimationOptions;


TrayIcon : TPGTrayIcon95;