Class TRxGIFAnimator (unit GIFCtrl)

Inherits from

TRxImageControl

TRxGIFAnimator

Constructors


constructor Create(AOwner: TComponent);

Public declarations

TRxGIFAnimator



Functions

destructor Destroy;


procedure Change;


procedure DoPaintImage;


procedure FrameChanged;


function GetPalette: HPALETTE;

Protected declarations

do nothing


procedure Paint;

copy image from parent and back-level controls

procedure Start;


procedure Stop;


procedure AdjustBounds;


function GetDelayTime(Index: Integer): Word;


function GetFrameBitmap(Index: Integer; var TransColor: TColor): TBitmap;


procedure ImageChanged(Sender: TObject);


procedure SetAnimate(Value: Boolean);


procedure SetAutoSize(Value: Boolean);


procedure SetCenter(Value: Boolean);


procedure SetFrameIndex(Value: Integer);


procedure SetImage(Value: TGIFImage);


procedure SetStretch(Value: Boolean);


procedure SetTransparent(Value: Boolean);


procedure TimerExpired(Sender: TObject);


procedure WMSize(var Message: TWMSize);


Properties

property Align :


property Animate : Boolean

Published declarations

property AutoSize : Boolean


property Center : Boolean


property Cursor :


property DragCursor :


property DragMode :


property Enabled :


property FrameIndex : Integer


property Image : TGIFImage


property Loop : Boolean


property ParentShowHint :


property PopupMenu :


property ShowHint :


property Stretch : Boolean


property Transparent : Boolean


property Visible :


Events

event OnChange : TNotifyEvent


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

FAnimate : Boolean;

Private declarations

FAutoSize : Boolean;


FCenter : Boolean;


FFrameIndex : Integer;


FImage : TGIFImage;


FLoop : Boolean;


FOnChange : TNotifyEvent;


FOnFrameChanged : TNotifyEvent;


FOnStart : TNotifyEvent;


FOnStop : TNotifyEvent;


FStretch : Boolean;


FTimer : TRxTimer;


FTimerRepaint : Boolean;


FTransparent : Boolean;



Constructors


constructor Create(AOwner: TComponent);

Public declarations

TRxGIFAnimator


Functions


destructor Destroy;


procedure Change;


procedure DoPaintImage;


procedure FrameChanged;


function GetPalette: HPALETTE;

Protected declarations

do nothing


procedure Paint;

copy image from parent and back-level controls


procedure Start;


procedure Stop;


procedure AdjustBounds;


function GetDelayTime(Index: Integer): Word;


function GetFrameBitmap(Index: Integer; var TransColor: TColor): TBitmap;


procedure ImageChanged(Sender: TObject);


procedure SetAnimate(Value: Boolean);


procedure SetAutoSize(Value: Boolean);


procedure SetCenter(Value: Boolean);


procedure SetFrameIndex(Value: Integer);


procedure SetImage(Value: TGIFImage);


procedure SetStretch(Value: Boolean);


procedure SetTransparent(Value: Boolean);


procedure TimerExpired(Sender: TObject);


procedure WMSize(var Message: TWMSize);


Properties


property Align :


property Animate : Boolean

Published declarations


property AutoSize : Boolean


property Center : Boolean


property Cursor :


property DragCursor :


property DragMode :


property Enabled :


property FrameIndex : Integer


property Image : TGIFImage


property Loop : Boolean


property ParentShowHint :


property PopupMenu :


property ShowHint :


property Stretch : Boolean


property Transparent : Boolean


property Visible :


Events


event OnChange : TNotifyEvent


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


FAnimate : Boolean;

Private declarations


FAutoSize : Boolean;


FCenter : Boolean;


FFrameIndex : Integer;


FImage : TGIFImage;


FLoop : Boolean;


FOnChange : TNotifyEvent;


FOnFrameChanged : TNotifyEvent;


FOnStart : TNotifyEvent;


FOnStop : TNotifyEvent;


FStretch : Boolean;


FTimer : TRxTimer;


FTimerRepaint : Boolean;


FTransparent : Boolean;