| Class TAnimatedImage (unit Animate) |
TAnimatedImage
| Constructors |
constructor Create(AOwner: TComponent);TAnimatedImage
| Functions |
destructor Destroy;
procedure DoPaintImage;
procedure FrameChanged;
function GetPalette: HPALETTE;
procedure Loaded;
procedure Paint;
procedure Start;
procedure Stop;
procedure AdjustBounds;
procedure DefineBitmapSize;
function GetInterval: Cardinal;
procedure ImageChanged(Sender: TObject);
procedure ResetImageBounds;
procedure SetActive(Value: Boolean);
procedure SetAutoSize(Value: Boolean);
procedure SetGlyph(Value: TBitmap);
procedure SetGlyphNum(Value: Integer);
procedure SetInactiveGlyph(Value: Integer);
procedure SetInterval(Value: Cardinal);
procedure SetNumGlyphs(Value: Integer);
procedure SetOpaque(Value: Boolean);
procedure SetOrientation(Value: TGlyphOrientation);
procedure SetStretch(Value: Boolean);
procedure SetTransparentColor(Value: TColor);
procedure TimerExpired(Sender: TObject);
function TransparentStored: Boolean;
procedure UpdateInactive;
procedure WMSize(var Message: TWMSize);| Properties |
property Active : Boolean
property Align :
property AutoSize : Boolean
property Color :
property Cursor :
property DragCursor :
property DragMode :
property Glyph : TBitmap
property GlyphNum : Integer
property InactiveGlyph : Integer
property Interval : Cardinal
property NumGlyphs : Integer
property Opaque : Boolean
property Orientation : TGlyphOrientation
property ParentColor :
property ParentShowHint :
property PopupMenu :
property ShowHint :
property Stretch : Boolean
property TransparentColor : TColor
property Visible : | Events |
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnFrameChanged : TNotifyEvent
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
event OnStart : TNotifyEvent
event OnStartDrag :
event OnStop : TNotifyEvent| Variables |
FActive : Boolean;
FAutoSize : Boolean;
FGlyph : TBitmap;
FGlyphNum : Integer;
FImageHeight : Integer;
FImageWidth : Integer;
FInactiveGlyph : Integer;
FNumGlyphs : Integer;
FOnFrameChanged : TNotifyEvent;
FOnStart : TNotifyEvent;
FOnStop : TNotifyEvent;
FOpaque : Boolean;
FOrientation : TGlyphOrientation;
FStretch : Boolean;
FTimer : TTimer;
FTimerRepaint : Boolean;
FTransparentColor : TColor;| Constructors |
constructor Create(AOwner: TComponent);Public declarations
TAnimatedImage
| Functions |
destructor Destroy;
procedure DoPaintImage;
procedure FrameChanged;
function GetPalette: HPALETTE;Protected declarations
procedure Loaded;
procedure Paint;if Orientation = goVertical then
procedure Start;
procedure Stop;
procedure AdjustBounds;if Orientation = goVertical then
procedure DefineBitmapSize;
function GetInterval: Cardinal;
procedure ImageChanged(Sender: TObject);
procedure ResetImageBounds;
procedure SetActive(Value: Boolean);
procedure SetAutoSize(Value: Boolean);
procedure SetGlyph(Value: TBitmap);
procedure SetGlyphNum(Value: Integer);
procedure SetInactiveGlyph(Value: Integer);
procedure SetInterval(Value: Cardinal);
procedure SetNumGlyphs(Value: Integer);
procedure SetOpaque(Value: Boolean);
procedure SetOrientation(Value: TGlyphOrientation);
procedure SetStretch(Value: Boolean);
procedure SetTransparentColor(Value: TColor);
procedure TimerExpired(Sender: TObject);
function TransparentStored: Boolean;
procedure UpdateInactive;
procedure WMSize(var Message: TWMSize);| Properties |
property Active : BooleanPublished declarations
property Align :
property AutoSize : Boolean
property Color :
property Cursor :
property DragCursor :
property DragMode :
property Glyph : TBitmap
property GlyphNum : Integer
property InactiveGlyph : Integer
property Interval : Cardinal
property NumGlyphs : Integer
property Opaque : Boolean
property Orientation : TGlyphOrientation
property ParentColor :
property ParentShowHint :
property PopupMenu :
property ShowHint :
property Stretch : Boolean
property TransparentColor : TColor
property Visible : | Events |
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnFrameChanged : TNotifyEvent
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
event OnStart : TNotifyEvent
event OnStartDrag :
event OnStop : TNotifyEvent| Variables |
FActive : Boolean;Private declarations
FAutoSize : Boolean;
FGlyph : TBitmap;
FGlyphNum : Integer;
FImageHeight : Integer;
FImageWidth : Integer;
FInactiveGlyph : Integer;
FNumGlyphs : Integer;
FOnFrameChanged : TNotifyEvent;
FOnStart : TNotifyEvent;
FOnStop : TNotifyEvent;
FOpaque : Boolean;
FOrientation : TGlyphOrientation;
FStretch : Boolean;
FTimer : TTimer;
FTimerRepaint : Boolean;
FTransparentColor : TColor;