49
Large icons

local f as stdFont

oDCOCX_Exontrol1:SmallIcons := false
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
f := stdFont{"StdFont"}
	f:Size := 16
oDCOCX_Exontrol1:Font := f

48
Small icons


oDCOCX_Exontrol1:SmallIcons := true

47
Folder icons are very close together vertically. Can you change the icon or increase the separation


oDCOCX_Exontrol1:ItemHeight := 24

46
Is it possible to re-call the ExploreFromHere without re-selecting/expanding any previously item

METHOD OCX_Exontrol1Click() CLASS MainDialog
	// Click event - Occurs when the user presses and then releases the left mouse button over the control.
	oDCOCX_Exontrol1:ExploreFromHere := "|reset"
RETURN NIL


oDCOCX_Exontrol1:ExploreFromHere := "c:\"

45
How can I expand a folder


oDCOCX_Exontrol1:[ShellFolder,"C:\"]:Expanded := true

44
How do I get the subfolders of specified folder

local var_ShellFolders as IExShellFolders

var_ShellFolders := IExShellFolders{oDCOCX_Exontrol1:[ShellFolder,"C:\"]:Folders}

43
How do I check a folder


oDCOCX_Exontrol1:HasCheckBoxes := true
oDCOCX_Exontrol1:[ShellFolder,"C:\"]:Check := true

42
How do I get the name of folder, as it is displayed in the control

local var_DisplayName as USUAL

var_DisplayName := oDCOCX_Exontrol1:FirstVisibleFolder:DisplayName

41
How can I specify the folders being displayed in the control

METHOD OCX_Exontrol1IncludeFolder(Folder,Include) CLASS MainDialog
	// IncludeFolder event - Occurs when the user includes folders to the control.
	Include := false
RETURN NIL


oDCOCX_Exontrol1:IncludeFolder := true

40
How can I include the files and folders in the control


oDCOCX_Exontrol1:IncludeAttributeMask := 2147483703

39
How can I change the control's font

local f as stdFont

// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
f := stdFont{"StdFont"}
	f:Name := "Verdana"
	f:Size := 12
oDCOCX_Exontrol1:Font := f

38
Can I add a rename to the control's context menu

oDCOCX_Exontrol1:CanRename := true

37
How can I change the shape of the cursor

oDCOCX_Exontrol1:MousePointer := 2

36
How can I get height of the horizontal scroll bar

OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:HorizontalHeight) ))

35
How can I get width of the vertical scroll bar

OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:VerticalWidth) ))

34
How can I remove the control's scroll bars

OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:Scrollbars) ))

33
How can I get the horizontal scroll range

OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:HorizontalOversize) ))

32
How can I get the horizontal scroll position

OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:HorizontalOffset) ))

31
How can I get the vertical scroll range

OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:VerticalOversize) ))

30
How can I get the vertical scroll position

OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:VerticalOffset) ))

29
Can I assign partial check boxes to folders, so the sub folders get checked when the user checks the parent folder


oDCOCX_Exontrol1:HasCheckBoxes := true
oDCOCX_Exontrol1:PartialCheck := true
oDCOCX_Exontrol1:FirstVisibleFolder:Check := true

28
How can I drop files to control

oDCOCX_Exontrol1:AllowDropFiles := true

27
Can I explore only a folder, so the user can't see the parent folder


oDCOCX_Exontrol1:ExploreFromHere := "c:\"

26
How can I hide the icons


oDCOCX_Exontrol1:IconsVisible := false

25
How can I disable or enable the entire control

oDCOCX_Exontrol1:Enabled := false

24
How can I expand a folder


oDCOCX_Exontrol1:EnsureVisible(oDCOCX_Exontrol1:[SpecialFolderPath,StartMenu])

23
How can I ensure that a specified folder fits the contrl's client area


oDCOCX_Exontrol1:EnsureVisible(oDCOCX_Exontrol1:[SpecialFolderPath,StartMenu])

22
How do I refresh the control

oDCOCX_Exontrol1:Refresh()

21
Is there any function or property to get the first visible folder


oDCOCX_Exontrol1:HasCheckBoxes := true
oDCOCX_Exontrol1:FirstVisibleFolder:Check := true

20
How do I find a special folder, like My Computer


oDCOCX_Exontrol1:SelectedFolder := "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}"

19
How do I find a special folder, like My Computer


oDCOCX_Exontrol1:SelectedFolder := oDCOCX_Exontrol1:[SpecialFolderPath,MyComputer]

18
How do I select and expand a folder


oDCOCX_Exontrol1:SelectedFolder := oDCOCX_Exontrol1:[SpecialFolderPath,Programs]

17
How do I select and expand a folder


oDCOCX_Exontrol1:SelectedFolder := "c:\"

16
How do I select a folder


oDCOCX_Exontrol1:SelectedFolder := "c:\"

15
How do I get the checked folders or files


oDCOCX_Exontrol1:HasCheckBoxes := true
oDCOCX_Exontrol1:FirstVisibleFolder:Check := true
OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:FoldersCheck:Count) ))

14
How can I display the hidden folders


oDCOCX_Exontrol1:HiddenFolders := true

13
How can I get the folder or the file from the point
METHOD OCX_Exontrol1MouseMove(Button,Shift,X,Y) CLASS MainDialog
	// MouseMove event - Fired when the user move the mouse over the ExFolderView control.
	OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:[FolderFromPoint,-1,-1]) ))
RETURN NIL



12
How can I refresh the control as soon as the user renames a folder in Windows Explorer

oDCOCX_Exontrol1:AutoUpdate := true

11
How do I enable or disable the control's context menu

oDCOCX_Exontrol1:EnableShellMenu := false

10
How do I hide the overlay icons

oDCOCX_Exontrol1:OverlayIcons := false

9
How do I display the overlay icons

oDCOCX_Exontrol1:OverlayIcons := true

8
How do I display the share name for folders and files

oDCOCX_Exontrol1:DisplayShareName := true

7
How do I assign a checkbox for each folder/file in the control


oDCOCX_Exontrol1:HasCheckBoxes := true

6
How do I remove the lines that link the root items


oDCOCX_Exontrol1:HasLinesAtRoot := false

5
How do I remove the buttons to expand or collapse the folders


oDCOCX_Exontrol1:HasButtons := false

4
How do I remove the lines between items


oDCOCX_Exontrol1:HasLines := false

3
How do I remove the control's border

oDCOCX_Exontrol1:Appearance := Flat

2
How do I change the control's foreground color


oDCOCX_Exontrol1:ForeColor := RGB(255,0,0)

1
How do I change the control's background color


oDCOCX_Exontrol1:BackColor := RGB(255,0,0)