Class TMainForm (unit Main) |
Inherits from
TForm
procedure AnimateMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure BackgroundMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure CenterMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure ChooseBackgroundMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure ExitMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure FormActivate(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure FormCreate(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure FormDestroy(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure FrameSpinEditChange(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure LoopMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure OpenMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure PriorityMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure SaveBitmapAsMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure SaveMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure ShowDialogMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure SpeedSpinEditChange(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure StretchMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure StretchRatioMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure ThreadedMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure TileMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure VisibleMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure GIFProgress(Sender: TObject;
const BytesProcessed, BytesToProcess,
PercentageProcessed: LongInt;
var KeepOnProcessing: Boolean);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure UpdateCaption(ADescription: String);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
AnimateMenuItem : TMenuItem;
BackgroundMenuItem : TMenuItem;
CenterMenuItem : TMenuItem;
ChooseBackgroundMenuItem : TMenuItem;
ExitMenuItem : TMenuItem;
ExitPopupMenuItem : TMenuItem;
FileMenuItem : TMenuItem;
FrameLabel : TLabel;
FrameSpinEdit : TSpinEdit;
GIFPopupMenu : TPopupMenu;
HigherMenuItem : TMenuItem;
HighestMenuItem : TMenuItem;
IdleMenuItem : TMenuItem;
Line1 : TMenuItem;
Line3 : TMenuItem;
Line4 : TMenuItem;
LoopMenuItem : TMenuItem;
LowerMenuItem : TMenuItem;
LowestMenuItem : TMenuItem;
MainMenu : TMainMenu;
NormalMenuItem : TMenuItem;
OpenDialog : TOpenDialog;
OpenMenuItem : TMenuItem;
OpenPopupMenuItem : TMenuItem;
PercentLabel : TLabel;
PopupLine1 : TMenuItem;
ProgressBar : TProgressBar;
PropertiesMenuItem : TMenuItem;
SaveBitmapAsMenuItem : TMenuItem;
SaveDialog : TSaveDialog;
SaveMenuItem : TMenuItem;
ShowDialogMenuItem : TMenuItem;
ShowDialogPopupMenuItem : TMenuItem;
SpeedLabel : TLabel;
SpeedSpinEdit : TSpinEdit;
StatusBar : TStatusBar;
StretchMenuItem : TMenuItem;
StretchRatioMenuItem : TMenuItem;
ThreadedMenuItem : TMenuItem;
ThreadPriorityMenuItem : TMenuItem;
TileMenuItem : TMenuItem;
TimeCriticalMenuItem : TMenuItem;
ToolBar : TPanel;
VisibleMenuItem : TMenuItem;
BackGIF : TGIFImage;
GIF : TGIFImage;
Public declarations
procedure AnimateMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure BackgroundMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure CenterMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure ChooseBackgroundMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure ExitMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure FormActivate(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure FormCreate(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure FormDestroy(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure FrameSpinEditChange(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure LoopMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure OpenMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure PriorityMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure SaveBitmapAsMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure SaveMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure ShowDialogMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure SpeedSpinEditChange(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure StretchMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure StretchRatioMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure ThreadedMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure TileMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure VisibleMenuItemClick(Sender: TObject);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure GIFProgress(Sender: TObject;
const BytesProcessed, BytesToProcess,
PercentageProcessed: LongInt;
var KeepOnProcessing: Boolean);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
procedure UpdateCaption(ADescription: String);
MWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMWMW
AnimateMenuItem : TMenuItem;
BackgroundMenuItem : TMenuItem;
CenterMenuItem : TMenuItem;
ChooseBackgroundMenuItem : TMenuItem;
ExitMenuItem : TMenuItem;
ExitPopupMenuItem : TMenuItem;
FileMenuItem : TMenuItem;
FrameLabel : TLabel;
FrameSpinEdit : TSpinEdit;
GIFPopupMenu : TPopupMenu;
HigherMenuItem : TMenuItem;
HighestMenuItem : TMenuItem;
IdleMenuItem : TMenuItem;
Line1 : TMenuItem;
Line3 : TMenuItem;
Line4 : TMenuItem;
LoopMenuItem : TMenuItem;
LowerMenuItem : TMenuItem;
LowestMenuItem : TMenuItem;
MainMenu : TMainMenu;
NormalMenuItem : TMenuItem;
OpenDialog : TOpenDialog;
OpenMenuItem : TMenuItem;
OpenPopupMenuItem : TMenuItem;
PercentLabel : TLabel;
PopupLine1 : TMenuItem;
ProgressBar : TProgressBar;
PropertiesMenuItem : TMenuItem;
SaveBitmapAsMenuItem : TMenuItem;
SaveDialog : TSaveDialog;
SaveMenuItem : TMenuItem;
ShowDialogMenuItem : TMenuItem;
ShowDialogPopupMenuItem : TMenuItem;
SpeedLabel : TLabel;
SpeedSpinEdit : TSpinEdit;
StatusBar : TStatusBar;
StretchMenuItem : TMenuItem;
StretchRatioMenuItem : TMenuItem;
ThreadedMenuItem : TMenuItem;
ThreadPriorityMenuItem : TMenuItem;
TileMenuItem : TMenuItem;
TimeCriticalMenuItem : TMenuItem;
ToolBar : TPanel;
VisibleMenuItem : TMenuItem;
BackGIF : TGIFImage;
GIF : TGIFImage;
Public declarations