| Class TForm1 (unit Viewunit) |
TForm
| Constructors |
| Functions |
procedure FileListBox1Change(Sender: TObject);
procedure FileListBox1DblClick(Sender: TObject);
procedure FormActivate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure MediaPlayer1Notify(Sender: TObject);| Properties |
| Events |
| Variables |
bbClose : TBitBtn;
DataSource1 : TDataSource;
DBGrid1 : TDBGrid;
DirectoryListBox1 : TDirectoryListBox;
DriveComboBox1 : TDriveComboBox;
FileListBox1 : TFileListBox;
FilterComboBox1 : TFilterComboBox;
Image1 : TImage;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
MediaPlayer1 : TMediaPlayer;
Memo1 : TMemo;
Panel1 : TPanel;
Panel2 : TPanel;
Table1 : TTable;
TabNB : TTabbedNotebook;
AppFileName : string;
DBees : string[80];
MultiMed : string[80];
Pictures : string[80];
Resizing : boolean;
Texts : string[80];| Constructors |
| Functions |
procedure FileListBox1Change(Sender: TObject);
procedure FileListBox1DblClick(Sender: TObject);
procedure FormActivate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);edit this file
procedure FormCreate(Sender: TObject);
procedure MediaPlayer1Notify(Sender: TObject);| Properties |
| Events |
| Variables |
bbClose : TBitBtn;
DataSource1 : TDataSource;
DBGrid1 : TDBGrid;
DirectoryListBox1 : TDirectoryListBox;
DriveComboBox1 : TDriveComboBox;
FileListBox1 : TFileListBox;
FilterComboBox1 : TFilterComboBox;
Image1 : TImage;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
MediaPlayer1 : TMediaPlayer;
Memo1 : TMemo;
Panel1 : TPanel;
Panel2 : TPanel;
Table1 : TTable;
TabNB : TTabbedNotebook;
AppFileName : string;Private declarations
DBees : string[80];
MultiMed : string[80];
Pictures : string[80];
Resizing : boolean;
Texts : string[80];