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

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.ExpandFolders = .T.
	.Object.ColumnFilterButton("Name") = .T.
	var_s = "(((valueS left ( valueS rfind `:` )) + (valueS right ( len(valueS) - ( valueS rfind ` ` ) )) replace ` ` with `<fgcolor=808080><"
	var_s = var_s + "font ;6> ` ))"
	.Object.Option(1) = var_s
	.ColumnsVisible = 26 && FileColumnEnum.exFileColumnModified Or FileColumnEnum.exFileColumnType Or FileColumnEnum.exFileColumnName
	.ModifiedDaysAgo = -1
	.EndUpdate
endwith
268:
Displays the date-time with no seconds part

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.ExpandFolders = .T.
	.Object.ColumnFilterButton("Name") = .T.
	.Object.Option(1) = "(valueS left ( valueS rfind `:` )) + (valueS right ( len(valueS) - ( valueS rfind ` ` ) ))"
	.ColumnsVisible = 26 && FileColumnEnum.exFileColumnModified Or FileColumnEnum.exFileColumnType Or FileColumnEnum.exFileColumnName
	.ModifiedDaysAgo = -1
	.EndUpdate
endwith
267:
Displays the Modified column in long date format, as specified in the control's panel ( no time is displayed )

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.ExpandFolders = .T.
	.Object.ColumnFilterButton("Name") = .T.
	.Object.Option(1) = "longdate(value)"
	.ColumnsVisible = 26 && FileColumnEnum.exFileColumnModified Or FileColumnEnum.exFileColumnType Or FileColumnEnum.exFileColumnName
	.ModifiedDaysAgo = -1
	.EndUpdate
endwith
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

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.ExpandFolders = .T.
	.Object.ColumnFilterButton("Name") = .T.
	.Object.Option(1) = "dateF(value)"
	.ColumnsVisible = 26 && FileColumnEnum.exFileColumnModified Or FileColumnEnum.exFileColumnType Or FileColumnEnum.exFileColumnName
	.ModifiedDaysAgo = -1
	.EndUpdate
endwith
265:
Displays the modified date without the time

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.ExpandFolders = .T.
	.Object.ColumnFilterButton("Name") = .T.
	.Object.Option(1) = "date(int(value))"
	.ColumnsVisible = 26 && FileColumnEnum.exFileColumnModified Or FileColumnEnum.exFileColumnType Or FileColumnEnum.exFileColumnName
	.ModifiedDaysAgo = -1
	.EndUpdate
endwith
264:
Displayes the modified time with a different color

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.ExpandFolders = .T.
	.Object.ColumnFilterButton("Name") = .T.
	.Object.Option(1) = "valueS replace ` ` with `<off -4><fgcolor=808080><font ;6> `"
	.ColumnsVisible = 26 && FileColumnEnum.exFileColumnModified Or FileColumnEnum.exFileColumnType Or FileColumnEnum.exFileColumnName
	.ModifiedDaysAgo = -1
	.EndUpdate
endwith
263:
Displays all files/folders modified n days ago, with white on a black background

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.ExpandFolders = .T.
	.Object.ColumnFilterButton("Name") = .T.
	.Object.Option(1) = "`<bgcolor=000000><fgcolor=FFFFFF>` + valueS"
	.ModifiedDaysAgo = 31
	.ColumnsVisible = 26 && FileColumnEnum.exFileColumnModified Or FileColumnEnum.exFileColumnType Or FileColumnEnum.exFileColumnName
	.EndUpdate
endwith
262:
Displays today for all files/folders modified today, yesterday for all files modified yesterday, else "%i day(s) ago"

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.ExpandFolders = .T.
	.Object.ColumnFilterButton("Name") = .T.
	.Object.Option(1) = "daysago = 0 ? `today` : (daysago = 1 ? `yesterday` : (daysago + ` day(s) ago`))"
	.ModifiedDaysAgo = 31
	.ColumnsVisible = 26 && FileColumnEnum.exFileColumnModified Or FileColumnEnum.exFileColumnType Or FileColumnEnum.exFileColumnName
	.EndUpdate
endwith
261:
Displays today for all files/folders else "%i day(s) ago"

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.ExpandFolders = .T.
	.Object.ColumnFilterButton("Name") = .T.
	.ModifiedDaysAgo = 31
	.ColumnsVisible = 26 && FileColumnEnum.exFileColumnModified Or FileColumnEnum.exFileColumnType Or FileColumnEnum.exFileColumnName
	.EndUpdate
endwith
260:
FilterBarCaption ALL Keyword ( sample 2, result )

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarFont = .Font
	.Object.Description(11) = .FormatABC("`<fgcolor=808080> ` + value + ` </fgcolor>`",.Description(11)) && 0x8 Or DescriptionTypeEnum.exFilterBarPatternFilterTitle
	var_s = "(( ( all replace `[<b>` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `</b>]` with ` </b></bgcolor></fgcolor>` replace `[<"
	var_s = var_s + "s>` with `<bgcolor=C0C0C0><fgcolor=FFFFFF> ` replace `</s>]` with ` </fgcolor></bgcolor>` )  + `<r><fgcolor=808080>` + ( matchit"
	var_s = var_s + "emcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount + 1) + ` result(s)` ) : (`<r><fgcolor=808080>`+ itemcount "
	var_s = var_s + "+ ` item(s)`) )))"
	.FilterBarCaption = var_s
	.FilterBarPromptVisible = 3 && FilterBarVisibleEnum.exFilterBarVisible Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.EndUpdate
endwith
259:
FilterBarCaption ALL Keyword ( sample 1 )

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarFont = .Font
	.Object.Description(11) = .FormatABC("`<fgcolor=808080> ` + value + ` </fgcolor>`",.Description(11)) && 0x8 Or DescriptionTypeEnum.exFilterBarPatternFilterTitle
	.FilterBarCaption = "all"
	.FilterBarPromptVisible = 3 && FilterBarVisibleEnum.exFilterBarVisible Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.EndUpdate
endwith
258:
FilterBarCaption ALLUI Keyword ( sample 2, result )

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarFont = .Font
	.Object.Description(11) = .FormatABC("`<fgcolor=808080> ` + value + ` </fgcolor>`",.Description(11)) && 0x8 Or DescriptionTypeEnum.exFilterBarPatternFilterTitle
	var_s = "(( ( allui replace `[<b>` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `</b>]` with ` </b></bgcolor></fgcolor>` replace `"
	var_s = var_s + "[<s>` with `<bgcolor=C0C0C0><fgcolor=FFFFFF> ` replace `</s>]` with ` </fgcolor></bgcolor>` )  + `<r><fgcolor=808080>` + ( match"
	var_s = var_s + "itemcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount + 1) + ` result(s)` ) : (`<r><fgcolor=808080>`+ itemcoun"
	var_s = var_s + "t + ` item(s)`) )))"
	.FilterBarCaption = var_s
	.FilterBarPromptVisible = 3 && FilterBarVisibleEnum.exFilterBarVisible Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.EndUpdate
endwith
257:
FilterBarCaption ALLUI Keyword ( sample 1 )

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarFont = .Font
	.Object.Description(11) = .FormatABC("`<fgcolor=808080> ` + value + ` </fgcolor>`",.Description(11)) && 0x8 Or DescriptionTypeEnum.exFilterBarPatternFilterTitle
	.FilterBarCaption = "allui"
	.FilterBarPromptVisible = 3 && FilterBarVisibleEnum.exFilterBarVisible Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.EndUpdate
endwith
256:
FilterBarCaption AVAILABLE Keyword ( sample 2, result )

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarFont = .Font
	.Object.Description(11) = .FormatABC("`<fgcolor=808080> ` + value + ` </fgcolor>`",.Description(11)) && 0x8 Or DescriptionTypeEnum.exFilterBarPatternFilterTitle
	var_s = "(( ( value replace `[` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `]` with ` </b></bgcolor></fgcolor>` ) + ` ` + ( avai"
	var_s = var_s + "lable replace `[` with `<bgcolor=C0C0C0><fgcolor=FFFFFF><b> ` replace `]` with ` </b></bgcolor></fgcolor>` replace `<s>` with ``"
	var_s = var_s + " replace `</s>` with `` ) + `<fgcolor=808080>` + ( matchitemcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount "
	var_s = var_s + "+ 1) + ` result(s)` ) : (`<r><fgcolor=808080>`+ itemcount + ` item(s)`) )))"
	.FilterBarCaption = var_s
	.FilterBarPromptVisible = 3 && FilterBarVisibleEnum.exFilterBarVisible Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.EndUpdate
endwith
255:
FilterBarCaption AVAILABLE Keyword ( sample 1 )

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarFont = .Font
	.Object.Description(11) = .FormatABC("`<fgcolor=808080> ` + value + ` </fgcolor>`",.Description(11)) && 0x8 Or DescriptionTypeEnum.exFilterBarPatternFilterTitle
	.FilterBarCaption = "value + ` ` + available"
	.FilterBarPromptVisible = 3 && FilterBarVisibleEnum.exFilterBarVisible Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.EndUpdate
endwith
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 )

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarFont = .Font
	.Object.Description(11) = .FormatABC("`<fgcolor=808080>` + value + `</fgcolor>`",.Description(11)) && 0x8 Or DescriptionTypeEnum.exFilterBarPatternFilterTitle
	var_s = "(`<b>` + value + `</b><fgcolor=808080>` + ( matchitemcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount + 1) + "
	var_s = var_s + "` result(s)` ) : (`<fgcolor=808080>`+ itemcount + ` item(s)`) )) replace `[` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace"
	var_s = var_s + " `]` with ` </b></bgcolor></fgcolor>`"
	.FilterBarCaption = var_s
	.FilterBarPromptVisible = 256
	.EndUpdate
endwith
253:
Is it possible to somehow highlight the column's name different than its filter value in the control's filter bar ( sample 2 )

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarFont = .Font
	.Object.Description(11) = .FormatABC("`<fgcolor=808080>` + value + `</fgcolor>`",.Description(11)) && 0x8 Or DescriptionTypeEnum.exFilterBarPatternFilterTitle
	.FilterBarCaption = "value replace `[` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `]` with ` </b></bgcolor></fgcolor>`"
	.FilterBarPromptVisible = 256
	.EndUpdate
endwith
252:
Is it possible to somehow highlight the column's name different than its filter value in the control's filter bar ( sample 1 )

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.Object.Description(11) = .FormatABC("`<fgcolor=808080>` + value + `</fgcolor>`",.Description(11)) && 0x8 Or DescriptionTypeEnum.exFilterBarPatternFilterTitle
	.FilterBarCaption = "value replace `[` with `<fgcolor=808080>[` replace `]` with `]</fgcolor>`"
	.FilterBarPromptVisible = 256
	.EndUpdate
endwith
251:
How can I get the number of results/items being shown in the control's filter bar (sample 4)

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarFont = .Font
	.FilterBarPrompt = .FormatABC("`<b>` + value",.FilterBarPrompt)
	var_s = "`<b><r>` + value + `</b><fgcolor=808080>` + ( matchitemcount < 0 ? ( ( len(value) ? `<br>` : `` ) + `<r>` + abs(matchitemcount +"
	var_s = var_s + " 1) + ` result(s)` ) : (`<fgcolor=808080>`+ itemcount + ` item(s)`) )"
	.FilterBarCaption = var_s
	.FilterBarPromptVisible = 3591 && FilterBarVisibleEnum.exFilterBarCompact Or FilterBarVisibleEnum.exFilterBarShowCloseOnRight Or FilterBarVisibleEnum.exFilterBarShowCloseIfRequired Or FilterBarVisibleEnum.exFilterBarCaptionVisible Or FilterBarVisibleEnum.exFilterBarVisible Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.EndUpdate
endwith
250:
FilterBarCaption Predefined Keywords

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterInclude = 1
	.FilterBarFont = .Font
	var_s = "`<fgcolor=0000FF><i>value/current</i></fgcolor>: <fgcolor=808080>` + value + `</fgcolor>` + `<br><fgcolor=0000FF><i>available</i"
	var_s = var_s + "></fgcolor>: ` + available + `<br><fgcolor=0000FF><i>allui</i></fgcolor>: ` + allui + `<br><fgcolor=0000FF><i>all</i></fgcolor>:"
	var_s = var_s + " ` + all + `<br><fgcolor=0000FF><i>itemcount</i></fgcolor>: <fgcolor=808080>` + itemcount + `</fgcolor>`+ `<br><fgcolor=0000FF><"
	var_s = var_s + "i>visibleitemcount</i></fgcolor>: <fgcolor=808080>` + visibleitemcount + `</fgcolor>`+ `<br><fgcolor=0000FF><i>matchitemcount</i"
	var_s = var_s + "></fgcolor>: <fgcolor=808080>` + matchitemcount + `</fgcolor>`+ `<br><fgcolor=0000FF><i>promptpattern</i></fgcolor>: <fgcolor=80"
	var_s = var_s + "8080>` + promptpattern + `</fgcolor>`"
	.FilterBarCaption = var_s
	.FilterBarPromptVisible = 7 && FilterBarVisibleEnum.exFilterBarCaptionVisible Or FilterBarVisibleEnum.exFilterBarVisible Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.EndUpdate
endwith
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

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarFont = .Font
	.FilterBarCaption = "`<r><i><fgcolor=808080><upline><solidline><sha ;;0>` + value"
	.FilterBarPromptVisible = 2067 && FilterBarVisibleEnum.exFilterBarCompact Or FilterBarVisibleEnum.exFilterBarSingleLine Or FilterBarVisibleEnum.exFilterBarVisible Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.EndUpdate
endwith
248:
Just wondering if it is possible to show the filter bar's close button on the right ( sample 2 )

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarPromptVisible = 1281 && FilterBarVisibleEnum.exFilterBarShowCloseOnRight Or FilterBarVisibleEnum.exFilterBarToggle Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.FilterBarPrompt = .FormatABC("`<r>` + value",.FilterBarPrompt)
	.EndUpdate
endwith
247:
How can I change the visual appearance of the filter bar's close button (EBN)

with thisform.ExFileView1
	.BeginUpdate
	with .VisualAppearance
		var_s = "gBFLBCJwBAEHhEJAAEhABHQDg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLOg7IJj"
		var_s = var_s + "yI4/SJAYCydKAWhxIaZKJHCZoEDaTAADCNVAQp6MEIJVbVEI0e79OgBLp/Z7kECIJJAaRjHQdJxGLA8EhtCQhCZteK6SgMKJYXhWQYRXI1JwvMBrWrdQjiOYELQtMKmS"
		var_s = var_s + "ZNLYGG4dR5SVJbcYhSYsRRFMoyDIOXYDLKsdYqSpXIThObEGgaPqJYjsUjCMKnR7HVIURrBPC9TBPE69ZgmC6ucKPX51ShKFaBWDZcwFAS+UBuYCAILiEAQGZ1XT8ORO"
		var_s = var_s + "icbgJgSTJRlCaZeDsHY7QGR4xkSYp3CaExZAQMgalQYAwjCAAfBANxcA2TgKAUOpDCGFhKg0RpXCwCwDHQHQHEyAIkCkOhbFOGA8A8DohBgRg9AccZcn8EpEjMLI2C2D"
		var_s = var_s + "YxAgQgvAIUIVkoAAPBQDJlECTZ3CCYwDACQwUA8A5MCAWAWDiQi4l8aQOEgLJuBgBgDmYFAzEoIoIl0WALgKYJbBABADAAHgHg8VAMmqCQQDMXABAATYwTmNwBDATJXA"
		var_s = var_s + "iAgjHmNQ5lgQ5QEQEQMmcWg/GwD5ylyNw2gMcJcjsBgBgOQQDDhRpVAMMwnDBFw1B0Ax8D0DxOmmJJIGQTY5hGMAwkwM4CAYLZAmAOJnAqAojiIGg6iieYkmeAYOHaKJ"
		var_s = var_s + "DCyCwjH6AoggsQpQliAJLhgaJ0CESBTnyDwjk+cg4g4P5IHIHJ+BWRRzlYWAxiOUxihsY4KjKLJRGqC44FCegkkkM58iAKAPnIWIWD8SRSFSfQnkmewUhYP4GiGKJ7G0"
		var_s = var_s + "TIbCSUoggqUo0lAQ4LnEcBcD8Coiiif4nE+eAAn2HpOkcFJqi4T5SkyMw/kqQown8IBIBOdA+A+DJrBqVxXEqYo4lCApLhGHBnD8S4ymyfxmg+cwQkQP5egOUZIWoEAk"
		var_s = var_s + "jIeIPBMBJBD+TBjBifwvkuc58hQJQPmFrYykkchclSApKjGOBuD+TRDFCfw3mmIxNi8FxFlOXhVC4aYDFyPgvg2YBcBcLZGCGCJ0DSLRzGSWQ/lmY5+mEP5gmMDBZRSM"
		var_s = var_s + "RsFsOxMhMJJ/DsTpTnwaQaE+N5ojuNhdEYNI5C4TZJO1GRDmCaxnA2Yx4n8IpIjOTBQBQC5TgyYw7gUYRYikC0BYRwsDQBoB8eA6Q2hsE0BUXgywZtYCyHMKwnxSAhAQ"
		var_s = var_s + "HkIQhRrBaDsCwA4ERiB2EWAIYIXhhiVEgAEUYwwYjyASLge4FhHgRDkM8OQih0jWPkGgBBAQ"
		.Add(1,var_s)
	endwith
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarPromptVisible = 257 && FilterBarVisibleEnum.exFilterBarToggle Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.Object.Background(1) = 0x1000000
	.EndUpdate
endwith
246:
How can I change the visual appearance of the filter bar's close button (solid)

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarPromptVisible = 1
	.Object.Background(1) = RGB(255,0,0)
	.EndUpdate
endwith
245:
Is it possible to prevent definitely showing the filter bar's close button

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarPromptVisible = 1
	.Object.Background(1) = -1
	.EndUpdate
endwith
244:
Is it possible to show the close button only if there is a filter applied

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarPromptVisible = 513 && FilterBarVisibleEnum.exFilterBarShowCloseIfRequired Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.EndUpdate
endwith
243:
The control's filter bar is not closed once I click the close button (toggle)

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarCaption = "`<r><fgcolor=808080>` + value"
	.FilterBarPromptVisible = 2323 && FilterBarVisibleEnum.exFilterBarCompact Or FilterBarVisibleEnum.exFilterBarToggle Or FilterBarVisibleEnum.exFilterBarSingleLine Or FilterBarVisibleEnum.exFilterBarVisible Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.EndUpdate
endwith
242:
How can I display the control's filter on a single line

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarCaption = "len(value) ? `filter for: <fgcolor 808080>` + value  : `<fgcolor 808080>no filter`"
	.FilterBarPromptVisible = 18 && FilterBarVisibleEnum.exFilterBarSingleLine Or FilterBarVisibleEnum.exFilterBarVisible
	.EndUpdate
endwith
241:
How can I display the control's filter on a single line (prompt-combined)

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarCaption = "`<r>` + value"
	.FilterBarPromptVisible = 2067 && FilterBarVisibleEnum.exFilterBarCompact Or FilterBarVisibleEnum.exFilterBarSingleLine Or FilterBarVisibleEnum.exFilterBarVisible Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.EndUpdate
endwith
240:
Is it possible to prevent closing the control's filter bar, so it is always shown (prompt-combined)

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarPromptVisible = 3 && FilterBarVisibleEnum.exFilterBarVisible Or FilterBarVisibleEnum.exFilterBarPromptVisible
	.EndUpdate
endwith
239:
Is it possible to prevent closing the control's filter bar, so it is always shown (prompt)

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarPromptVisible = 1
	.EndUpdate
endwith
238:
Is it possible to prevent closing the control's filter bar, so it is always shown

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.Object.ColumnFilterButton("Name") = .T.
	.FilterBarCaption = "len(value) = 0 ? `<fgcolor=808080>no filter` : value"
	.FilterBarPromptVisible = 2
	.EndUpdate
endwith
237:
Is it possible to show the selection with a different color, when the control loses the focus

with thisform.ExFileView1
	.BeginUpdate
	.SingleSel = .F.
	.ExploreFromHere = ""
	.HideSelection = .F.
	.Object.Background(166) = RGB(224,224,224)
	.Object.Background(167) = RGB(64,64,64)
	.EndUpdate
endwith
236:
Predefined Keywords of ShowContextMenu property

*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		.ExecuteContextMenu = 0
	endwith

with thisform.ExFileView1
	.ExploreFromHere = ""
	var_s = "`menu(` + menu + `)` + `,filecount=` + filecount + `,fileattr=` + hex(fileattr) + `,filename=` + filename + `,fileparsename=` + "
	var_s = var_s + "fileparsename + `,filefullname=` + filefullname"
	.ShowContextMenu = var_s
endwith
235:
How can I change the visual appearance of the +/- buttons, open/close glyphs as current visual theme

with thisform.ExFileView1
	.BeginUpdate
	.ExpandFolders = .T.
	with .VisualAppearance
		.Add(1,"XP:TREEVIEW 2 1")
		.Add(2,"XP:TREEVIEW 2 2")
	endwith
	.Object.Background(180) = 0x1000000
	.Object.Background(181) = 0x2000000
	.EndUpdate
endwith
234:
How can I find if the control is running in DPI mode
with thisform.ExFileView1
	DEBUGOUT( .FormatABC("dpi = 1 ? `normal/stretch mode` : `dpi mode`") )
endwith
233:
How can I change the visual appearance of the +/- buttons

with thisform.ExFileView1
	.BeginUpdate
	.ExpandFolders = .T.
	with .VisualAppearance
		var_s = "gBFLBCJwBAEHhEJAAEhABDwCg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQSB"
		var_s = var_s + "cQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+OpfD"
		var_s = var_s + "xXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4l"
		var_s = var_s + "lWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJegef4zluaJ3nqPJeCYH4BAeX5TDLBpVGqKRRnwf4flefZtHsX54BYAR/F+EwVnUd5eAMMJKDIChygyIQpAoEh4iIJ5JlgX"
		var_s = var_s + "IcgCXpIGoFwnGEQh6BEKBgmMIICHgIJCAiUAzgyUoAhwJohkiRgygwYpiGoKwzGIcgKCkNQNCMRIbCYCRYk4QoMiOchWDwNBjhiJJaDYTRiGiFwlCQAhOE8JBJHITIRg"
		var_s = var_s + "wZRZFCFCZBkOIUhKTRpCWAwgGYQ4El4NxlBifIWCcCYCFoaoMGaKYyG6GxlBmGJdhkCAWBIeA5g4U4QhMJAImkPIShRVxGgQJRlCIUISh+SJpnCZIeBgFgiHgO4OlOMI"
		var_s = var_s + "NCISByECDQikkGhuh2JwpmqBogCKaYiC6FwhmkQ4yHgYgYiaHopiuaRakCbIsisSpGjYOwaHYKYMCkK5CA2IxrCwCwFigaJrkLTI6lcdANAEgIA="
		.Add(1,var_s)
		var_s1 = "gBFLBCJwBAEHhEJAAEhABEICg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQSB"
		var_s1 = var_s1 + "cQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+OpfD"
		var_s1 = var_s1 + "xXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4l"
		var_s1 = var_s1 + "lWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJeg8X4rluaZ3niGB+AQHx/EyShjjEVYqiUR5rnmex/GAB5+AIf4gEeXJFHyXZ3gCTAygyAociMKBKEKBIeCiCZyHYFAnCEe"
		var_s1 = var_s1 + "Bkh+BghFgRIegOCgYCySAgh4CAkgINAMmMNIgCcCYjn4LoLmMCJGDKC5ijIagoDMYhCAoJg1A0IxEhsJgJFiThChCY5yFYPA0GOGIYloNhNGIaIXCUJACE4TwkEkchOF"
		var_s1 = var_s1 + "SFYlFkXhUCUCQZEYTglCSMxaEkYJIBmFJhDeDZZEYPwlgmQhghaGqVDoa4bGaeY6FGGZNlmFIBGEJ4jhiZQ5AkMhAg6E5JCkRoGCUSQ6B6CYiSCBIOh+DhJmmARiWQOJ"
		var_s1 = var_s1 + "tDsCJSCSBwkXSLIRicaZ6HqIIomoIguhwIpphIHoWDsJ4mCGChpmqOpGheLIOkqUo2iya4DjGJxihiQoSj4IJaDaMpCjCWoGg6PgpBiQ4tHcQJQBAgI="
		.Add(2,var_s1)
	endwith
	.Object.Background(180) = 0x1000000
	.Object.Background(181) = 0x2000000
	.EndUpdate
endwith
232:
How can I copy/execute command a file/folder as path (selection)

with thisform.ExFileView1
	.BeginUpdate
	.SingleSel = .F.
	.ExploreFromHere = ""
	.ExpandFolders = .T.
	.Select("*")
	.ExecuteContextCommand("<selection>",.T.,"Copy As Path")
	.EndUpdate
endwith
231:
How can I programmatically selects all items

with thisform.ExFileView1
	.BeginUpdate
	.ExpandFolders = .T.
	.SingleSel = .F.
	.ExploreFromHere = ""
	.Select("*")
	.EndUpdate
endwith
230:
How can I clear the current selection
with thisform.ExFileView1
	.BeginUpdate
	.ExpandFolders = .T.
	.ExploreFromHere = ""
	.SingleSel = .F.
	.Select("")
	.EndUpdate
endwith
229:
I know the Expand method selects a folder, the question is if it is possible to prevent expanding it, so just select it

with thisform.ExFileView1
	.BeginUpdate
	.ExpandFolders = .T.
	.ExploreFromHere = "c:\"
	.SingleSel = .F.
	.Select("Temp")
	.Select("Windows")
	.EndUpdate
endwith
228:
How can I display the identifiers of the control's context menu (debug)

*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		DEBUGOUT( "State" )
		DEBUGOUT( State )
		DEBUGOUT( "ExecuteContextMenu" )
		DEBUGOUT( .ExecuteContextMenu )
	endwith

with thisform.ExFileView1
	.ExploreFromHere = ""
	.SingleSel = .F.
	.ShowContextMenu = "`[debug]` + menu"
endwith
227:
How can I copy/execute command a file/folder (selection)
with thisform.ExFileView1
	.BeginUpdate
	.SingleSel = .F.
	.ExploreFromHere = "c:\"
	.ExpandFolders = .T.
	.Expand("c:\Temp")
	.ExecuteContextCommand("<selection>",.T.,"Copy")
	.EndUpdate
endwith
226:
How can I copy a file/folder (absolute name)
with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = "c:\"
	.ExecuteContextCommand("c:\Temp",.T.,"Copy")
	.EndUpdate
endwith
225:
How can I copy a file/folder (relative name)
with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = "c:\"
	.ExecuteContextCommand("Temp",.T.,"Copy")
	.EndUpdate
endwith
224:
ShowContextMenu usage

*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		DEBUGOUT( "State" )
		DEBUGOUT( State )
		DEBUGOUT( "ExecuteContextMenu" )
		DEBUGOUT( .ExecuteContextMenu )
	endwith

with thisform.ExFileView1
	.SingleSel = .F.
	.FullRowSelect = .T.
	.ShowContextMenu = "filecount = 0 ? `Exit[id=1000]` : ( ( ( filecount = 1 ) ? filename : `multiple selection` ) + `[dis],[sep],` + menu)"
endwith
223:
ShowContextMenu usage

*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		DEBUGOUT( "State" )
		DEBUGOUT( State )
		DEBUGOUT( "ExecuteContextMenu" )
		DEBUGOUT( .ExecuteContextMenu )
	endwith

with thisform.ExFileView1
	.ExploreFromHere = ""
	.SingleSel = .F.
	.FullRowSelect = .T.
	.ShowContextMenu = "filecount > 1 ? `multiple selection[dis]` : menu"
endwith
222:
ShowContextMenu usage

*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		DEBUGOUT( "State" )
		DEBUGOUT( State )
		DEBUGOUT( "ExecuteContextMenu" )
		DEBUGOUT( .ExecuteContextMenu )
	endwith

with thisform.ExFileView1
	.ExploreFromHere = ""
	.SingleSel = .F.
	.FullRowSelect = .T.
	.ShowContextMenu = "filecount > 1 ? `multiple selection[dis]` : menu"
endwith
221:
ShowContextMenu usage

*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		DEBUGOUT( "State" )
		DEBUGOUT( State )
		DEBUGOUT( "ExecuteContextMenu" )
		DEBUGOUT( .ExecuteContextMenu )
	endwith

with thisform.ExFileView1
	.ExploreFromHere = ""
	.SingleSel = .F.
	.FullRowSelect = .T.
	.ExpandFolders = .T.
	.IncludeFilesInFolder = .T.
	.ShowContextMenu = "menu replace `Delete` with `Delete[dis]`"
endwith
220:
ShowContextMenu usage

*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		DEBUGOUT( "State" )
		DEBUGOUT( State )
		DEBUGOUT( "ExecuteContextMenu" )
		DEBUGOUT( .ExecuteContextMenu )
	endwith

with thisform.ExFileView1
	.ExploreFromHere = ""
	.SingleSel = .F.
	.FullRowSelect = .T.
	.ExpandFolders = .T.
	.IncludeFilesInFolder = .T.
	.ShowContextMenu = "menu replace `&Delete` with ``"
endwith
219:
ShowContextMenu usage

*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		DEBUGOUT( "State" )
		DEBUGOUT( State )
		DEBUGOUT( "ExecuteContextMenu" )
		DEBUGOUT( .ExecuteContextMenu )
	endwith

with thisform.ExFileView1
	.ExploreFromHere = ""
	.SingleSel = .F.
	.FullRowSelect = .T.
	.ShowContextMenu = "`Popup(Item 1[id=1001],Item 2[id=1002],Item 3[id=1003]),` + menu + `,Exit[id=1000]`"
endwith
218:
ShowContextMenu usage

*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		DEBUGOUT( "State" )
		DEBUGOUT( State )
		DEBUGOUT( "ExecuteContextMenu" )
		DEBUGOUT( .ExecuteContextMenu )
	endwith

with thisform.ExFileView1
	.ExploreFromHere = ""
	.SingleSel = .F.
	.FullRowSelect = .T.
	.ShowContextMenu = "filecount = 0 ? `Popup(Item 1[id=1001],Item 2[id=1002],Item 3[id=1003]),[sep],Exit[def][id=1000]` : menu"
endwith
217:
ShowContextMenu usage

*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		DEBUGOUT( "State" )
		DEBUGOUT( State )
		DEBUGOUT( "ExecuteContextMenu" )
		DEBUGOUT( .ExecuteContextMenu )
	endwith

with thisform.ExFileView1
	.ExploreFromHere = ""
	.FullRowSelect = .T.
	.ShowContextMenu = "Popup(Item 1[id=1001],Item 2[id=1002],Item 3[id=1003]),[sep],Exit[def][id=1000]"
endwith
216:
ShowContextMenu usage
*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		DEBUGOUT( "State" )
		DEBUGOUT( State )
		DEBUGOUT( "ExecuteContextMenu" )
		DEBUGOUT( .ExecuteContextMenu )
		DEBUGOUT( "no context menu is generated, so nothing is displayed" )
	endwith

with thisform.ExFileView1
	.ExploreFromHere = ""
	.FullRowSelect = .T.
	.ShowContextMenu = "``"
endwith
215:
How can I add new items to the default file's context menu

*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		DEBUGOUT( "State " )
		DEBUGOUT( State )
		DEBUGOUT( "ContextMenu" )
		DEBUGOUT( .ShowContextMenu )
		.ShowContextMenu = .FormatABC("B = 20 ? ( `My First Popup[def](A,B,C),[sep],`+ value + `,[sep],My Last Popup[def](A,B,C)` ) : value",.ShowContextMenu,State)
		DEBUGOUT( "Execute" )
		DEBUGOUT( .ExecuteContextMenu )
	endwith

with thisform.ExFileView1
	.ExploreFromHere = ""
endwith
214:
Is it possible to display the item's identifiers in the file's context menu

*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		DEBUGOUT( "State " )
		DEBUGOUT( State )
		DEBUGOUT( "ContextMenu" )
		DEBUGOUT( .ShowContextMenu )
		.ShowContextMenu = .FormatABC("B = 20 ? (`[debug]`+ value) : value ",.ShowContextMenu,State)
	endwith


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

*** StateChange event - Fired while the control's state has been changed. ***
LPARAMETERS State
	with thisform.ExFileView1
		DEBUGOUT( "State " )
		DEBUGOUT( State )
		DEBUGOUT( "ContextMenu" )
		DEBUGOUT( .ShowContextMenu )
		.ShowContextMenu = .FormatABC("value replace `&Delete` with ``",.ShowContextMenu)
	endwith


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

with thisform.ExFileView1
	.BeginUpdate
	.ExploreFromHere = ""
	.ExecuteContextCommand("C:\",.T.,"20")
	.EndUpdate
endwith
211:
How can I simulate the left-side of the Windows Explorer

with thisform.ExFileView1
	.BeginUpdate
	.ColumnsVisible = 2
	.ExpandFolders = .T.
	var_s = "::{450d8fba-ad25-11d0-98a8-0800361b1103}|::{018D5C66-4533-4307-9B53-224DE2ED1FE6}|::{20D04FE0-3AEA-1069-A2D8-08002B30309D}|::{F0"
	var_s = var_s + "2C1A0D-BE21-4350-88B0-7367FC96EF3C}"
	.ExploreFromHere = var_s
	.Expand("::{20D04FE0-3AEA-1069-A2D8-08002B30309D}")
	.EndUpdate
endwith
210:
How can I add the "Control Panel" folder

with thisform.ExFileView1
	.BeginUpdate
	.ColumnsVisible = 2
	.ExpandFolders = .T.
	.ExploreFromHere = "::{26EE0668-A00A-44D7-9371-BEB064C98683}>"
	.EndUpdate
endwith
209:
How can I add the "My Documents"

with thisform.ExFileView1
	.IncludeFilesInFolder = .T.
	.ExpandFolders = .T.
	.ExploreFromHere = "::{450d8fba-ad25-11d0-98a8-0800361b1103}>"
endwith
208:
How can I add the Printers and Faxes

with thisform.ExFileView1
	.ExpandFolders = .T.
	.ColumnsVisible = 2
	.IncludeFilesInFolder = .T.
	.ExploreFromHere = "::{2227a280-3aea-1069-a2de-08002b30309d}>"
endwith
207:
How can I add the Network Connections

with thisform.ExFileView1
	.BeginUpdate
	.ExpandFolders = .T.
	.ColumnsVisible = 2
	.IncludeFilesInFolder = .T.
	.ExploreFromHere = "::{7007acc7-3202-11d1-aad2-00805fc1270e}>"
	.EndUpdate
endwith
206:
How can I add the "Recycle Bin" folder

with thisform.ExFileView1
	.ExpandFolders = .T.
	.IncludeFilesInFolder = .T.
	.ExploreFromHere = "::{645FF040-5081-101B-9F08-00AA002F954E}>"
endwith
205:
How can I add the "Documents" folder

with thisform.ExFileView1
	.ExpandFolders = .T.
	.ExploreFromHere = "::{450D8FBA-AD25-11D0-98A8-0800361B1103}>"
endwith
204:
How can I add the "Control Panel" folder

with thisform.ExFileView1
	.BeginUpdate
	.ColumnsVisible = 2
	.ExpandFolders = .T.
	.IncludeFilesInFolder = .T.
	.ExploreFromHere = "::{21EC2020-3AEA-1069-A2DD-08002b30309d}>"
	.EndUpdate
endwith
203:
How can I add the Network folder

with thisform.ExFileView1
	.ExpandFolders = .T.
	.ExploreFromHere = "::{F02C1A0D-BE21-4350-88B0-7367FC96EF3C}>"
endwith
202:
How can I add the My Computer

with thisform.ExFileView1
	.ExpandFolders = .T.
	.ExploreFromHere = "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}>"
endwith
201:
How can I add the My Network Places folder

with thisform.ExFileView1
	.ExpandFolders = .T.
	.ExploreFromHere = "::{208D2C60-3AEA-1069-A2D7-08002B30309D}>"
endwith