Class TfrmNewGroup (unit FNewGr)
Inherits from
TForm
Constructors
Functions
procedure BBHelpClick(Sender: TObject);
procedure EGroupNameKeyPress(Sender: TObject; var Key: Char);
procedure EImageIndexChange(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure pbImagePaint(Sender: TObject);
function GetGroupData(const GroupName:string;Columns,ImageIndex:Integer;Direction:TCreateDirection;EditGroupName:Boolean;ImageList:TImageList):Word;
procedure ShowImage(ImageIndex:Integer);
Properties
Events
Variables
BBCancel : TBitBtn;
BBHelp : TBitBtn;
BBOk : TBitBtn;
CMBDirection : TComboBox;
EColumns : TSpinEdit;
EGroupName : TEdit;
EImageIndex : TSpinEdit;
FormSaver : TFormSaver;
GroupBox1 : TGroupBox;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Panel1 : TPanel;
Panel2 : TPanel;
PanelForSBExt1 : TAutoAlignPanel;
pbImage : TPaintBox;
pnlImage : TPanel;
FImageList : TImageList;
Constructors
Functions
procedure BBHelpClick(Sender: TObject);
procedure EGroupNameKeyPress(Sender: TObject; var Key: Char);
procedure EImageIndexChange(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure pbImagePaint(Sender: TObject);
function GetGroupData(const GroupName:string;Columns,ImageIndex:Integer;Direction:TCreateDirection;EditGroupName:Boolean;ImageList:TImageList):Word;
procedure ShowImage(ImageIndex:Integer);
Properties
Events
Variables
BBCancel : TBitBtn;
BBHelp : TBitBtn;
BBOk : TBitBtn;
CMBDirection : TComboBox;
EColumns : TSpinEdit;
EGroupName : TEdit;
EImageIndex : TSpinEdit;
FormSaver : TFormSaver;
GroupBox1 : TGroupBox;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Panel1 : TPanel;
Panel2 : TPanel;
PanelForSBExt1 : TAutoAlignPanel;
pbImage : TPaintBox;
pnlImage : TPanel;
FImageList : TImageList;