| Class TfrmExtract (unit Extract) |
TForm
| Constructors |
| Functions |
procedure cmdCreateDirClick(Sender: TObject);
procedure cmdOkClick(Sender: TObject);
procedure dirDirectoriesChange(Sender: TObject);
procedure FormShow(Sender: TObject);
function GetAllFiles: Boolean;
function GetDirectory: String;
function GetOverwrite: Boolean;
function GetUseDirectories: Boolean;| Properties |
property AllFiles : Boolean
property Directory : String
property Overwrite : Boolean
property UseDirectories : Boolean| Events |
| Variables |
cboExtractTo : TComboBox;
chkOverwrite : TCheckBox;
chkUseDirectories : TCheckBox;
cmdCancel : TButton;
cmdCreateDir : TButton;
cmdOk : TButton;
dirDirectories : TDirectoryListBox;
drvDrives : TDriveComboBox;
grpFiles : TGroupBox;
Label1 : TLabel;
Label2 : TLabel;
rdbAllFiles : TRadioButton;
rdbSelected : TRadioButton;| Constructors |
| Functions |
procedure cmdCreateDirClick(Sender: TObject);
procedure cmdOkClick(Sender: TObject);
procedure dirDirectoriesChange(Sender: TObject);
procedure FormShow(Sender: TObject);
function GetAllFiles: Boolean;
function GetDirectory: String;Private declarations
function GetOverwrite: Boolean;
function GetUseDirectories: Boolean;| Properties |
property AllFiles : Boolean
property Directory : String
property Overwrite : Boolean
property UseDirectories : Boolean| Events |
| Variables |
cboExtractTo : TComboBox;
chkOverwrite : TCheckBox;
chkUseDirectories : TCheckBox;
cmdCancel : TButton;
cmdCreateDir : TButton;
cmdOk : TButton;
dirDirectories : TDirectoryListBox;
drvDrives : TDriveComboBox;
grpFiles : TGroupBox;
Label1 : TLabel;
Label2 : TLabel;
rdbAllFiles : TRadioButton;
rdbSelected : TRadioButton;