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;