Class TAnimatedIconsPropertyEditDlg (unit AniIcoEd)

Inherits from

TForm

Constructors



Functions

procedure btnCancelClick(Sender: TObject);


procedure btnDeleteFrameClick(Sender: TObject);


procedure btnDownClick(Sender: TObject);


procedure btnLoadFrameClick(Sender: TObject);


procedure btnLoadFramesClick(Sender: TObject);


procedure btnOkClick(Sender: TObject);


procedure btnPlayClick(Sender: TObject);


procedure btnSaveFramesClick(Sender: TObject);


procedure btnStopClick(Sender: TObject);


procedure btnUpClick(Sender: TObject);


procedure edtAuthorChange(Sender: TObject);


procedure edtSpiffiesChange(Sender: TObject);


procedure edtSpiffiesKeyPress(Sender: TObject; var Key: Char);


procedure edtTitleChange(Sender: TObject);


procedure FormCreate( Sender : TObject );

TAnimatedIconsPropertyEditDlg

procedure FormDestroy( Sender : TObject );


procedure lstIconsClick(Sender: TObject);


procedure lstIconsDrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState);


procedure lstIconsMeasureItem(Control: TWinControl; Index: Integer; var Height: Integer);


procedure pbxIconPaint(Sender: TObject);


procedure CheckButtons;


function GetDisplayTime(const Index: Integer): String;


procedure NewFrame(Sender: TObject; Frame: Integer);

LR_LOADREALSIZE or LR_LOADFROMFILE);

procedure PaintIcon(Index: Integer);


procedure SetFormVars;


procedure SetIcons(Value: TAnimatedIcons);


Properties

property Icons : TAnimatedIcons


property PropName : string


Events

Variables

btnCancel : TButton;


btnDeleteFrame : TSpeedButton;


btnDown : TSpeedButton;


btnLoadFrame : TSpeedButton;


btnLoadFrames : TSpeedButton;


btnOk : TButton;


btnPlay : TSpeedButton;


btnSaveFrames : TSpeedButton;


btnStop : TSpeedButton;


btnUp : TSpeedButton;


dlgOpenFrame : TOpenDialog;


dlgOpenFrames : TOpenDialog;


dlgSaveFrames : TSaveDialog;


edtAuthor : TEdit;


edtSpiffies : TEdit;


edtTitle : TEdit;


grpPreview : TGroupBox;


grpSpiffies : TGroupBox;


lblAuthor : TLabel;


lblExplainSpiffies : TLabel;


lblIcons : TLabel;


lblSpiffies : TLabel;


lblSpiffies2 : TLabel;


lblTitle : TLabel;


lstIcons : TListBox;


pbxIcon : TPaintBox;


pnlButtons : TPanel;


pnlFrames : TPanel;


pnlInformation : TPanel;


pnlPreview : TPanel;


udSpiffies : TUpDown;


FIcons : TAnimatedIcons;


FIconSize : Integer;


FIgnore : Boolean;


FPropName : string;



Constructors


Functions


procedure btnCancelClick(Sender: TObject);


procedure btnDeleteFrameClick(Sender: TObject);


procedure btnDownClick(Sender: TObject);


procedure btnLoadFrameClick(Sender: TObject);


procedure btnLoadFramesClick(Sender: TObject);


procedure btnOkClick(Sender: TObject);


procedure btnPlayClick(Sender: TObject);


procedure btnSaveFramesClick(Sender: TObject);


procedure btnStopClick(Sender: TObject);


procedure btnUpClick(Sender: TObject);


procedure edtAuthorChange(Sender: TObject);


procedure edtSpiffiesChange(Sender: TObject);


procedure edtSpiffiesKeyPress(Sender: TObject; var Key: Char);


procedure edtTitleChange(Sender: TObject);


procedure FormCreate( Sender : TObject );

TAnimatedIconsPropertyEditDlg


procedure FormDestroy( Sender : TObject );


procedure lstIconsClick(Sender: TObject);


procedure lstIconsDrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState);


procedure lstIconsMeasureItem(Control: TWinControl; Index: Integer; var Height: Integer);


procedure pbxIconPaint(Sender: TObject);


procedure CheckButtons;


function GetDisplayTime(const Index: Integer): String;


procedure NewFrame(Sender: TObject; Frame: Integer);

LR_LOADREALSIZE or LR_LOADFROMFILE);


procedure PaintIcon(Index: Integer);


procedure SetFormVars;


procedure SetIcons(Value: TAnimatedIcons);


Properties


property Icons : TAnimatedIcons


property PropName : string


Events


Variables


btnCancel : TButton;


btnDeleteFrame : TSpeedButton;


btnDown : TSpeedButton;


btnLoadFrame : TSpeedButton;


btnLoadFrames : TSpeedButton;


btnOk : TButton;


btnPlay : TSpeedButton;


btnSaveFrames : TSpeedButton;


btnStop : TSpeedButton;


btnUp : TSpeedButton;


dlgOpenFrame : TOpenDialog;


dlgOpenFrames : TOpenDialog;


dlgSaveFrames : TSaveDialog;


edtAuthor : TEdit;


edtSpiffies : TEdit;


edtTitle : TEdit;


grpPreview : TGroupBox;


grpSpiffies : TGroupBox;


lblAuthor : TLabel;


lblExplainSpiffies : TLabel;


lblIcons : TLabel;


lblSpiffies : TLabel;


lblSpiffies2 : TLabel;


lblTitle : TLabel;


lstIcons : TListBox;


pbxIcon : TPaintBox;


pnlButtons : TPanel;


pnlFrames : TPanel;


pnlInformation : TPanel;


pnlPreview : TPanel;


udSpiffies : TUpDown;


FIcons : TAnimatedIcons;


FIconSize : Integer;


FIgnore : Boolean;


FPropName : string;