| Class TMain (unit UMain) |
TForm
| Constructors |
| Functions |
procedure BrowseDialog1SelectionChanged(Sender: TObject; Wnd: Integer;
Path: string; var ShowText: string; var OKButtonState: TOKButtonState);
procedure Button1Click(Sender: TObject);
procedure SetFilesToList(CurDir: string);| Properties |
| Events |
| Variables |
BrowseDialog1 : TBrowseDialog;
Button1 : TButton;
Edit1 : TEdit;
FileList : TListView;
IconList : TImageList;
Label1 : TLabel;
Panel1 : TPanel;| Constructors |
| Functions |
procedure BrowseDialog1SelectionChanged(Sender: TObject; Wnd: Integer;
Path: string; var ShowText: string; var OKButtonState: TOKButtonState);
procedure Button1Click(Sender: TObject);
procedure SetFilesToList(CurDir: string);Private 錾
| Properties |
| Events |
| Variables |
BrowseDialog1 : TBrowseDialog;
Button1 : TButton;
Edit1 : TEdit;
FileList : TListView;
IconList : TImageList;
Label1 : TLabel;
Panel1 : TPanel;