Class TSubImageDialog (unit FmSubImg) |
Inherits from
TForm
Imports ShowExtension
constructor Create(SubImages: TList);
- Public declarations
procedure CancelBtnClick(Sender: TObject);
TSubImageDialog.
procedure ExtensionsButtonClick(Sender: TObject);
TSubImageDialog.
procedure InterlacedBoxClick(Sender: TObject);
TSubImageDialog.
procedure OKBtnClick(Sender: TObject);
TSubImageDialog.
procedure TabSetChange(Sender: TObject; NewTab: Integer;
var AllowChange: Boolean);
TSubImageDialog.
procedure ShowSubImage(SubImage: TGifSubImage);
TSubImageDialog.
BitsPerPixelEdit : TSpinEdit;
CancelBtn : TButton;
ExtensionsButton : TButton;
GroupBox1 : TGroupBox;
HasLocalColormapBox : TCheckBox;
HeightEdit : TSpinEdit;
Image : TImage;
InterlacedBox : TCheckBox;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Label8 : TLabel;
LeftEdit : TSpinEdit;
NoColorsEdit : TSpinEdit;
OKBtn : TButton;
PackedFieldsEdit : TSpinEdit;
TabSet : TTabSet;
TopEdit : TSpinEdit;
TransparentBox : TCheckBox;
WidthEdit : TSpinEdit;
FCurrentSubImage : TGifSubImage;
FSubImages : TList;
Private declarations
constructor Create(SubImages: TList);
Public declarations
procedure CancelBtnClick(Sender: TObject);
TSubImageDialog.OKBtnClick
procedure ExtensionsButtonClick(Sender: TObject);
TSubImageDialog.CancelBtnClick
procedure InterlacedBoxClick(Sender: TObject);
TSubImageDialog.ShowSubImage
procedure OKBtnClick(Sender: TObject);
TSubImageDialog.TabSetChange
procedure TabSetChange(Sender: TObject; NewTab: Integer;
var AllowChange: Boolean);
TSubImageDialog.InterlacedBoxClick
procedure ShowSubImage(SubImage: TGifSubImage);
TSubImageDialog.Create
BitsPerPixelEdit : TSpinEdit;
CancelBtn : TButton;
ExtensionsButton : TButton;
GroupBox1 : TGroupBox;
HasLocalColormapBox : TCheckBox;
HeightEdit : TSpinEdit;
Image : TImage;
InterlacedBox : TCheckBox;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Label8 : TLabel;
LeftEdit : TSpinEdit;
NoColorsEdit : TSpinEdit;
OKBtn : TButton;
PackedFieldsEdit : TSpinEdit;
TabSet : TTabSet;
TopEdit : TSpinEdit;
TransparentBox : TCheckBox;
WidthEdit : TSpinEdit;
FCurrentSubImage : TGifSubImage;
FSubImages : TList;
Private declarations