Class TImageForm (unit ImageWin)

Inherits from

TForm

THIS UNIT WAS BORROWED FROM THE BORLAND DEMOS AND MODIFIED

Constructors



Functions

procedure FileEditKeyPress(Sender: TObject; var Key: Char);


procedure FileListBox1Click(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure FormHide(Sender: TObject);


procedure GlyphCheckClick(Sender: TObject);


procedure StretchCheckClick(Sender: TObject);


procedure UpDownEditChange(Sender: TObject);


procedure ViewAsGlyph(const FileExt: string);


procedure ViewBtnClick(Sender: TObject);


Procedure BmpsOnly(IsGlyph : Boolean);


Procedure IconsOnly;


Procedure SetMasks(Const FilterMask : String; Const EditMask : String; Const ListMask : String);


Properties

Events

Variables

Bevel1 : TBevel;


Bevel2 : TBevel;


BitBtn1 : TBitBtn;


BitBtn2 : TBitBtn;


CancelBtn : TBitBtn;


DirectoryListBox1 : TDirectoryListBox;


DisabledGrp : TGroupBox;


DriveComboBox1 : TDriveComboBox;


FileEdit : TEdit;


FileListBox1 : TFileListBox;


FilterComboBox1 : TFilterComboBox;


GlyphCheck : TCheckBox;


Image1 : TImage;


Label2 : TLabel;


OkBtn : TBitBtn;


Panel1 : TPanel;


SpeedButton1 : TSpeedButton;


SpeedButton2 : TSpeedButton;


StretchCheck : TCheckBox;


UpDown1 : TUpDown;


UpDownEdit : TEdit;


UpDownGroup : TGroupBox;


ViewBtn : TBitBtn;


FormCaption : string;



Constructors


Functions


procedure FileEditKeyPress(Sender: TObject; var Key: Char);


procedure FileListBox1Click(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure FormHide(Sender: TObject);


procedure GlyphCheckClick(Sender: TObject);


procedure StretchCheckClick(Sender: TObject);


procedure UpDownEditChange(Sender: TObject);


procedure ViewAsGlyph(const FileExt: string);


procedure ViewBtnClick(Sender: TObject);


Procedure BmpsOnly(IsGlyph : Boolean);


Procedure IconsOnly;


Procedure SetMasks(Const FilterMask : String; Const EditMask : String; Const ListMask : String);


Properties


Events


Variables


Bevel1 : TBevel;


Bevel2 : TBevel;


BitBtn1 : TBitBtn;


BitBtn2 : TBitBtn;


CancelBtn : TBitBtn;


DirectoryListBox1 : TDirectoryListBox;


DisabledGrp : TGroupBox;


DriveComboBox1 : TDriveComboBox;


FileEdit : TEdit;


FileListBox1 : TFileListBox;


FilterComboBox1 : TFilterComboBox;


GlyphCheck : TCheckBox;


Image1 : TImage;


Label2 : TLabel;


OkBtn : TBitBtn;


Panel1 : TPanel;


SpeedButton1 : TSpeedButton;


SpeedButton2 : TSpeedButton;


StretchCheck : TCheckBox;


UpDown1 : TUpDown;


UpDownEdit : TEdit;


UpDownGroup : TGroupBox;


ViewBtn : TBitBtn;


FormCaption : string;