Class TAmlBmpSelector (unit BmpSel)

Inherits from

TForm

Constructors



Functions

procedure ButtonPaletteCheckBoxClick(Sender: TObject);


procedure ClearBtnClick(Sender: TObject);


procedure DirectoryListBoxChange(Sender: TObject);


procedure DirHistoryChange(Sender: TObject);


procedure DirPanelResize(Sender: TObject);


procedure FileListBoxChange(Sender: TObject);


procedure FormClose(Sender: TObject; var Action: TCloseAction);


procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);


procedure FormResize(Sender: TObject);

ImagePanel.

procedure FormShow(Sender: TObject);

run from Delphi IDE will raise an EGPF exception

procedure GlyphsComboBoxChange(Sender: TObject);


procedure RightPanelResize(Sender: TObject);


procedure SBtnAddDirClick(Sender: TObject);


procedure SBtnExitClick(Sender: TObject);


procedure SBtnInfoClick(Sender: TObject);


procedure SBtnRemoveDirClick(Sender: TObject);


procedure ShowButtonsCheckBoxClick(Sender: TObject);


procedure SpeedButton1Click(Sender: TObject);


procedure SpeedButton2Click(Sender: TObject);


procedure StretchCheckBoxClick(Sender: TObject);


procedure AddDirectory(s : string);


procedure SetButtonsText;


Properties

Events

Variables

AddDirItem : TMenuItem;


BmpDirListMenu : TPopupMenu;


BtnLabel1 : TLabel;


BtnLabel2 : TLabel;


BtnLabel3 : TLabel;


ButtonPaletteCheckBox : TCheckBox;


ButtonsPanel : TPanel;


CancelBtn : TBitBtn;


ClearBtn : TBitBtn;


Directorylabel : TLabel;


DirectoryListBox : TDirectoryListBox;


DirHistory : TComboBox;


DirPanel : TPanel;


DriveComboBox : TDriveComboBox;


DriveLabel : TLabel;


ExamplesPanel : TPanel;


FileEdit : TEdit;


FileListBox : TFileListBox;


FilterComboBox : TFilterComboBox;


FilterLabel : TLabel;


GlyphsComboBox : TComboBox;


GlyphsLabel : TLabel;


Image : TImage;


ImagePanel : TPanel;


ImageSizeLabel : TLabel;


Label1 : TLabel;


Label2 : TLabel;


Label5 : TLabel;


Label6 : TLabel;


Label7 : TLabel;


LeftPanel : TPanel;


OKBtn : TBitBtn;


RemoveDirItem : TMenuItem;


RightPanel : TPanel;


SBtnAddDir : TSpeedButton;


SBtnExit : TSpeedButton;


SBtnInfo : TSpeedButton;


ScrollBox1 : TScrollBox;


ShowButtonsCheckBox : TCheckBox;


SpeedButton1 : TSpeedButton;


SpeedButton2 : TSpeedButton;


SpeedButton3 : TSpeedButton;


SpeedButton4 : TSpeedButton;


SpeedPanel : TPanel;


StatusDirPanel : TPanel;


StatusPanel : TPanel;


StatusSizePanel : TPanel;


StretchCheckBox : TCheckBox;


BmpDirList : TStringList;

Private declarations


Constructors


Functions


procedure ButtonPaletteCheckBoxClick(Sender: TObject);


procedure ClearBtnClick(Sender: TObject);


procedure DirectoryListBoxChange(Sender: TObject);


procedure DirHistoryChange(Sender: TObject);


procedure DirPanelResize(Sender: TObject);


procedure FileListBoxChange(Sender: TObject);


procedure FormClose(Sender: TObject; var Action: TCloseAction);


procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);


procedure FormResize(Sender: TObject);

ImagePanel.Height := (RightPanel.Height - GlyphsPanel.Height) div 2


procedure FormShow(Sender: TObject);

run from Delphi IDE will raise an EGPF exception


procedure GlyphsComboBoxChange(Sender: TObject);


procedure RightPanelResize(Sender: TObject);


procedure SBtnAddDirClick(Sender: TObject);


procedure SBtnExitClick(Sender: TObject);


procedure SBtnInfoClick(Sender: TObject);


procedure SBtnRemoveDirClick(Sender: TObject);


procedure ShowButtonsCheckBoxClick(Sender: TObject);


procedure SpeedButton1Click(Sender: TObject);


procedure SpeedButton2Click(Sender: TObject);


procedure StretchCheckBoxClick(Sender: TObject);


procedure AddDirectory(s : string);


procedure SetButtonsText;


Properties


Events


Variables


AddDirItem : TMenuItem;


BmpDirListMenu : TPopupMenu;


BtnLabel1 : TLabel;


BtnLabel2 : TLabel;


BtnLabel3 : TLabel;


ButtonPaletteCheckBox : TCheckBox;


ButtonsPanel : TPanel;


CancelBtn : TBitBtn;


ClearBtn : TBitBtn;


Directorylabel : TLabel;


DirectoryListBox : TDirectoryListBox;


DirHistory : TComboBox;


DirPanel : TPanel;


DriveComboBox : TDriveComboBox;


DriveLabel : TLabel;


ExamplesPanel : TPanel;


FileEdit : TEdit;


FileListBox : TFileListBox;


FilterComboBox : TFilterComboBox;


FilterLabel : TLabel;


GlyphsComboBox : TComboBox;


GlyphsLabel : TLabel;


Image : TImage;


ImagePanel : TPanel;


ImageSizeLabel : TLabel;


Label1 : TLabel;


Label2 : TLabel;


Label5 : TLabel;


Label6 : TLabel;


Label7 : TLabel;


LeftPanel : TPanel;


OKBtn : TBitBtn;


RemoveDirItem : TMenuItem;


RightPanel : TPanel;


SBtnAddDir : TSpeedButton;


SBtnExit : TSpeedButton;


SBtnInfo : TSpeedButton;


ScrollBox1 : TScrollBox;


ShowButtonsCheckBox : TCheckBox;


SpeedButton1 : TSpeedButton;


SpeedButton2 : TSpeedButton;


SpeedButton3 : TSpeedButton;


SpeedButton4 : TSpeedButton;


SpeedPanel : TPanel;


StatusDirPanel : TPanel;


StatusPanel : TPanel;


StatusSizePanel : TPanel;


StretchCheckBox : TCheckBox;


BmpDirList : TStringList;

Private declarations