Class TfrmExtract (unit Extract)

Inherits from

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;

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;



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;