Class TExplorerForm

Unit

Declaration

type TExplorerForm = class(TForm)

Description

This item has no description.

Hierarchy

Overview

Fields

Private FActiveDir: String;
Private FEditFilename: TEdit;
Private FEditPath: TEdit;
Private FFilenamePanel: TPanel;
Private FGridFiles: TStringGrid;
Private FilesDir: TStringList;
Private FoldersDir: TStringList;
Private FPathPanel: TPanel;
Private FSBOkFile: TSpeedButton;
Private FSBUpPath: TSpeedButton;

Methods

Public constructor Create(TheOwner: TComponent); override;
Public destructor Destroy; override;
Private function OnlyName(const conpath: String): String;
Private procedure FGridFilesDblClick(Sender: TObject);
Private procedure FGridFilesDrawCell(Sender: TObject; aCol, aRow: Integer; aRect: TRect; aState: TGridDrawState);
Private procedure FGridFilesPrepareCanvas(Sender: TObject; aCol, aRow: Integer; aState: TGridDrawState);
Private procedure FGridFilesSelection(Sender: TObject; aCol, aRow: Integer);
Private procedure FSBOkFileOnClick(Sender: TObject);
Private procedure LoadDirectory(const Directory: String);
Private procedure ResizeExplorer(Sender: TObject);
Private procedure SBUpPathClick(Sender: TObject);

Description

Fields

Private FActiveDir: String;

This item has no description.

Private FEditFilename: TEdit;

This item has no description.

Private FEditPath: TEdit;

This item has no description.

Private FFilenamePanel: TPanel;

This item has no description.

Private FGridFiles: TStringGrid;

This item has no description.

Private FilesDir: TStringList;

This item has no description.

Private FoldersDir: TStringList;

This item has no description.

Private FPathPanel: TPanel;

This item has no description.

Private FSBOkFile: TSpeedButton;

This item has no description.

Private FSBUpPath: TSpeedButton;

This item has no description.

Methods

Public constructor Create(TheOwner: TComponent); override;

TExplorerForm

Public destructor Destroy; override;

This item has no description.

Private function OnlyName(const conpath: String): String;

This item has no description.

Private procedure FGridFilesDblClick(Sender: TObject);

This item has no description.

Private procedure FGridFilesDrawCell(Sender: TObject; aCol, aRow: Integer; aRect: TRect; aState: TGridDrawState);

This item has no description.

Private procedure FGridFilesPrepareCanvas(Sender: TObject; aCol, aRow: Integer; aState: TGridDrawState);

This item has no description.

Private procedure FGridFilesSelection(Sender: TObject; aCol, aRow: Integer);

This item has no description.

Private procedure FSBOkFileOnClick(Sender: TObject);

This item has no description.

Private procedure LoadDirectory(const Directory: String);

This item has no description.

Private procedure ResizeExplorer(Sender: TObject);

Adjust grid when resizing

Private procedure SBUpPathClick(Sender: TObject);

This item has no description.


Generated by PasDoc 0.16.0-snapshot.