| Class TAddForm (unit Addunit) |
TForm
| Constructors |
| Functions |
procedure AddDirButClick(Sender: TObject);
procedure AddFileButClick(Sender: TObject);
function AppendSlash(const sDir : String): String;
procedure CancelButClick(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure OKButClick(Sender: TObject);
procedure RemoveButClick(Sender: TObject);
procedure SelectAllButClick(Sender: TObject);
procedure SortButClick(Sender: TObject);| Properties |
| Events |
| Variables |
AddDirBut : TButton;
AddFileBut : TButton;
Bevel1 : TBevel;
CancelBut : TButton;
DirectoryListBox1 : TDirectoryListBox;
DirNameCB : TCheckBox;
DriveComboBox1 : TDriveComboBox;
EncryptCB : TCheckBox;
FileListBox1 : TFileListBox;
Label1 : TLabel;
Label2 : TLabel;
OKBut : TButton;
Panel1 : TPanel;
Panel2 : TPanel;
Panel3 : TPanel;
Panel4 : TPanel;
Panel5 : TPanel;
Panel6 : TPanel;
Panel7 : TPanel;
Panel8 : TPanel;
RecurseCB : TCheckBox;
RemoveBut : TButton;
SelectAllBut : TButton;
SelectedList : TListBox;
SortBut : TButton;| Constructors |
| Functions |
procedure AddDirButClick(Sender: TObject);
procedure AddFileButClick(Sender: TObject);Position the "SelectedList" listbox at the bottom
function AppendSlash(const sDir : String): String;
procedure CancelButClick(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure OKButClick(Sender: TObject);
procedure RemoveButClick(Sender: TObject);list will remain sorted
procedure SelectAllButClick(Sender: TObject);
procedure SortButClick(Sender: TObject);| Properties |
| Events |
| Variables |
AddDirBut : TButton;
AddFileBut : TButton;
Bevel1 : TBevel;
CancelBut : TButton;
DirectoryListBox1 : TDirectoryListBox;
DirNameCB : TCheckBox;
DriveComboBox1 : TDriveComboBox;
EncryptCB : TCheckBox;
FileListBox1 : TFileListBox;
Label1 : TLabel;
Label2 : TLabel;
OKBut : TButton;
Panel1 : TPanel;
Panel2 : TPanel;
Panel3 : TPanel;
Panel4 : TPanel;
Panel5 : TPanel;
Panel6 : TPanel;
Panel7 : TPanel;
Panel8 : TPanel;
RecurseCB : TCheckBox;
RemoveBut : TButton;
SelectAllBut : TButton;
SelectedList : TListBox;
SortBut : TButton;