| Class TAnimatedIconsPropertyEditDlg (unit AniIcoEd) |
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 );
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);
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;