Class TEnhancedImageForm (unit Imagefrm)

Inherits from

TForm

Constructors



Functions

procedure BitBtn3Click(Sender: TObject);

finally

procedure BitBtn5Click(Sender: TObject);

except

procedure BitBtn6Click(Sender: TObject);

else

procedure CheckBox1Click(Sender: TObject);

if

procedure cmbQuickDirsChange(Sender: TObject);


procedure DirectoryOutline1Change(Sender: TObject);

finally

procedure DriveComboBox1Change(Sender: TObject);

finally

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


procedure FileListBox1Change(Sender: TObject);


procedure FileListBox1Click(Sender: TObject);

finally

procedure FileListBox1DblClick(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);


procedure FormShow(Sender: TObject);


procedure sbtnClearClick(Sender: TObject);

with

procedure sbtnCopyClick(Sender: TObject);


procedure sbtnPasteClick(Sender: TObject);


procedure SpeedButton3Click(Sender: TObject);

if

procedure SpinEdit1Change(Sender: TObject);


procedure StretchCheckClick(Sender: TObject);


procedure ViewAsGlyph(const FileExt: string);

else

procedure ViewBtnClick(Sender: TObject);


procedure CheckEnablePaste;


procedure LoadQuickDirs;


procedure WMActivate(var Msg: TWMActivate);


Properties

Events

Variables

Bevel1 : TBevel;


Bevel2 : TBevel;


BitBtn1 : TBitBtn;


BitBtn2 : TBitBtn;


BitBtn3 : TBitBtn;


BitBtn4 : TBitBtn;


BitBtn5 : TBitBtn;


BitBtn6 : TBitBtn;


CheckBox1 : TCheckBox;


cmbQuickDirs : TComboBox;


DirectoryOutline1 : TDirectoryOutline;


DisabledGrp : TGroupBox;


DriveComboBox1 : TDriveComboBox;


FileEdit : TEdit;


FileListBox1 : TFileListBox;


FilterComboBox1 : TFilterComboBox;


Image1 : TImage;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Panel1 : TPanel;


PathLabel : TLabel;


SaveDialog1 : TSaveDialog;


sbtnClear : TSpeedButton;


sbtnCopy : TSpeedButton;


sbtnPaste : TSpeedButton;


SpeedButton1 : TSpeedButton;


SpeedButton2 : TSpeedButton;


SpeedButton3 : TSpeedButton;


SpinEdit1 : TSpinEdit;


StretchCheck : TCheckBox;


UpDownGroup : TGroupBox;


ViewBtn : TBitBtn;


WaitLabel : TLabel;


DefaultDir : string;

Private declarations

strlDirectories : TStringList;



Constructors


Functions


procedure BitBtn3Click(Sender: TObject);

finally


procedure BitBtn5Click(Sender: TObject);

except


procedure BitBtn6Click(Sender: TObject);

else


procedure CheckBox1Click(Sender: TObject);

if


procedure cmbQuickDirsChange(Sender: TObject);


procedure DirectoryOutline1Change(Sender: TObject);

finally


procedure DriveComboBox1Change(Sender: TObject);

finally


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


procedure FileListBox1Change(Sender: TObject);


procedure FileListBox1Click(Sender: TObject);

finally


procedure FileListBox1DblClick(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);


procedure FormShow(Sender: TObject);


procedure sbtnClearClick(Sender: TObject);

with


procedure sbtnCopyClick(Sender: TObject);


procedure sbtnPasteClick(Sender: TObject);


procedure SpeedButton3Click(Sender: TObject);

if


procedure SpinEdit1Change(Sender: TObject);


procedure StretchCheckClick(Sender: TObject);


procedure ViewAsGlyph(const FileExt: string);

else


procedure ViewBtnClick(Sender: TObject);


procedure CheckEnablePaste;


procedure LoadQuickDirs;


procedure WMActivate(var Msg: TWMActivate);


Properties


Events


Variables


Bevel1 : TBevel;


Bevel2 : TBevel;


BitBtn1 : TBitBtn;


BitBtn2 : TBitBtn;


BitBtn3 : TBitBtn;


BitBtn4 : TBitBtn;


BitBtn5 : TBitBtn;


BitBtn6 : TBitBtn;


CheckBox1 : TCheckBox;


cmbQuickDirs : TComboBox;


DirectoryOutline1 : TDirectoryOutline;


DisabledGrp : TGroupBox;


DriveComboBox1 : TDriveComboBox;


FileEdit : TEdit;


FileListBox1 : TFileListBox;


FilterComboBox1 : TFilterComboBox;


Image1 : TImage;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Panel1 : TPanel;


PathLabel : TLabel;


SaveDialog1 : TSaveDialog;


sbtnClear : TSpeedButton;


sbtnCopy : TSpeedButton;


sbtnPaste : TSpeedButton;


SpeedButton1 : TSpeedButton;


SpeedButton2 : TSpeedButton;


SpeedButton3 : TSpeedButton;


SpinEdit1 : TSpinEdit;


StretchCheck : TCheckBox;


UpDownGroup : TGroupBox;


ViewBtn : TBitBtn;


WaitLabel : TLabel;


DefaultDir : string;

Private declarations


strlDirectories : TStringList;