Class TExtract (unit extrunit)

Inherits from

TForm

Constructors



Functions

procedure CancelButClick(Sender: TObject);


procedure FormActivate(Sender: TObject);

dflt: extract all files

procedure FormCreate(Sender: TObject);


procedure OKButClick(Sender: TObject);


Properties

Events

Variables

CancelBut : TButton;


DirectoryListBox1 : TDirectoryListBox;


DriveComboBox1 : TDriveComboBox;


OKBut : TButton;


Panel1 : TPanel;


Panel2 : TPanel;


Panel3 : TPanel;


RadioGroup1 : TRadioGroup;


RadioGroup2 : TRadioGroup;


RadioGroup3 : TRadioGroup;



Constructors


Functions


procedure CancelButClick(Sender: TObject);


procedure FormActivate(Sender: TObject);

dflt: extract all files


procedure FormCreate(Sender: TObject);


procedure OKButClick(Sender: TObject);


Properties


Events


Variables


CancelBut : TButton;


DirectoryListBox1 : TDirectoryListBox;


DriveComboBox1 : TDriveComboBox;


OKBut : TButton;


Panel1 : TPanel;


Panel2 : TPanel;


Panel3 : TPanel;


RadioGroup1 : TRadioGroup;


RadioGroup2 : TRadioGroup;


RadioGroup3 : TRadioGroup;