| Class TDirectoryDialog (unit dirdlg) |
TComponent
---------------------------------------------------} { } { This code was written by : Stephan Greiwe } { } { This code is copyright 1997 by } { Stephan Greiwe 1997 } { eMail : greiwe@msn.com } {---------------------------------------------------
| Constructors |
constructor Create(AOwner: TComponent);--------------------------------------} { DirectoryDialog.
| Functions |
destructor Destroy;
function Execute:TModalresult;| Properties |
property Caption : string
property Path : string
property Windowstate : TWindowstate| Events |
| Variables |
FCaption : string;
FPath : string;
FWindowstate : TWindowstate;| Constructors |
constructor Create(AOwner: TComponent);Public Declarations
--------------------------------------} { DirectoryDialog.Create } {--------------------------------------
| Functions |
destructor Destroy;--------------------------------------} { DirectoryDialog.Destroy } {--------------------------------------
function Execute:TModalresult;| Properties |
property Caption : string
property Path : string
property Windowstate : TWindowstate| Events |
| Variables |
FCaption : string;Private Declarations
FPath : string;
FWindowstate : TWindowstate;