Inherits from
TForm
procedure Button10Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
--------------------------King---------------
procedure Button3Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button6Click(Sender: TObject);
procedure Button7Click(Sender: TObject);
--Note that PanelBill remains unchanged, so we reset its properties
procedure Button8Click(Sender: TObject);
--self explained--
procedure Button9Click(Sender: TObject);
procedure DirectoryListBox1Change(Sender: TObject);
procedure DirectoryListBox2Change(Sender: TObject);
procedure DriveComboBox1Change(Sender: TObject);
------------------------Files-----------------------------
procedure DriveComboBox2Change(Sender: TObject);
------------------------Images-----------------------------
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure SpeedButton1Click(Sender: TObject);
add needed panels
procedure SpeedButton2Click(Sender: TObject);
procedure SpeedButton3Click(Sender: TObject);
Bevel1 : TBevel;
Bevel10 : TBevel;
Bevel11 : TBevel;
Bevel12 : TBevel;
Bevel13 : TBevel;
Bevel2 : TBevel;
Bevel3 : TBevel;
Bevel4 : TBevel;
Bevel5 : TBevel;
Bevel6 : TBevel;
Bevel7 : TBevel;
Bevel8 : TBevel;
Bevel9 : TBevel;
Button1 : TButton;
Button10 : TButton;
Button2 : TButton;
Button3 : TButton;
Button4 : TButton;
Button6 : TButton;
Button7 : TButton;
Button8 : TButton;
Button9 : TButton;
CheckBox1 : TCheckBox;
CheckBox2 : TCheckBox;
CheckBox3 : TCheckBox;
CheckBox4 : TCheckBox;
CheckBox5 : TCheckBox;
DirectoryListBox1 : TDirectoryListBox;
DirectoryListBox2 : TDirectoryListBox;
DriveComboBox1 : TDriveComboBox;
DriveComboBox2 : TDriveComboBox;
Edit1 : TEdit;
FileListBox1 : TFileListBox;
FileListBox2 : TFileListBox;
Image1 : TImage;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Memo1 : TMemo;
Memo2 : TMemo;
Panel1 : TPanel;
Panel2 : TPanel;
Panel3 : TPanel;
Panel4 : TPanel;
Panel5 : TPanel;
Panel6 : TPanel;
Panel7 : TPanel;
Panel9 : TPanel;
PanelBill : TPanel;
PanelList1 : TPanelList;
PanelList2 : TPanelList;
PanelList3 : TPanelList;
SpeedButton1 : TSpeedButton;
SpeedButton2 : TSpeedButton;
SpeedButton3 : TSpeedButton;
TabbedNotebook1 : TTabbedNotebook;
bill : integer;
procedure Button10Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
--------------------------King---------------
procedure Button3Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button6Click(Sender: TObject);
procedure Button7Click(Sender: TObject);
--Note that PanelBill remains unchanged, so we reset its properties
procedure Button8Click(Sender: TObject);
--self explained--
procedure Button9Click(Sender: TObject);
procedure DirectoryListBox1Change(Sender: TObject);
procedure DirectoryListBox2Change(Sender: TObject);
procedure DriveComboBox1Change(Sender: TObject);
------------------------Files-----------------------------
procedure DriveComboBox2Change(Sender: TObject);
------------------------Images-----------------------------
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure SpeedButton1Click(Sender: TObject);
add needed panels
procedure SpeedButton2Click(Sender: TObject);
procedure SpeedButton3Click(Sender: TObject);
Bevel1 : TBevel;
Bevel10 : TBevel;
Bevel11 : TBevel;
Bevel12 : TBevel;
Bevel13 : TBevel;
Bevel2 : TBevel;
Bevel3 : TBevel;
Bevel4 : TBevel;
Bevel5 : TBevel;
Bevel6 : TBevel;
Bevel7 : TBevel;
Bevel8 : TBevel;
Bevel9 : TBevel;
Button1 : TButton;
Button10 : TButton;
Button2 : TButton;
Button3 : TButton;
Button4 : TButton;
Button6 : TButton;
Button7 : TButton;
Button8 : TButton;
Button9 : TButton;
CheckBox1 : TCheckBox;
CheckBox2 : TCheckBox;
CheckBox3 : TCheckBox;
CheckBox4 : TCheckBox;
CheckBox5 : TCheckBox;
DirectoryListBox1 : TDirectoryListBox;
DirectoryListBox2 : TDirectoryListBox;
DriveComboBox1 : TDriveComboBox;
DriveComboBox2 : TDriveComboBox;
Edit1 : TEdit;
FileListBox1 : TFileListBox;
FileListBox2 : TFileListBox;
Image1 : TImage;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Memo1 : TMemo;
Memo2 : TMemo;
Panel1 : TPanel;
Panel2 : TPanel;
Panel3 : TPanel;
Panel4 : TPanel;
Panel5 : TPanel;
Panel6 : TPanel;
Panel7 : TPanel;
Panel9 : TPanel;
PanelBill : TPanel;
PanelList1 : TPanelList;
PanelList2 : TPanelList;
PanelList3 : TPanelList;
SpeedButton1 : TSpeedButton;
SpeedButton2 : TSpeedButton;
SpeedButton3 : TSpeedButton;
TabbedNotebook1 : TTabbedNotebook;
bill : integer;