| Class TBrowseFolder (unit BrowseFolder) |
TComponent
TBrowseFolder
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure EnableOK(const Hwnd: HWND; const Value: Boolean);
function Execute: Boolean;
procedure SetSelectionPath(const Hwnd: HWND; const Path: String);
procedure SetSelectionPIDL(const Hwnd: HWND; const ItemIDList: PItemIDList);
procedure SetStatusText(const Hwnd: HWND; const StatusText: String);
procedure SetCustomButtonCaption(Value: String);
procedure SetCustomButtonEnabled(Value: Boolean);
procedure SetCustomButtonWidth(Value: Integer);
procedure SetSelectedDirectory(Value: String);| Properties |
property CustomButtonCaption : String
property CustomButtonChecked : Boolean
property CustomButtonEnabled : Boolean
property CustomButtonType : TCustomButtonType
property CustomButtonVisible : Boolean
property CustomButtonWidth : Integer
property Directory : String
property Flags : TBrowseInfoFlagSet
property RootFolder : TSHFolders
property ShowPathInStatusArea : Boolean
property SyncCustomButton : Boolean
property Title : String
property CustomButtonHandle : HWnd
property DialogHandle : HWnd
property DisplayName : String
property ImageIndex : Integer
property ParentHandle : HWnd
property SelectedDirectory : String| Events |
event OnCustomButtonClick : TCustomButtonClickEvent
event OnInitialized : TBrowserInitializedEvent
event OnSelectionChanged : TSelectionChangedEvent| Variables |
FCustomButtonCaption : String;
FCustomButtonChecked : Boolean;
FCustomButtonEnabled : Boolean;
FCustomButtonHandle : HWnd;
FCustomButtonType : TCustomButtonType;
FCustomButtonVisible : Boolean;
FCustomButtonWidth : Integer;
FDialogHandle : HWnd;
FDirectory : String;
FDisplayName : String;
FFlags : TBrowseInfoFlagSet;
FImageIndex : Integer;
FOnCustomButtonClick : TCustomButtonClickEvent;
FOnInitialized : TBrowserInitializedEvent;
FOnSelectionChanged : TSelectionChangedEvent;
FParentHandle : HWnd;
FRootFolder : TSHFolders;
FSelectedDirectory : String;
FShowPathInStatusArea : Boolean;
FSyncCustomButton : Boolean;
FTitle : String;| Constructors |
constructor Create(AOwner: TComponent);TBrowseFolder implementation --------------------------------------------------------------------------------------------------------//
| Functions |
procedure EnableOK(const Hwnd: HWND; const Value: Boolean);--------------------------------------------------------------------------------------------------------// {Use this function to enable/disable the OK button of the browse dialog from within one of the TBrowseFolder event handlers
function Execute: Boolean;--------------------------------------------------------------------------------------------------------// {Use this function to show the browse dialog
procedure SetSelectionPath(const Hwnd: HWND; const Path: String);--------------------------------------------------------------------------------------------------------// {Use this function to set the selection of the browse dialog manually from within one of the TBrowseFolder event handlers
procedure SetSelectionPIDL(const Hwnd: HWND; const ItemIDList: PItemIDList);--------------------------------------------------------------------------------------------------------// {Use this function to set the selection of the browse dialog manually from within one of the TBrowseFolder event handlers
procedure SetStatusText(const Hwnd: HWND; const StatusText: String);--------------------------------------------------------------------------------------------------------// {Use this function to set the status text of the browse dialog from within one of the TBrowseFolder event handlers
procedure SetCustomButtonCaption(Value: String);--------------------------------------------------------------------------------------------------------// {Use this function to enable/disable the custom button of the browse dialog from within one of the TBrowseFolder event handlers
procedure SetCustomButtonEnabled(Value: Boolean);--------------------------------------------------------------------------------------------------------// {Use this function to enable/disable the custom button of the browse dialog from within one of the TBrowseFolder event handlers
procedure SetCustomButtonWidth(Value: Integer);--------------------------------------------------------------------------------------------------------// {Use this function to enable/disable the custom button of the browse dialog from within one of the TBrowseFolder event handlers
procedure SetSelectedDirectory(Value: String);--------------------------------------------------------------------------------------------------------//
| Properties |
property CustomButtonCaption : String
property CustomButtonChecked : Boolean
property CustomButtonEnabled : Boolean
property CustomButtonType : TCustomButtonType
property CustomButtonVisible : Boolean
property CustomButtonWidth : Integer
property Directory : String
property Flags : TBrowseInfoFlagSet
property RootFolder : TSHFolders
property ShowPathInStatusArea : Boolean
property SyncCustomButton : Boolean
property Title : String
property CustomButtonHandle : HWnd
property DialogHandle : HWndAdded by Atoh Tanner
property DisplayName : String
property ImageIndex : Integer
property ParentHandle : HWnd
property SelectedDirectory : String| Events |
event OnCustomButtonClick : TCustomButtonClickEvent
event OnInitialized : TBrowserInitializedEvent
event OnSelectionChanged : TSelectionChangedEvent| Variables |
FCustomButtonCaption : String;
FCustomButtonChecked : Boolean;
FCustomButtonEnabled : Boolean;
FCustomButtonHandle : HWnd;
FCustomButtonType : TCustomButtonType;
FCustomButtonVisible : Boolean;
FCustomButtonWidth : Integer;
FDialogHandle : HWnd;
FDirectory : String;
FDisplayName : String;Added by Atoh Tanner
FFlags : TBrowseInfoFlagSet;
FImageIndex : Integer;
FOnCustomButtonClick : TCustomButtonClickEvent;
FOnInitialized : TBrowserInitializedEvent;
FOnSelectionChanged : TSelectionChangedEvent;
FParentHandle : HWnd;
FRootFolder : TSHFolders;
FSelectedDirectory : String;
FShowPathInStatusArea : Boolean;
FSyncCustomButton : Boolean;
FTitle : String;