269:
Displays the time without seconds, smaller and with a different color


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:[Option,exModifiedDaysAgo] := "(((valueS left ( valueS rfind `:` )) + (valueS right ( len(valueS) - ( valueS rfind ` ` ) )) replace ` ` with `<fgcolor=808080><font ;6> ` ))"
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnModified | exFileColumnType | exFileColumnName
oDCOCX_Exontrol1:ModifiedDaysAgo := -1
oDCOCX_Exontrol1:EndUpdate()

268:
Displays the date-time with no seconds part


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:[Option,exModifiedDaysAgo] := "(valueS left ( valueS rfind `:` )) + (valueS right ( len(valueS) - ( valueS rfind ` ` ) ))"
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnModified | exFileColumnType | exFileColumnName
oDCOCX_Exontrol1:ModifiedDaysAgo := -1
oDCOCX_Exontrol1:EndUpdate()

267:
Displays the Modified column in long date format, as specified in the control's panel ( no time is displayed )


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:[Option,exModifiedDaysAgo] := "longdate(value)"
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnModified | exFileColumnType | exFileColumnName
oDCOCX_Exontrol1:ModifiedDaysAgo := -1
oDCOCX_Exontrol1:EndUpdate()

266:
Displays the modified date in "MM/DD/YYYY HH:MM:SS" format, so 1/1/2001 will be displayed such as 01/01/2001


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:[Option,exModifiedDaysAgo] := "dateF(value)"
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnModified | exFileColumnType | exFileColumnName
oDCOCX_Exontrol1:ModifiedDaysAgo := -1
oDCOCX_Exontrol1:EndUpdate()

265:
Displays the modified date without the time


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:[Option,exModifiedDaysAgo] := "date(int(value))"
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnModified | exFileColumnType | exFileColumnName
oDCOCX_Exontrol1:ModifiedDaysAgo := -1
oDCOCX_Exontrol1:EndUpdate()

264:
Displayes the modified time with a different color


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:[Option,exModifiedDaysAgo] := "valueS replace ` ` with `<off -4><fgcolor=808080><font ;6> `"
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnModified | exFileColumnType | exFileColumnName
oDCOCX_Exontrol1:ModifiedDaysAgo := -1
oDCOCX_Exontrol1:EndUpdate()

263:
Displays all files/folders modified n days ago, with white on a black background


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:[Option,exModifiedDaysAgo] := "`<bgcolor=000000><fgcolor=FFFFFF>` + valueS"
oDCOCX_Exontrol1:ModifiedDaysAgo := 31
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnModified | exFileColumnType | exFileColumnName
oDCOCX_Exontrol1:EndUpdate()

262:
Displays today for all files/folders modified today, yesterday for all files modified yesterday, else "%i day(s) ago"


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:[Option,exModifiedDaysAgo] := "daysago = 0 ? `today` : (daysago = 1 ? `yesterday` : (daysago + ` day(s) ago`))"
oDCOCX_Exontrol1:ModifiedDaysAgo := 31
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnModified | exFileColumnType | exFileColumnName
oDCOCX_Exontrol1:EndUpdate()

261:
Displays today for all files/folders else "%i day(s) ago"


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:ModifiedDaysAgo := 31
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnModified | exFileColumnType | exFileColumnName
oDCOCX_Exontrol1:EndUpdate()

260:
FilterBarCaption ALL Keyword ( sample 2, result )


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
oDCOCX_Exontrol1:FilterBarFont := oDCOCX_Exontrol1:Font
oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle] := AsString(oDCOCX_Exontrol1:FormatABC("`<fgcolor=808080> ` + value + ` </fgcolor>`",oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle],nil,nil))
oDCOCX_Exontrol1:FilterBarCaption := "(( ( all replace `[<b>` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `</b>]` with ` </b></bgcolor></fgcolor>` replace `[<s>` with `<bgcolor=C0C0C0><fgcolor=FFFFFF> ` replace `</s>]` with ` </fgcolor></bgcolor>` )  + `<r><fgcolor=808080>` + ( matchitemcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount + 1) + ` result(s)` ) : (`<r><fgcolor=808080>`+ itemcount + ` item(s)`) )))"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarVisible | exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

259:
FilterBarCaption ALL Keyword ( sample 1 )


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
oDCOCX_Exontrol1:FilterBarFont := oDCOCX_Exontrol1:Font
oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle] := AsString(oDCOCX_Exontrol1:FormatABC("`<fgcolor=808080> ` + value + ` </fgcolor>`",oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle],nil,nil))
oDCOCX_Exontrol1:FilterBarCaption := "all"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarVisible | exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

258:
FilterBarCaption ALLUI Keyword ( sample 2, result )


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
oDCOCX_Exontrol1:FilterBarFont := oDCOCX_Exontrol1:Font
oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle] := AsString(oDCOCX_Exontrol1:FormatABC("`<fgcolor=808080> ` + value + ` </fgcolor>`",oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle],nil,nil))
oDCOCX_Exontrol1:FilterBarCaption := "(( ( allui replace `[<b>` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `</b>]` with ` </b></bgcolor></fgcolor>` replace `[<s>` with `<bgcolor=C0C0C0><fgcolor=FFFFFF> ` replace `</s>]` with ` </fgcolor></bgcolor>` )  + `<r><fgcolor=808080>` + ( matchitemcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount + 1) + ` result(s)` ) : (`<r><fgcolor=808080>`+ itemcount + ` item(s)`) )))"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarVisible | exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

257:
FilterBarCaption ALLUI Keyword ( sample 1 )


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
oDCOCX_Exontrol1:FilterBarFont := oDCOCX_Exontrol1:Font
oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle] := AsString(oDCOCX_Exontrol1:FormatABC("`<fgcolor=808080> ` + value + ` </fgcolor>`",oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle],nil,nil))
oDCOCX_Exontrol1:FilterBarCaption := "allui"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarVisible | exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

256:
FilterBarCaption AVAILABLE Keyword ( sample 2, result )


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
oDCOCX_Exontrol1:FilterBarFont := oDCOCX_Exontrol1:Font
oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle] := AsString(oDCOCX_Exontrol1:FormatABC("`<fgcolor=808080> ` + value + ` </fgcolor>`",oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle],nil,nil))
oDCOCX_Exontrol1:FilterBarCaption := "(( ( value replace `[` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `]` with ` </b></bgcolor></fgcolor>` ) + ` ` + ( available replace `[` with `<bgcolor=C0C0C0><fgcolor=FFFFFF><b> ` replace `]` with ` </b></bgcolor></fgcolor>` replace `<s>` with `` replace `</s>` with `` ) + `<fgcolor=808080>` + ( matchitemcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount + 1) + ` result(s)` ) : (`<r><fgcolor=808080>`+ itemcount + ` item(s)`) )))"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarVisible | exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

255:
FilterBarCaption AVAILABLE Keyword ( sample 1 )


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
oDCOCX_Exontrol1:FilterBarFont := oDCOCX_Exontrol1:Font
oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle] := AsString(oDCOCX_Exontrol1:FormatABC("`<fgcolor=808080> ` + value + ` </fgcolor>`",oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle],nil,nil))
oDCOCX_Exontrol1:FilterBarCaption := "value + ` ` + available"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarVisible | exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

254:
Is it possible to somehow highlight the column's name different than its filter value in the control's filter bar ( sample 3, results )


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
oDCOCX_Exontrol1:FilterBarFont := oDCOCX_Exontrol1:Font
oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle] := AsString(oDCOCX_Exontrol1:FormatABC("`<fgcolor=808080>` + value + `</fgcolor>`",oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle],nil,nil))
oDCOCX_Exontrol1:FilterBarCaption := "(`<b>` + value + `</b><fgcolor=808080>` + ( matchitemcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount + 1) + ` result(s)` ) : (`<fgcolor=808080>`+ itemcount + ` item(s)`) )) replace `[` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `]` with ` </b></bgcolor></fgcolor>`"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarToggle
oDCOCX_Exontrol1:EndUpdate()

253:
Is it possible to somehow highlight the column's name different than its filter value in the control's filter bar ( sample 2 )


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
oDCOCX_Exontrol1:FilterBarFont := oDCOCX_Exontrol1:Font
oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle] := AsString(oDCOCX_Exontrol1:FormatABC("`<fgcolor=808080>` + value + `</fgcolor>`",oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle],nil,nil))
oDCOCX_Exontrol1:FilterBarCaption := "value replace `[` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `]` with ` </b></bgcolor></fgcolor>`"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarToggle
oDCOCX_Exontrol1:EndUpdate()

252:
Is it possible to somehow highlight the column's name different than its filter value in the control's filter bar ( sample 1 )


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle] := AsString(oDCOCX_Exontrol1:FormatABC("`<fgcolor=808080>` + value + `</fgcolor>`",oDCOCX_Exontrol1:[Description,0x8 | exFilterBarPatternFilterTitle],nil,nil))
oDCOCX_Exontrol1:FilterBarCaption := "value replace `[` with `<fgcolor=808080>[` replace `]` with `]</fgcolor>`"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarToggle
oDCOCX_Exontrol1:EndUpdate()

251:
How can I get the number of results/items being shown in the control's filter bar (sample 4)


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
oDCOCX_Exontrol1:FilterBarFont := oDCOCX_Exontrol1:Font
oDCOCX_Exontrol1:FilterBarPrompt := AsString(oDCOCX_Exontrol1:FormatABC("`<b>` + value",oDCOCX_Exontrol1:FilterBarPrompt,nil,nil))
oDCOCX_Exontrol1:FilterBarCaption := "`<b><r>` + value + `</b><fgcolor=808080>` + ( matchitemcount < 0 ? ( ( len(value) ? `<br>` : `` ) + `<r>` + abs(matchitemcount + 1) + ` result(s)` ) : (`<fgcolor=808080>`+ itemcount + ` item(s)`) )"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarCompact | exFilterBarShowCloseOnRight | exFilterBarShowCloseIfRequired | exFilterBarCaptionVisible | exFilterBarVisible | exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

250:
FilterBarCaption Predefined Keywords


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:FilterInclude := exItemsWithChilds
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
oDCOCX_Exontrol1:FilterBarFont := oDCOCX_Exontrol1:Font
oDCOCX_Exontrol1:FilterBarCaption := "`<fgcolor=0000FF><i>value/current</i></fgcolor>: <fgcolor=808080>` + value + `</fgcolor>` + `<br><fgcolor=0000FF><i>available</i></fgcolor>: ` + available + `<br><fgcolor=0000FF><i>allui</i></fgcolor>: ` + allui + `<br><fgcolor=0000FF><i>all</i></fgcolor>: ` + all + `<br><fgcolor=0000FF><i>itemcount</i></fgcolor>: <fgcolor=808080>` + itemcount + `</fgcolor>`+ `<br><fgcolor=0000FF><i>visibleitemcount</i></fgcolor>: <fgcolor=808080>` + visibleitemcount + `</fgcolor>`+ `<br><fgcolor=0000FF><i>matchitemcount</i></fgcolor>: <fgcolor=808080>` + matchitemcount + `</fgcolor>`+ `<br><fgcolor=0000FF><i>promptpattern</i></fgcolor>: <fgcolor=808080>` + promptpattern + `</fgcolor>`"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarCaptionVisible | exFilterBarVisible | exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

249:
I am using filter prompt feature, and also column's filter, just wondering if possible to compact displaying the filter bar so it won't show on multiple lines


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
oDCOCX_Exontrol1:FilterBarFont := oDCOCX_Exontrol1:Font
oDCOCX_Exontrol1:FilterBarCaption := "`<r><i><fgcolor=808080><upline><solidline><sha ;;0>` + value"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarCompact | exFilterBarSingleLine | exFilterBarVisible | exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

248:
Just wondering if it is possible to show the filter bar's close button on the right ( sample 2 )


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarShowCloseOnRight | exFilterBarToggle | exFilterBarPromptVisible
oDCOCX_Exontrol1:FilterBarPrompt := AsString(oDCOCX_Exontrol1:FormatABC("`<r>` + value",oDCOCX_Exontrol1:FilterBarPrompt,nil,nil))
oDCOCX_Exontrol1:EndUpdate()

247:
How can I change the visual appearance of the filter bar's close button (EBN)

local var_Appearance as IAppearance

oDCOCX_Exontrol1:BeginUpdate()
var_Appearance := oDCOCX_Exontrol1:VisualAppearance
	var_Appearance:Add(1,"gBFLBCJwBAEHhEJAAEhABHQDg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLOg7IJjyI4/SJAYCydKAWhxIaZKJHCZoEDaTAADCNVAQp6MEIJVbVEI0e79OgBLp/Z7kECIJJAaRjHQdJxGLA8EhtCQhCZteK6SgMKJYXhWQYRXI1JwvMBrWrdQjiOYELQtMKmSZNLYGG4dR5SVJbcYhSYsRRFMoyDIOXYDLKsdYqSpXIThObEGgaPqJYjsUjCMKnR7HVIURrBPC9TBPE69ZgmC6ucKPX51ShKFaBWDZcwFAS+UBuYCAILiEAQGZ1XT8OROicbgJgSTJRlCaZeDsHY7QGR4xkSYp3CaExZAQMgalQYAwjCAAfBANxcA2TgKAUOpDCGFhKg0RpXCwCwDHQHQHEyAIkCkOhbFOGA8A8DohBgRg9AccZcn8EpEjMLI2C2DYxAgQgvAIUIVkoAAPBQDJlECTZ3CCYwDACQwUA8A5MCAWAWDiQi4l8aQOEgLJuBgBgDmYFAzEoIoIl0WALgKYJbBABADAAHgHg8VAMmqCQQDMXABAATYwTmNwBDATJXAiAgjHmNQ5lgQ5QEQEQMmcWg/GwD5ylyNw2gMcJcjsBgBgOQQDDhRpVAMMwnDBFw1B0Ax8D0DxOmmJJIGQTY5hGMAwkwM4CAYLZAmAOJnAqAojiIGg6iieYkmeAYOHaKJDCyCwjH6AoggsQpQliAJLhgaJ0CESBTnyDwjk+cg4g4P5IHIHJ+BWRRzlYWAxiOUxihsY4KjKLJRGqC44FCegkkkM58iAKAPnIWIWD8SRSFSfQnkmewUhYP4GiGKJ7G0TIbCSUoggqUo0lAQ4LnEcBcD8Coiiif4nE+eAAn2HpOkcFJqi4T5SkyMw/kqQown8IBIBOdA+A+DJrBqVxXEqYo4lCApLhGHBnD8S4ymyfxmg+cwQkQP5egOUZIWoEAkjIeIPBMBJBD+TBjBifwvkuc58hQJQPmFrYykkchclSApKjGOBuD+TRDFCfw3mmIxNi8FxFlOXhVC4aYDFyPgvg2YBcBcLZGCGCJ0DSLRzGSWQ/lmY5+mEP5gmMDBZRSMRsFsOxMhMJJ/DsTpTnwaQaE+N5ojuNhdEYNI5C4TZJO1GRDmCaxnA2Yx4n8IpIjOTBQBQC5TgyYw7gUYRYikC0BYRwsDQBoB8eA6Q2hsE0BUXgywZtYCyHMKwnxSAhAQHkIQhRrBaDsCwA4ERiB2EWAIYIXhhiVEgAEUYwwYjyASLge4FhHgRDkM8OQih0jWPkGgBBAQ")
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarToggle | exFilterBarPromptVisible
oDCOCX_Exontrol1:[Background,exFooterFilterBarButton] := 0x1000000
oDCOCX_Exontrol1:EndUpdate()

246:
How can I change the visual appearance of the filter bar's close button (solid)


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarPromptVisible
oDCOCX_Exontrol1:[Background,exFooterFilterBarButton] := RGB(255,0,0)
oDCOCX_Exontrol1:EndUpdate()

245:
Is it possible to prevent definitely showing the filter bar's close button


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarPromptVisible
oDCOCX_Exontrol1:[Background,exFooterFilterBarButton] := -1
oDCOCX_Exontrol1:EndUpdate()

244:
Is it possible to show the close button only if there is a filter applied


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarShowCloseIfRequired | exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

243:
The control's filter bar is not closed once I click the close button (toggle)


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:FilterBarCaption := "`<r><fgcolor=808080>` + value"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarCompact | exFilterBarToggle | exFilterBarSingleLine | exFilterBarVisible | exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

242:
How can I display the control's filter on a single line


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:FilterBarCaption := "len(value) ? `filter for: <fgcolor 808080>` + value  : `<fgcolor 808080>no filter`"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarSingleLine | exFilterBarVisible
oDCOCX_Exontrol1:EndUpdate()

241:
How can I display the control's filter on a single line (prompt-combined)


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:FilterBarCaption := "`<r>` + value"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarCompact | exFilterBarSingleLine | exFilterBarVisible | exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

240:
Is it possible to prevent closing the control's filter bar, so it is always shown (prompt-combined)


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarVisible | exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

239:
Is it possible to prevent closing the control's filter bar, so it is always shown (prompt)


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarPromptVisible
oDCOCX_Exontrol1:EndUpdate()

238:
Is it possible to prevent closing the control's filter bar, so it is always shown


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:[ColumnFilterButton,"Name"] := true
oDCOCX_Exontrol1:FilterBarCaption := "len(value) = 0 ? `<fgcolor=808080>no filter` : value"
oDCOCX_Exontrol1:FilterBarPromptVisible := exFilterBarVisible
oDCOCX_Exontrol1:EndUpdate()

237:
Is it possible to show the selection with a different color, when the control loses the focus


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:HideSelection := false
oDCOCX_Exontrol1:[Background,exSelBackColorHide] := RGB(224,224,224)
oDCOCX_Exontrol1:[Background,exSelForeColorHide] := RGB(64,64,64)
oDCOCX_Exontrol1:EndUpdate()

236:
Predefined Keywords of ShowContextMenu property

METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	oDCOCX_Exontrol1:ExecuteContextMenu := 0
RETURN NIL


oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:ShowContextMenu := "`menu(` + menu + `)` + `,filecount=` + filecount + `,fileattr=` + hex(fileattr) + `,filename=` + filename + `,fileparsename=` + fileparsename + `,filefullname=` + filefullname"

235:
How can I change the visual appearance of the +/- buttons, open/close glyphs as current visual theme

local var_Appearance as IAppearance

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExpandFolders := true
var_Appearance := oDCOCX_Exontrol1:VisualAppearance
	var_Appearance:Add(1,"XP:TREEVIEW 2 1")
	var_Appearance:Add(2,"XP:TREEVIEW 2 2")
oDCOCX_Exontrol1:[Background,exTreeGlyphOpen] := 0x1000000
oDCOCX_Exontrol1:[Background,exTreeGlyphClose] := 0x2000000
oDCOCX_Exontrol1:EndUpdate()

234:
How can I find if the control is running in DPI mode

OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:FormatABC("dpi = 1 ? `normal/stretch mode` : `dpi mode`",nil,nil,nil)) ))

233:
How can I change the visual appearance of the +/- buttons

local var_Appearance as IAppearance

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExpandFolders := true
var_Appearance := oDCOCX_Exontrol1:VisualAppearance
	var_Appearance:Add(1,"gBFLBCJwBAEHhEJAAEhABDwCg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQSBcQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+OpfDxXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4llWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJegef4zluaJ3nqPJeCYH4BAeX5TDLBpVGqKRRnwf4flefZtHsX54BYAR/F+EwVnUd5eAMMJKDIChygyIQpAoEh4iIJ5JlgXIcgCXpIGoFwnGEQh6BEKBgmMIICHgIJCAiUAzgyUoAhwJohkiRgygwYpiGoKwzGIcgKCkNQNCMRIbCYCRYk4QoMiOchWDwNBjhiJJaDYTRiGiFwlCQAhOE8JBJHITIRgwZRZFCFCZBkOIUhKTRpCWAwgGYQ4El4NxlBifIWCcCYCFoaoMGaKYyG6GxlBmGJdhkCAWBIeA5g4U4QhMJAImkPIShRVxGgQJRlCIUISh+SJpnCZIeBgFgiHgO4OlOMINCISByECDQikkGhuh2JwpmqBogCKaYiC6FwhmkQ4yHgYgYiaHopiuaRakCbIsisSpGjYOwaHYKYMCkK5CA2IxrCwCwFigaJrkLTI6lcdANAEgIA=")
	var_Appearance:Add(2,"gBFLBCJwBAEHhEJAAEhABEICg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQSBcQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+OpfDxXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4llWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJeg8X4rluaZ3niGB+AQHx/EyShjjEVYqiUR5rnmex/GAB5+AIf4gEeXJFHyXZ3gCTAygyAociMKBKEKBIeCiCZyHYFAnCEeBkh+BghFgRIegOCgYCySAgh4CAkgINAMmMNIgCcCYjn4LoLmMCJGDKC5ijIagoDMYhCAoJg1A0IxEhsJgJFiThChCY5yFYPA0GOGIYloNhNGIaIXCUJACE4TwkEkchOFSFYlFkXhUCUCQZEYTglCSMxaEkYJIBmFJhDeDZZEYPwlgmQhghaGqVDoa4bGaeY6FGGZNlmFIBGEJ4jhiZQ5AkMhAg6E5JCkRoGCUSQ6B6CYiSCBIOh+DhJmmARiWQOJtDsCJSCSBwkXSLIRicaZ6HqIIomoIguhwIpphIHoWDsJ4mCGChpmqOpGheLIOkqUo2iya4DjGJxihiQoSj4IJaDaMpCjCWoGg6PgpBiQ4tHcQJQBAgI=")
oDCOCX_Exontrol1:[Background,exTreeGlyphOpen] := 0x1000000
oDCOCX_Exontrol1:[Background,exTreeGlyphClose] := 0x2000000
oDCOCX_Exontrol1:EndUpdate()

232:
How can I copy/execute command a file/folder as path (selection)


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:Select("*")
oDCOCX_Exontrol1:ExecuteContextCommand("<selection>",true,"Copy As Path")
oDCOCX_Exontrol1:EndUpdate()

231:
How can I programmatically selects all items


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:Select("*")
oDCOCX_Exontrol1:EndUpdate()

230:
How can I clear the current selection

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:Select("")
oDCOCX_Exontrol1:EndUpdate()

229:
I know the Expand method selects a folder, the question is if it is possible to prevent expanding it, so just select it


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:ExploreFromHere := "c:\"
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:Select("Temp")
oDCOCX_Exontrol1:Select("Windows")
oDCOCX_Exontrol1:EndUpdate()

228:
How can I display the identifiers of the control's context menu (debug)

METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	OutputDebugString(String2Psz( "State" ))
	OutputDebugString(String2Psz( AsString(State) ))
	OutputDebugString(String2Psz( "ExecuteContextMenu" ))
	OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:ExecuteContextMenu) ))
RETURN NIL


oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:ShowContextMenu := "`[debug]` + menu"

227:
How can I copy/execute command a file/folder (selection)

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:ExploreFromHere := "c:\"
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:Expand("c:\Temp")
oDCOCX_Exontrol1:ExecuteContextCommand("<selection>",true,"Copy")
oDCOCX_Exontrol1:EndUpdate()

226:
How can I copy a file/folder (absolute name)

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := "c:\"
oDCOCX_Exontrol1:ExecuteContextCommand("c:\Temp",true,"Copy")
oDCOCX_Exontrol1:EndUpdate()

225:
How can I copy a file/folder (relative name)

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := "c:\"
oDCOCX_Exontrol1:ExecuteContextCommand("Temp",true,"Copy")
oDCOCX_Exontrol1:EndUpdate()

224:
ShowContextMenu usage

METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	OutputDebugString(String2Psz( "State" ))
	OutputDebugString(String2Psz( AsString(State) ))
	OutputDebugString(String2Psz( "ExecuteContextMenu" ))
	OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:ExecuteContextMenu) ))
RETURN NIL


oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:FullRowSelect := true
oDCOCX_Exontrol1:ShowContextMenu := "filecount = 0 ? `Exit[id=1000]` : ( ( ( filecount = 1 ) ? filename : `multiple selection` ) + `[dis],[sep],` + menu)"

223:
ShowContextMenu usage

METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	OutputDebugString(String2Psz( "State" ))
	OutputDebugString(String2Psz( AsString(State) ))
	OutputDebugString(String2Psz( "ExecuteContextMenu" ))
	OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:ExecuteContextMenu) ))
RETURN NIL


oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:FullRowSelect := true
oDCOCX_Exontrol1:ShowContextMenu := "filecount > 1 ? `multiple selection[dis]` : menu"

222:
ShowContextMenu usage

METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	OutputDebugString(String2Psz( "State" ))
	OutputDebugString(String2Psz( AsString(State) ))
	OutputDebugString(String2Psz( "ExecuteContextMenu" ))
	OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:ExecuteContextMenu) ))
RETURN NIL


oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:FullRowSelect := true
oDCOCX_Exontrol1:ShowContextMenu := "filecount > 1 ? `multiple selection[dis]` : menu"

221:
ShowContextMenu usage

METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	OutputDebugString(String2Psz( "State" ))
	OutputDebugString(String2Psz( AsString(State) ))
	OutputDebugString(String2Psz( "ExecuteContextMenu" ))
	OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:ExecuteContextMenu) ))
RETURN NIL


oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:FullRowSelect := true
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:IncludeFilesInFolder := true
oDCOCX_Exontrol1:ShowContextMenu := "menu replace `Delete` with `Delete[dis]`"

220:
ShowContextMenu usage

METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	OutputDebugString(String2Psz( "State" ))
	OutputDebugString(String2Psz( AsString(State) ))
	OutputDebugString(String2Psz( "ExecuteContextMenu" ))
	OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:ExecuteContextMenu) ))
RETURN NIL


oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:FullRowSelect := true
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:IncludeFilesInFolder := true
oDCOCX_Exontrol1:ShowContextMenu := "menu replace `&Delete` with ``"

219:
ShowContextMenu usage

METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	OutputDebugString(String2Psz( "State" ))
	OutputDebugString(String2Psz( AsString(State) ))
	OutputDebugString(String2Psz( "ExecuteContextMenu" ))
	OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:ExecuteContextMenu) ))
RETURN NIL


oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:FullRowSelect := true
oDCOCX_Exontrol1:ShowContextMenu := "`Popup(Item 1[id=1001],Item 2[id=1002],Item 3[id=1003]),` + menu + `,Exit[id=1000]`"

218:
ShowContextMenu usage

METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	OutputDebugString(String2Psz( "State" ))
	OutputDebugString(String2Psz( AsString(State) ))
	OutputDebugString(String2Psz( "ExecuteContextMenu" ))
	OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:ExecuteContextMenu) ))
RETURN NIL


oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:FullRowSelect := true
oDCOCX_Exontrol1:ShowContextMenu := "filecount = 0 ? `Popup(Item 1[id=1001],Item 2[id=1002],Item 3[id=1003]),[sep],Exit[def][id=1000]` : menu"

217:
ShowContextMenu usage

METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	OutputDebugString(String2Psz( "State" ))
	OutputDebugString(String2Psz( AsString(State) ))
	OutputDebugString(String2Psz( "ExecuteContextMenu" ))
	OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:ExecuteContextMenu) ))
RETURN NIL


oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:FullRowSelect := true
oDCOCX_Exontrol1:ShowContextMenu := "Popup(Item 1[id=1001],Item 2[id=1002],Item 3[id=1003]),[sep],Exit[def][id=1000]"

216:
ShowContextMenu usage
METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	OutputDebugString(String2Psz( "State" ))
	OutputDebugString(String2Psz( AsString(State) ))
	OutputDebugString(String2Psz( "ExecuteContextMenu" ))
	OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:ExecuteContextMenu) ))
	OutputDebugString(String2Psz( "no context menu is generated, so nothing is displayed" ))
RETURN NIL


oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:FullRowSelect := true
oDCOCX_Exontrol1:ShowContextMenu := "``"

215:
How can I add new items to the default file's context menu

METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	OutputDebugString(String2Psz( "State " ))
	OutputDebugString(String2Psz( AsString(State) ))
	OutputDebugString(String2Psz( "ContextMenu" ))
	OutputDebugString(String2Psz( oDCOCX_Exontrol1:ShowContextMenu ))
	oDCOCX_Exontrol1:ShowContextMenu := AsString(oDCOCX_Exontrol1:FormatABC("B = 20 ? ( `My First Popup[def](A,B,C),[sep],`+ value + `,[sep],My Last Popup[def](A,B,C)` ) : value",oDCOCX_Exontrol1:ShowContextMenu,State,nil))
	OutputDebugString(String2Psz( "Execute" ))
	OutputDebugString(String2Psz( AsString(oDCOCX_Exontrol1:ExecuteContextMenu) ))
RETURN NIL


oDCOCX_Exontrol1:ExploreFromHere := ""

214:
Is it possible to display the item's identifiers in the file's context menu

METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	OutputDebugString(String2Psz( "State " ))
	OutputDebugString(String2Psz( AsString(State) ))
	OutputDebugString(String2Psz( "ContextMenu" ))
	OutputDebugString(String2Psz( oDCOCX_Exontrol1:ShowContextMenu ))
	oDCOCX_Exontrol1:ShowContextMenu := AsString(oDCOCX_Exontrol1:FormatABC("B = 20 ? (`[debug]`+ value) : value ",oDCOCX_Exontrol1:ShowContextMenu,State,nil))
RETURN NIL



213:
How can I remove the Delete command from the file's context menu

METHOD OCX_Exontrol1StateChange(State) CLASS MainDialog
	// StateChange event - Fired while the control's state has been changed.
	OutputDebugString(String2Psz( "State " ))
	OutputDebugString(String2Psz( AsString(State) ))
	OutputDebugString(String2Psz( "ContextMenu" ))
	OutputDebugString(String2Psz( oDCOCX_Exontrol1:ShowContextMenu ))
	oDCOCX_Exontrol1:ShowContextMenu := AsString(oDCOCX_Exontrol1:FormatABC("value replace `&Delete` with ``",oDCOCX_Exontrol1:ShowContextMenu,nil,nil))
RETURN NIL



212:
How do I execute a command from the file's content menu (sample 2)


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExploreFromHere := ""
oDCOCX_Exontrol1:ExecuteContextCommand("C:\",true,"20")
oDCOCX_Exontrol1:EndUpdate()

211:
How can I simulate the left-side of the Windows Explorer


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnName
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:ExploreFromHere := "::{450d8fba-ad25-11d0-98a8-0800361b1103}|::{018D5C66-4533-4307-9B53-224DE2ED1FE6}|::{20D04FE0-3AEA-1069-A2D8-08002B30309D}|::{F02C1A0D-BE21-4350-88B0-7367FC96EF3C}"
oDCOCX_Exontrol1:Expand("::{20D04FE0-3AEA-1069-A2D8-08002B30309D}")
oDCOCX_Exontrol1:EndUpdate()

210:
How can I add the "Control Panel" folder


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnName
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:ExploreFromHere := "::{26EE0668-A00A-44D7-9371-BEB064C98683}>"
oDCOCX_Exontrol1:EndUpdate()

209:
How can I add the "My Documents"


oDCOCX_Exontrol1:IncludeFilesInFolder := true
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:ExploreFromHere := "::{450d8fba-ad25-11d0-98a8-0800361b1103}>"

208:
How can I add the Printers and Faxes


oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnName
oDCOCX_Exontrol1:IncludeFilesInFolder := true
oDCOCX_Exontrol1:ExploreFromHere := "::{2227a280-3aea-1069-a2de-08002b30309d}>"

207:
How can I add the Network Connections


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnName
oDCOCX_Exontrol1:IncludeFilesInFolder := true
oDCOCX_Exontrol1:ExploreFromHere := "::{7007acc7-3202-11d1-aad2-00805fc1270e}>"
oDCOCX_Exontrol1:EndUpdate()

206:
How can I add the "Recycle Bin" folder


oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:IncludeFilesInFolder := true
oDCOCX_Exontrol1:ExploreFromHere := "::{645FF040-5081-101B-9F08-00AA002F954E}>"

205:
How can I add the "Documents" folder


oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:ExploreFromHere := "::{450D8FBA-AD25-11D0-98A8-0800361B1103}>"

204:
How can I add the "Control Panel" folder


oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ColumnsVisible := exFileColumnName
oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:IncludeFilesInFolder := true
oDCOCX_Exontrol1:ExploreFromHere := "::{21EC2020-3AEA-1069-A2DD-08002b30309d}>"
oDCOCX_Exontrol1:EndUpdate()

203:
How can I add the Network folder


oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:ExploreFromHere := "::{F02C1A0D-BE21-4350-88B0-7367FC96EF3C}>"

202:
How can I add the My Computer


oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:ExploreFromHere := "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}>"

201:
How can I add the My Network Places folder


oDCOCX_Exontrol1:ExpandFolders := true
oDCOCX_Exontrol1:ExploreFromHere := "::{208D2C60-3AEA-1069-A2D7-08002B30309D}>"