| Class TsDirectoryEdit (unit sToolsEdit) |
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure ButtonClick;
function GetDefaultBitmap(var DestroyNeeded: Boolean): TBitmap;
procedure ReceptFileDir(const AFileName: string);
function GetDialogOptions: TBrowseInfoOptionSet;
function GetDialogTitle: string;
function GetFolder: TSHFolders;
function IsCustomTitle: Boolean;
procedure SetDialogOptions( Value: TBrowseInfoOptionSet);
procedure SetDialogTitle(Value: String);
procedure SetFolder( Value: TSHFolders);| Properties |
property AutoSelect :
property BorderStyle :
property ButtonHint :
property ButtonShowHint :
property CharCase :
property ClickKey :
property Color :
property Ctl3D :
property DefaultDraw :
property DialogOptions : TBrowseInfoOptionSet
property DialogTitle : string
property DisabledFont :
property DragCursor :
property DragMode :
property Enabled :
property Flat :
property Folder : TSHFolders
property Font :
property Glyph :
property GlyphKind :
property GlyphsNumber :
property InitialDir : string
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property Path :
property PopupMenu :
property ReadOnly :
property ShowHint :
property TabOrder :
property TabStop :
property Visible : | Events |
event OnChange :
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
event OnStartDrag : | Variables |
FDialog : TsBrowseFolderDialog;
FInitialDir : string;| Constructors |
constructor Create(AOwner: TComponent);TsDirectoryEdit
| Functions |
destructor Destroy;
procedure ButtonClick;
function GetDefaultBitmap(var DestroyNeeded: Boolean): TBitmap;
procedure ReceptFileDir(const AFileName: string);
function GetDialogOptions: TBrowseInfoOptionSet;
function GetDialogTitle: string;
function GetFolder: TSHFolders;
function IsCustomTitle: Boolean;
procedure SetDialogOptions( Value: TBrowseInfoOptionSet);
procedure SetDialogTitle(Value: String);
procedure SetFolder( Value: TSHFolders);| Properties |
property AutoSelect :
property BorderStyle :
property ButtonHint :
property ButtonShowHint :
property CharCase :
property ClickKey :
property Color :
property Ctl3D :
property DefaultDraw :
property DialogOptions : TBrowseInfoOptionSet
property DialogTitle : string
property DisabledFont :
property DragCursor :
property DragMode :
property Enabled :
property Flat :
property Folder : TSHFolders
property Font :
property Glyph :
property GlyphKind :
property GlyphsNumber :
property InitialDir : string
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property Path :
property PopupMenu :
property ReadOnly :
property ShowHint :
property TabOrder :
property TabStop :
property Visible : | Events |
event OnChange :
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
event OnStartDrag : | Variables |
FDialog : TsBrowseFolderDialog;
FInitialDir : string;