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

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	ExpandFolders := True;
	set_ColumnFilterButton('Name',True);
	set_Option(EXFILEVIEWLib.OptionEnum.exModifiedDaysAgo,'(((valueS left ( valueS rfind `:` )) + (valueS right ( len(valueS) - ( valueS rfind ` ` ) )) replace ` ` with `<fgcolor=808080><' + 
	'font ;6> ` ))');
	ColumnsVisible := Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnModified) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnType) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnName);
	ModifiedDaysAgo := -1;
	EndUpdate();
end
268:
Displays the date-time with no seconds part

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	ExpandFolders := True;
	set_ColumnFilterButton('Name',True);
	set_Option(EXFILEVIEWLib.OptionEnum.exModifiedDaysAgo,'(valueS left ( valueS rfind `:` )) + (valueS right ( len(valueS) - ( valueS rfind ` ` ) ))');
	ColumnsVisible := Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnModified) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnType) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnName);
	ModifiedDaysAgo := -1;
	EndUpdate();
end
267:
Displays the Modified column in long date format, as specified in the control's panel ( no time is displayed )

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	ExpandFolders := True;
	set_ColumnFilterButton('Name',True);
	set_Option(EXFILEVIEWLib.OptionEnum.exModifiedDaysAgo,'longdate(value)');
	ColumnsVisible := Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnModified) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnType) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnName);
	ModifiedDaysAgo := -1;
	EndUpdate();
end
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 AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	ExpandFolders := True;
	set_ColumnFilterButton('Name',True);
	set_Option(EXFILEVIEWLib.OptionEnum.exModifiedDaysAgo,'dateF(value)');
	ColumnsVisible := Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnModified) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnType) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnName);
	ModifiedDaysAgo := -1;
	EndUpdate();
end
265:
Displays the modified date without the time

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	ExpandFolders := True;
	set_ColumnFilterButton('Name',True);
	set_Option(EXFILEVIEWLib.OptionEnum.exModifiedDaysAgo,'date(int(value))');
	ColumnsVisible := Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnModified) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnType) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnName);
	ModifiedDaysAgo := -1;
	EndUpdate();
end
264:
Displayes the modified time with a different color

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	ExpandFolders := True;
	set_ColumnFilterButton('Name',True);
	set_Option(EXFILEVIEWLib.OptionEnum.exModifiedDaysAgo,'valueS replace ` ` with `<off -4><fgcolor=808080><font ;6> `');
	ColumnsVisible := Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnModified) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnType) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnName);
	ModifiedDaysAgo := -1;
	EndUpdate();
end
263:
Displays all files/folders modified n days ago, with white on a black background

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	ExpandFolders := True;
	set_ColumnFilterButton('Name',True);
	set_Option(EXFILEVIEWLib.OptionEnum.exModifiedDaysAgo,'`<bgcolor=000000><fgcolor=FFFFFF>` + valueS');
	ModifiedDaysAgo := 31;
	ColumnsVisible := Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnModified) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnType) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnName);
	EndUpdate();
end
262:
Displays today for all files/folders modified today, yesterday for all files modified yesterday, else "%i day(s) ago"

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	ExpandFolders := True;
	set_ColumnFilterButton('Name',True);
	set_Option(EXFILEVIEWLib.OptionEnum.exModifiedDaysAgo,'daysago = 0 ? `today` : (daysago = 1 ? `yesterday` : (daysago + ` day(s) ago`))');
	ModifiedDaysAgo := 31;
	ColumnsVisible := Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnModified) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnType) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnName);
	EndUpdate();
end
261:
Displays today for all files/folders else "%i day(s) ago"

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	ExpandFolders := True;
	set_ColumnFilterButton('Name',True);
	ModifiedDaysAgo := 31;
	ColumnsVisible := Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnModified) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnType) Or Integer(EXFILEVIEWLib.FileColumnEnum.exFileColumnName);
	EndUpdate();
end
260:
FilterBarCaption ALL Keyword ( sample 2, result )

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarFont := (Font as stdole.StdFont);
	set_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)),FormatABC('`<fgcolor=808080> ` + value + ` </fgcolor>`',TObject(get_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)))),Nil,Nil));
	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>` + ( matchit' + 
	'emcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount + 1) + ` result(s)` ) : (`<r><fgcolor=808080>`+ itemcount ' + 
	'+ ` item(s)`) )))';
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	EndUpdate();
end
259:
FilterBarCaption ALL Keyword ( sample 1 )

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarFont := (Font as stdole.StdFont);
	set_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)),FormatABC('`<fgcolor=808080> ` + value + ` </fgcolor>`',TObject(get_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)))),Nil,Nil));
	FilterBarCaption := 'all';
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	EndUpdate();
end
258:
FilterBarCaption ALLUI Keyword ( sample 2, result )

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarFont := (Font as stdole.StdFont);
	set_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)),FormatABC('`<fgcolor=808080> ` + value + ` </fgcolor>`',TObject(get_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)))),Nil,Nil));
	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>` + ( match' + 
	'itemcount < 0 ? ( ( len(value) ? `` : `` ) + `<r>` + abs(matchitemcount + 1) + ` result(s)` ) : (`<r><fgcolor=808080>`+ itemcoun' + 
	't + ` item(s)`) )))';
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	EndUpdate();
end
257:
FilterBarCaption ALLUI Keyword ( sample 1 )

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarFont := (Font as stdole.StdFont);
	set_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)),FormatABC('`<fgcolor=808080> ` + value + ` </fgcolor>`',TObject(get_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)))),Nil,Nil));
	FilterBarCaption := 'allui';
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	EndUpdate();
end
256:
FilterBarCaption AVAILABLE Keyword ( sample 2, result )

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarFont := (Font as stdole.StdFont);
	set_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)),FormatABC('`<fgcolor=808080> ` + value + ` </fgcolor>`',TObject(get_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)))),Nil,Nil));
	FilterBarCaption := '(( ( value replace `[` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `]` with ` </b></bgcolor></fgcolor>` ) + ` ` + ( avai' + 
	'lable 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)`) )))';
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	EndUpdate();
end
255:
FilterBarCaption AVAILABLE Keyword ( sample 1 )

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarFont := (Font as stdole.StdFont);
	set_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)),FormatABC('`<fgcolor=808080> ` + value + ` </fgcolor>`',TObject(get_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)))),Nil,Nil));
	FilterBarCaption := 'value + ` ` + available';
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	EndUpdate();
end
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 AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarFont := (Font as stdole.StdFont);
	set_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)),FormatABC('`<fgcolor=808080>` + value + `</fgcolor>`',TObject(get_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)))),Nil,Nil));
	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>`';
	FilterBarPromptVisible := EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarToggle;
	EndUpdate();
end
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 AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarFont := (Font as stdole.StdFont);
	set_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)),FormatABC('`<fgcolor=808080>` + value + `</fgcolor>`',TObject(get_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)))),Nil,Nil));
	FilterBarCaption := 'value replace `[` with `<bgcolor=000000><fgcolor=FFFFFF><b> ` replace `]` with ` </b></bgcolor></fgcolor>`';
	FilterBarPromptVisible := EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarToggle;
	EndUpdate();
end
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 AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	set_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)),FormatABC('`<fgcolor=808080>` + value + `</fgcolor>`',TObject(get_Description(EXFILEVIEWLib.DescriptionTypeEnum($8 Or Integer(EXFILEVIEWLib.DescriptionTypeEnum.exFilterBarPatternFilterTitle)))),Nil,Nil));
	FilterBarCaption := 'value replace `[` with `<fgcolor=808080>[` replace `]` with `]</fgcolor>`';
	FilterBarPromptVisible := EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarToggle;
	EndUpdate();
end
251:
How can I get the number of results/items being shown in the control's filter bar (sample 4)

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarFont := (Font as stdole.StdFont);
	FilterBarPrompt := FormatABC('`<b>` + value',TObject(FilterBarPrompt),Nil,Nil);
	FilterBarCaption := '`<b><r>` + value + `</b><fgcolor=808080>` + ( matchitemcount < 0 ? ( ( len(value) ? `<br>` : `` ) + `<r>` + abs(matchitemcount +' + 
	' 1) + ` result(s)` ) : (`<fgcolor=808080>`+ itemcount + ` item(s)`) )';
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarCompact) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarShowCloseOnRight) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarShowCloseIfRequired) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarCaptionVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	EndUpdate();
end
250:
FilterBarCaption Predefined Keywords

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterInclude := EXFILEVIEWLib.FilterIncludeEnum.exItemsWithChilds;
	FilterBarFont := (Font as stdole.StdFont);
	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=80' + 
	'8080>` + promptpattern + `</fgcolor>`';
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarCaptionVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	EndUpdate();
end
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 AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarFont := (Font as stdole.StdFont);
	FilterBarCaption := '`<r><i><fgcolor=808080><upline><solidline><sha ;;0>` + value';
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarCompact) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarSingleLine) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	EndUpdate();
end
248:
Just wondering if it is possible to show the filter bar's close button on the right ( sample 2 )

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarShowCloseOnRight) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarToggle) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	FilterBarPrompt := FormatABC('`<r>` + value',TObject(FilterBarPrompt),Nil,Nil);
	EndUpdate();
end
247:
How can I change the visual appearance of the filter bar's close button (EBN)

with AxExFileView1 do
begin
	BeginUpdate();
	with VisualAppearance do
	begin
		Add(1,'gBFLBCJwBAEHhEJAAEhABHQDg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLOg7IJj' + 
	'yI4/SJAYCydKAWhxIaZKJHCZoEDaTAADCNVAQp6MEIJVbVEI0e79OgBLp/Z7kECIJJAaRjHQdJxGLA8EhtCQhCZteK6SgMKJYXhWQYRXI1JwvMBrWrdQjiOYELQtMKmS' + 
	'ZNLYGG4dR5SVJbcYhSYsRRFMoyDIOXYDLKsdYqSpXIThObEGgaPqJYjsUjCMKnR7HVIURrBPC9TBPE69ZgmC6ucKPX51ShKFaBWDZcwFAS+UBuYCAILiEAQGZ1XT8ORO' + 
	'icbgJgSTJRlCaZeDsHY7QGR4xkSYp3CaExZAQMgalQYAwjCAAfBANxcA2TgKAUOpDCGFhKg0RpXCwCwDHQHQHEyAIkCkOhbFOGA8A8DohBgRg9AccZcn8EpEjMLI2C2D' + 
	'YxAgQgvAIUIVkoAAPBQDJlECTZ3CCYwDACQwUA8A5MCAWAWDiQi4l8aQOEgLJuBgBgDmYFAzEoIoIl0WALgKYJbBABADAAHgHg8VAMmqCQQDMXABAATYwTmNwBDATJXA' + 
	'iAgjHmNQ5lgQ5QEQEQMmcWg/GwD5ylyNw2gMcJcjsBgBgOQQDDhRpVAMMwnDBFw1B0Ax8D0DxOmmJJIGQTY5hGMAwkwM4CAYLZAmAOJnAqAojiIGg6iieYkmeAYOHaKJ' + 
	'DCyCwjH6AoggsQpQliAJLhgaJ0CESBTnyDwjk+cg4g4P5IHIHJ+BWRRzlYWAxiOUxihsY4KjKLJRGqC44FCegkkkM58iAKAPnIWIWD8SRSFSfQnkmewUhYP4GiGKJ7G0' + 
	'TIbCSUoggqUo0lAQ4LnEcBcD8Coiiif4nE+eAAn2HpOkcFJqi4T5SkyMw/kqQown8IBIBOdA+A+DJrBqVxXEqYo4lCApLhGHBnD8S4ymyfxmg+cwQkQP5egOUZIWoEAk' + 
	'jIeIPBMBJBD+TBjBifwvkuc58hQJQPmFrYykkchclSApKjGOBuD+TRDFCfw3mmIxNi8FxFlOXhVC4aYDFyPgvg2YBcBcLZGCGCJ0DSLRzGSWQ/lmY5+mEP5gmMDBZRSM' + 
	'RsFsOxMhMJJ/DsTpTnwaQaE+N5ojuNhdEYNI5C4TZJO1GRDmCaxnA2Yx4n8IpIjOTBQBQC5TgyYw7gUYRYikC0BYRwsDQBoB8eA6Q2hsE0BUXgywZtYCyHMKwnxSAhAQ' + 
	'HkIQhRrBaDsCwA4ERiB2EWAIYIXhhiVEgAEUYwwYjyASLge4FhHgRDkM8OQih0jWPkGgBBAQ');
	end;
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarToggle) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	set_Background(EXFILEVIEWLib.BackgroundPartEnum.exFooterFilterBarButton,$1000000);
	EndUpdate();
end
246:
How can I change the visual appearance of the filter bar's close button (solid)

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarPromptVisible := EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible;
	set_Background(EXFILEVIEWLib.BackgroundPartEnum.exFooterFilterBarButton,$ff);
	EndUpdate();
end
245:
Is it possible to prevent definitely showing the filter bar's close button

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarPromptVisible := EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible;
	set_Background(EXFILEVIEWLib.BackgroundPartEnum.exFooterFilterBarButton,$ffffffff);
	EndUpdate();
end
244:
Is it possible to show the close button only if there is a filter applied

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarShowCloseIfRequired) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	EndUpdate();
end
243:
The control's filter bar is not closed once I click the close button (toggle)

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarCaption := '`<r><fgcolor=808080>` + value';
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarCompact) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarToggle) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarSingleLine) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	EndUpdate();
end
242:
How can I display the control's filter on a single line

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarCaption := 'len(value) ? `filter for: <fgcolor 808080>` + value  : `<fgcolor 808080>no filter`';
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarSingleLine) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible);
	EndUpdate();
end
241:
How can I display the control's filter on a single line (prompt-combined)

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarCaption := '`<r>` + value';
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarCompact) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarSingleLine) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	EndUpdate();
end
240:
Is it possible to prevent closing the control's filter bar, so it is always shown (prompt-combined)

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarPromptVisible := Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible) Or Integer(EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible);
	EndUpdate();
end
239:
Is it possible to prevent closing the control's filter bar, so it is always shown (prompt)

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarPromptVisible := EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarPromptVisible;
	EndUpdate();
end
238:
Is it possible to prevent closing the control's filter bar, so it is always shown

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	set_ColumnFilterButton('Name',True);
	FilterBarCaption := 'len(value) = 0 ? `<fgcolor=808080>no filter` : value';
	FilterBarPromptVisible := EXFILEVIEWLib.FilterBarVisibleEnum.exFilterBarVisible;
	EndUpdate();
end
237:
Is it possible to show the selection with a different color, when the control loses the focus

with AxExFileView1 do
begin
	BeginUpdate();
	SingleSel := False;
	ExploreFromHere := '';
	HideSelection := False;
	set_Background(EXFILEVIEWLib.BackgroundPartEnum.exSelBackColorHide,$e0e0e0);
	set_Background(EXFILEVIEWLib.BackgroundPartEnum.exSelForeColorHide,$404040);
	EndUpdate();
end
236:
Predefined Keywords of ShowContextMenu property

// StateChange event - Fired while the control's state has been changed.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		ExecuteContextMenu := 0;
	end
end;

with AxExFileView1 do
begin
	ExploreFromHere := '';
	ShowContextMenu := '`menu(` + menu + `)` + `,filecount=` + filecount + `,fileattr=` + hex(fileattr) + `,filename=` + filename + `,fileparsename=` + ' + 
	'fileparsename + `,filefullname=` + filefullname';
end
235:
How can I change the visual appearance of the +/- buttons, open/close glyphs as current visual theme

with AxExFileView1 do
begin
	BeginUpdate();
	ExpandFolders := True;
	with VisualAppearance do
	begin
		Add(1,'XP:TREEVIEW 2 1');
		Add(2,'XP:TREEVIEW 2 2');
	end;
	set_Background(EXFILEVIEWLib.BackgroundPartEnum.exTreeGlyphOpen,$1000000);
	set_Background(EXFILEVIEWLib.BackgroundPartEnum.exTreeGlyphClose,$2000000);
	EndUpdate();
end
234:
How can I find if the control is running in DPI mode
with AxExFileView1 do
begin
	OutputDebugString( FormatABC('dpi = 1 ? `normal/stretch mode` : `dpi mode`',Nil,Nil,Nil) );
end
233:
How can I change the visual appearance of the +/- buttons

with AxExFileView1 do
begin
	BeginUpdate();
	ExpandFolders := True;
	with VisualAppearance do
	begin
		Add(1,'gBFLBCJwBAEHhEJAAEhABDwCg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQSB' + 
	'cQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+OpfD' + 
	'xXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4l' + 
	'lWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJegef4zluaJ3nqPJeCYH4BAeX5TDLBpVGqKRRnwf4flefZtHsX54BYAR/F+EwVnUd5eAMMJKDIChygyIQpAoEh4iIJ5JlgX' + 
	'IcgCXpIGoFwnGEQh6BEKBgmMIICHgIJCAiUAzgyUoAhwJohkiRgygwYpiGoKwzGIcgKCkNQNCMRIbCYCRYk4QoMiOchWDwNBjhiJJaDYTRiGiFwlCQAhOE8JBJHITIRg' + 
	'wZRZFCFCZBkOIUhKTRpCWAwgGYQ4El4NxlBifIWCcCYCFoaoMGaKYyG6GxlBmGJdhkCAWBIeA5g4U4QhMJAImkPIShRVxGgQJRlCIUISh+SJpnCZIeBgFgiHgO4OlOMI' + 
	'NCISByECDQikkGhuh2JwpmqBogCKaYiC6FwhmkQ4yHgYgYiaHopiuaRakCbIsisSpGjYOwaHYKYMCkK5CA2IxrCwCwFigaJrkLTI6lcdANAEgIA=');
		Add(2,'gBFLBCJwBAEHhEJAAEhABEICg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQSB' + 
	'cQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+OpfD' + 
	'xXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4l' + 
	'lWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJeg8X4rluaZ3niGB+AQHx/EyShjjEVYqiUR5rnmex/GAB5+AIf4gEeXJFHyXZ3gCTAygyAociMKBKEKBIeCiCZyHYFAnCEe' + 
	'Bkh+BghFgRIegOCgYCySAgh4CAkgINAMmMNIgCcCYjn4LoLmMCJGDKC5ijIagoDMYhCAoJg1A0IxEhsJgJFiThChCY5yFYPA0GOGIYloNhNGIaIXCUJACE4TwkEkchOF' + 
	'SFYlFkXhUCUCQZEYTglCSMxaEkYJIBmFJhDeDZZEYPwlgmQhghaGqVDoa4bGaeY6FGGZNlmFIBGEJ4jhiZQ5AkMhAg6E5JCkRoGCUSQ6B6CYiSCBIOh+DhJmmARiWQOJ' + 
	'tDsCJSCSBwkXSLIRicaZ6HqIIomoIguhwIpphIHoWDsJ4mCGChpmqOpGheLIOkqUo2iya4DjGJxihiQoSj4IJaDaMpCjCWoGg6PgpBiQ4tHcQJQBAgI=');
	end;
	set_Background(EXFILEVIEWLib.BackgroundPartEnum.exTreeGlyphOpen,$1000000);
	set_Background(EXFILEVIEWLib.BackgroundPartEnum.exTreeGlyphClose,$2000000);
	EndUpdate();
end
232:
How can I copy/execute command a file/folder as path (selection)

with AxExFileView1 do
begin
	BeginUpdate();
	SingleSel := False;
	ExploreFromHere := '';
	ExpandFolders := True;
	Select('*');
	ExecuteContextCommand('<selection>',True,'Copy As Path');
	EndUpdate();
end
231:
How can I programmatically selects all items

with AxExFileView1 do
begin
	BeginUpdate();
	ExpandFolders := True;
	SingleSel := False;
	ExploreFromHere := '';
	Select('*');
	EndUpdate();
end
230:
How can I clear the current selection
with AxExFileView1 do
begin
	BeginUpdate();
	ExpandFolders := True;
	ExploreFromHere := '';
	SingleSel := False;
	Select('');
	EndUpdate();
end
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 AxExFileView1 do
begin
	BeginUpdate();
	ExpandFolders := True;
	ExploreFromHere := 'c:\';
	SingleSel := False;
	Select('Temp');
	Select('Windows');
	EndUpdate();
end
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.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		OutputDebugString( 'State' );
		OutputDebugString( e.state );
		OutputDebugString( 'ExecuteContextMenu' );
		OutputDebugString( ExecuteContextMenu );
	end
end;

with AxExFileView1 do
begin
	ExploreFromHere := '';
	SingleSel := False;
	ShowContextMenu := '`[debug]` + menu';
end
227:
How can I copy/execute command a file/folder (selection)
with AxExFileView1 do
begin
	BeginUpdate();
	SingleSel := False;
	ExploreFromHere := 'c:\';
	ExpandFolders := True;
	Expand('c:\Temp');
	ExecuteContextCommand('<selection>',True,'Copy');
	EndUpdate();
end
226:
How can I copy a file/folder (absolute name)
with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := 'c:\';
	ExecuteContextCommand('c:\Temp',True,'Copy');
	EndUpdate();
end
225:
How can I copy a file/folder (relative name)
with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := 'c:\';
	ExecuteContextCommand('Temp',True,'Copy');
	EndUpdate();
end
224:
ShowContextMenu usage

// StateChange event - Fired while the control's state has been changed.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		OutputDebugString( 'State' );
		OutputDebugString( e.state );
		OutputDebugString( 'ExecuteContextMenu' );
		OutputDebugString( ExecuteContextMenu );
	end
end;

with AxExFileView1 do
begin
	SingleSel := False;
	FullRowSelect := True;
	ShowContextMenu := 'filecount = 0 ? `Exit[id=1000]` : ( ( ( filecount = 1 ) ? filename : `multiple selection` ) + `[dis],[sep],` + menu)';
end
223:
ShowContextMenu usage

// StateChange event - Fired while the control's state has been changed.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		OutputDebugString( 'State' );
		OutputDebugString( e.state );
		OutputDebugString( 'ExecuteContextMenu' );
		OutputDebugString( ExecuteContextMenu );
	end
end;

with AxExFileView1 do
begin
	ExploreFromHere := '';
	SingleSel := False;
	FullRowSelect := True;
	ShowContextMenu := 'filecount > 1 ? `multiple selection[dis]` : menu';
end
222:
ShowContextMenu usage

// StateChange event - Fired while the control's state has been changed.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		OutputDebugString( 'State' );
		OutputDebugString( e.state );
		OutputDebugString( 'ExecuteContextMenu' );
		OutputDebugString( ExecuteContextMenu );
	end
end;

with AxExFileView1 do
begin
	ExploreFromHere := '';
	SingleSel := False;
	FullRowSelect := True;
	ShowContextMenu := 'filecount > 1 ? `multiple selection[dis]` : menu';
end
221:
ShowContextMenu usage

// StateChange event - Fired while the control's state has been changed.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		OutputDebugString( 'State' );
		OutputDebugString( e.state );
		OutputDebugString( 'ExecuteContextMenu' );
		OutputDebugString( ExecuteContextMenu );
	end
end;

with AxExFileView1 do
begin
	ExploreFromHere := '';
	SingleSel := False;
	FullRowSelect := True;
	ExpandFolders := True;
	IncludeFilesInFolder := True;
	ShowContextMenu := 'menu replace `Delete` with `Delete[dis]`';
end
220:
ShowContextMenu usage

// StateChange event - Fired while the control's state has been changed.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		OutputDebugString( 'State' );
		OutputDebugString( e.state );
		OutputDebugString( 'ExecuteContextMenu' );
		OutputDebugString( ExecuteContextMenu );
	end
end;

with AxExFileView1 do
begin
	ExploreFromHere := '';
	SingleSel := False;
	FullRowSelect := True;
	ExpandFolders := True;
	IncludeFilesInFolder := True;
	ShowContextMenu := 'menu replace `&Delete` with ``';
end
219:
ShowContextMenu usage

// StateChange event - Fired while the control's state has been changed.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		OutputDebugString( 'State' );
		OutputDebugString( e.state );
		OutputDebugString( 'ExecuteContextMenu' );
		OutputDebugString( ExecuteContextMenu );
	end
end;

with AxExFileView1 do
begin
	ExploreFromHere := '';
	SingleSel := False;
	FullRowSelect := True;
	ShowContextMenu := '`Popup(Item 1[id=1001],Item 2[id=1002],Item 3[id=1003]),` + menu + `,Exit[id=1000]`';
end
218:
ShowContextMenu usage

// StateChange event - Fired while the control's state has been changed.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		OutputDebugString( 'State' );
		OutputDebugString( e.state );
		OutputDebugString( 'ExecuteContextMenu' );
		OutputDebugString( ExecuteContextMenu );
	end
end;

with AxExFileView1 do
begin
	ExploreFromHere := '';
	SingleSel := False;
	FullRowSelect := True;
	ShowContextMenu := 'filecount = 0 ? `Popup(Item 1[id=1001],Item 2[id=1002],Item 3[id=1003]),[sep],Exit[def][id=1000]` : menu';
end
217:
ShowContextMenu usage

// StateChange event - Fired while the control's state has been changed.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		OutputDebugString( 'State' );
		OutputDebugString( e.state );
		OutputDebugString( 'ExecuteContextMenu' );
		OutputDebugString( ExecuteContextMenu );
	end
end;

with AxExFileView1 do
begin
	ExploreFromHere := '';
	FullRowSelect := True;
	ShowContextMenu := 'Popup(Item 1[id=1001],Item 2[id=1002],Item 3[id=1003]),[sep],Exit[def][id=1000]';
end
216:
ShowContextMenu usage
// StateChange event - Fired while the control's state has been changed.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		OutputDebugString( 'State' );
		OutputDebugString( e.state );
		OutputDebugString( 'ExecuteContextMenu' );
		OutputDebugString( ExecuteContextMenu );
		OutputDebugString( 'no context menu is generated, so nothing is displayed' );
	end
end;

with AxExFileView1 do
begin
	ExploreFromHere := '';
	FullRowSelect := True;
	ShowContextMenu := '``';
end
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.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		OutputDebugString( 'State ' );
		OutputDebugString( e.state );
		OutputDebugString( 'ContextMenu' );
		OutputDebugString( ShowContextMenu );
		ShowContextMenu := FormatABC('B = 20 ? ( `My First Popup[def](A,B,C),[sep],`+ value + `,[sep],My Last Popup[def](A,B,C)` ) : value',TObject(ShowContextMenu),TObject(e.state),Nil);
		OutputDebugString( 'Execute' );
		OutputDebugString( ExecuteContextMenu );
	end
end;

with AxExFileView1 do
begin
	ExploreFromHere := '';
end
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.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		OutputDebugString( 'State ' );
		OutputDebugString( e.state );
		OutputDebugString( 'ContextMenu' );
		OutputDebugString( ShowContextMenu );
		ShowContextMenu := FormatABC('B = 20 ? (`[debug]`+ value) : value ',TObject(ShowContextMenu),TObject(e.state),Nil);
	end
end;


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.
procedure TWinForm1.AxExFileView1_StateChange(sender: System.Object; e: AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent);
begin
	with AxExFileView1 do
	begin
		OutputDebugString( 'State ' );
		OutputDebugString( e.state );
		OutputDebugString( 'ContextMenu' );
		OutputDebugString( ShowContextMenu );
		ShowContextMenu := FormatABC('value replace `&Delete` with ``',TObject(ShowContextMenu),Nil,Nil);
	end
end;


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

with AxExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	ExecuteContextCommand('C:\',True,'20');
	EndUpdate();
end
211:
How can I simulate the left-side of the Windows Explorer

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

with AxExFileView1 do
begin
	BeginUpdate();
	ColumnsVisible := EXFILEVIEWLib.FileColumnEnum.exFileColumnName;
	ExpandFolders := True;
	ExploreFromHere := '::{26EE0668-A00A-44D7-9371-BEB064C98683}>';
	EndUpdate();
end
209:
How can I add the "My Documents"

with AxExFileView1 do
begin
	IncludeFilesInFolder := True;
	ExpandFolders := True;
	ExploreFromHere := '::{450d8fba-ad25-11d0-98a8-0800361b1103}>';
end
208:
How can I add the Printers and Faxes

with AxExFileView1 do
begin
	ExpandFolders := True;
	ColumnsVisible := EXFILEVIEWLib.FileColumnEnum.exFileColumnName;
	IncludeFilesInFolder := True;
	ExploreFromHere := '::{2227a280-3aea-1069-a2de-08002b30309d}>';
end
207:
How can I add the Network Connections

with AxExFileView1 do
begin
	BeginUpdate();
	ExpandFolders := True;
	ColumnsVisible := EXFILEVIEWLib.FileColumnEnum.exFileColumnName;
	IncludeFilesInFolder := True;
	ExploreFromHere := '::{7007acc7-3202-11d1-aad2-00805fc1270e}>';
	EndUpdate();
end
206:
How can I add the "Recycle Bin" folder

with AxExFileView1 do
begin
	ExpandFolders := True;
	IncludeFilesInFolder := True;
	ExploreFromHere := '::{645FF040-5081-101B-9F08-00AA002F954E}>';
end
205:
How can I add the "Documents" folder

with AxExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := '::{450D8FBA-AD25-11D0-98A8-0800361B1103}>';
end
204:
How can I add the "Control Panel" folder

with AxExFileView1 do
begin
	BeginUpdate();
	ColumnsVisible := EXFILEVIEWLib.FileColumnEnum.exFileColumnName;
	ExpandFolders := True;
	IncludeFilesInFolder := True;
	ExploreFromHere := '::{21EC2020-3AEA-1069-A2DD-08002b30309d}>';
	EndUpdate();
end
203:
How can I add the Network folder

with AxExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := '::{F02C1A0D-BE21-4350-88B0-7367FC96EF3C}>';
end
202:
How can I add the My Computer

with AxExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := '::{20D04FE0-3AEA-1069-A2D8-08002B30309D}>';
end
201:
How can I add the My Network Places folder

with AxExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := '::{208D2C60-3AEA-1069-A2D7-08002B30309D}>';
end