Class TBrowseFolder (unit BrowseFolder) |
Inherits from
TComponent
TBrowseFolder
constructor Create(AOwner: TComponent);
- TBrowseFolder implementation --------------------------------------------------------------------------------------------------------//
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);
--------------------------------------------------------------------------------------------------------//
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
Added by Atoh Tanner
property DisplayName : String
property ImageIndex : Integer
property ParentHandle : HWnd
property SelectedDirectory : String
event OnCustomButtonClick : TCustomButtonClickEvent
event OnInitialized : TBrowserInitializedEvent
event OnSelectionChanged : TSelectionChangedEvent
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;
constructor Create(AOwner: TComponent);
TBrowseFolder implementation --------------------------------------------------------------------------------------------------------//
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);
--------------------------------------------------------------------------------------------------------//
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
Added by Atoh Tanner
property DisplayName : String
property ImageIndex : Integer
property ParentHandle : HWnd
property SelectedDirectory : String
event OnCustomButtonClick : TCustomButtonClickEvent
event OnInitialized : TBrowserInitializedEvent
event OnSelectionChanged : TSelectionChangedEvent
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;