Class TMPDelTree (unit MPDelTreeU)

Inherits from

TComponent

Constructors


constructor Create ( AOwner : TComponent ) ;

Public-Deklarationen

string constants



Functions

function Execute : Boolean;

to avoid running without setting a specified path

procedure Message ( MSG , Value : string );

result is true cause the directory doesn't exist, and that is what we want

Properties

property Path : TFileName

Published-Deklarationen

property Verbose : Boolean


Events

event OnProcessFile : TMPDelTreeEvent


Variables

fMPDTEvent : TMPDelTreeEvent;


fPath : TFileName;

Private-Deklarationen

fVerbose : Boolean;


fWasVerb : Boolean;



Constructors


constructor Create ( AOwner : TComponent ) ;

Public-Deklarationen

string constants


Functions


function Execute : Boolean;

to avoid running without setting a specified path


procedure Message ( MSG , Value : string );

result is true cause the directory doesn't exist, and that is what we want


Properties


property Path : TFileName

Published-Deklarationen


property Verbose : Boolean


Events


event OnProcessFile : TMPDelTreeEvent


Variables


fMPDTEvent : TMPDelTreeEvent;


fPath : TFileName;

Private-Deklarationen


fVerbose : Boolean;


fWasVerb : Boolean;