Class TSourceForm (unit SrcFrm)

Inherits from

TForm

TSourceForm

Constructors



Functions

procedure FormCreate(Sender: TObject);

Add Files

procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure SourceExploreItemClick(Sender: TObject);


procedure SourceMenuPopup(Sender: TObject);


procedure SourceOpenItemClick(Sender: TObject);


procedure TreeViewDblClick(Sender: TObject);


procedure TreeViewMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);


procedure RefreshMenu;


procedure RefreshView;


function GetNodeFile(Node: TTreeNode): string;

TSourceForm

procedure OpenNodeFile(Node: TTreeNode);


Properties

Events

Variables

ImageList : TImageList;


SourceExploreItem : TMenuItem;


SourceMenu : TPopupMenu;


SourceN1Item : TMenuItem;


SourceOpenItem : TMenuItem;


StatusBar : TStatusBar;


TreeView : TTreeView;


FRootDir : string;



Constructors


Functions


procedure FormCreate(Sender: TObject);

Add Files


procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure SourceExploreItemClick(Sender: TObject);


procedure SourceMenuPopup(Sender: TObject);


procedure SourceOpenItemClick(Sender: TObject);


procedure TreeViewDblClick(Sender: TObject);


procedure TreeViewMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);


procedure RefreshMenu;


procedure RefreshView;


function GetNodeFile(Node: TTreeNode): string;

TSourceForm


procedure OpenNodeFile(Node: TTreeNode);


Properties


Events


Variables


ImageList : TImageList;


SourceExploreItem : TMenuItem;


SourceMenu : TPopupMenu;


SourceN1Item : TMenuItem;


SourceOpenItem : TMenuItem;


StatusBar : TStatusBar;


TreeView : TTreeView;


FRootDir : string;