Class TMainForm (unit Main)

Inherits from

TForm

Constructors



Functions

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

Properties

Events

Variables

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


Constructors


Functions


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


Properties


Events


Variables


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