48
Is there a way to change the header names

with AxExShellView1 do
begin
	ColumnNames := 'Name(Ime),Date modified(Datum),Item type(Tip),Size(Velikost)';
end
47
Disable or prevent the header's context-menu
with AxExShellView1 do
begin
	AllowContextMenu := EXSHELLVIEWLib.AllowContextMenuEnum.exAllowListViewContextMenu;
end
46
Disable or prevent the list-view's context-menu
with AxExShellView1 do
begin
	AllowContextMenu := EXSHELLVIEWLib.AllowContextMenuEnum.exAllowHeaderContextMenu;
end
45
Disable or prevent the control's context-menu
with AxExShellView1 do
begin
	AllowContextMenu := EXSHELLVIEWLib.AllowContextMenuEnum.exDisableContextMenu;
end
44
How can I add my own items, without the default context menu

// InvokeMenuCommand event - Fired when the user selects an item context menu that has been added during QueryContextMenu event.
procedure TWinForm1.AxExShellView1_InvokeMenuCommand(sender: System.Object; e: AxEXSHELLVIEWLib._IExShellViewEvents_InvokeMenuCommandEvent);
begin
	with AxExShellView1 do
	begin
		OutputDebugString( e.command );
	end
end;

// QueryContextMenu event - Fired when the context menu is about to be active. You can supply new items to the context menu.
procedure TWinForm1.AxExShellView1_QueryContextMenu(sender: System.Object; e: AxEXSHELLVIEWLib._IExShellViewEvents_QueryContextMenuEvent);
begin
	with AxExShellView1 do
	begin
		e.separator := ',';
		e.items := 'My First Item,My Second Item';
	end
end;

with AxExShellView1 do
begin
	DefaultMenuItems := False;
	BrowseFolder := 'c:\Temp';
end
43
How can I add my own items

// InvokeMenuCommand event - Fired when the user selects an item context menu that has been added during QueryContextMenu event.
procedure TWinForm1.AxExShellView1_InvokeMenuCommand(sender: System.Object; e: AxEXSHELLVIEWLib._IExShellViewEvents_InvokeMenuCommandEvent);
begin
	with AxExShellView1 do
	begin
		OutputDebugString( e.command );
	end
end;

// QueryContextMenu event - Fired when the context menu is about to be active. You can supply new items to the context menu.
procedure TWinForm1.AxExShellView1_QueryContextMenu(sender: System.Object; e: AxEXSHELLVIEWLib._IExShellViewEvents_QueryContextMenuEvent);
begin
	with AxExShellView1 do
	begin
		e.separator := ',';
		e.items := ',My First Item,My Second Item';
	end
end;

with AxExShellView1 do
begin
	BrowseFolder := 'c:\Temp';
end
42
The InvokeCommand("open") will not work on a german. What can I do
// DblClick event - Occurs when the user dblclk the left mouse button over an object.
procedure TWinForm1.AxExShellView1_DblClick(sender: System.Object; e: System.EventArgs);
begin
	// Objects(0).InvokeCommand("Open")
	with AxExShellView1 do
	begin
		Objects.Get(EXSHELLVIEWLib.ObjectTypeEnum.SelectedItems);
	end
end;

// InvokeItemMenu event - Notifies the application once the user selects a command in the context menu.
procedure TWinForm1.AxExShellView1_InvokeItemMenu(sender: System.Object; e: AxEXSHELLVIEWLib._IExShellViewEvents_InvokeItemMenuEvent);
begin
	with AxExShellView1 do
	begin
		OutputDebugString( e.command );
	end
end;

with AxExShellView1 do
begin
	BrowseFolder := 'c:\Temp';
end
41
How can I open the file's properties when user double clicks it
// DblClick event - Occurs when the user dblclk the left mouse button over an object.
procedure TWinForm1.AxExShellView1_DblClick(sender: System.Object; e: System.EventArgs);
begin
	// Objects(0).InvokeCommand("Properties")
	with AxExShellView1 do
	begin
		Objects.Get(EXSHELLVIEWLib.ObjectTypeEnum.SelectedItems);
	end
end;

with AxExShellView1 do
begin
	BrowseFolder := 'c:\Temp';
end
40
We're looking for a control to show files, just like the eXShellView, but than we would like to specify the files themselves. Is that possible using your control

with AxExShellView1 do
begin
	ViewMode := EXSHELLVIEWLib.ViewModeType.LargeIcons;
	HeaderVisible := False;
	BrowseFiles := 'C:\Program Files\Microsoft Visual Studio 9.0\Common7\IDE\devenv.exe|C:\Program Files\Microsoft Visual FoxPro 9\vfp9.exe';
end
39
How do I prevent pressing the Backspace, or go up to the parent

// KeyDown event - Occurs when the user presses a key while an object has the focus.
procedure TWinForm1.AxExShellView1_KeyDownEvent(sender: System.Object; e: AxEXSHELLVIEWLib._IExShellViewEvents_KeyDownEvent);
begin
	with AxExShellView1 do
	begin
		OutputDebugString( 'Set the KeyCode = 0, if the KeyCode is 8 ' );
		e.keyCode := 0;
	end
end;

with AxExShellView1 do
begin
	ViewMode := EXSHELLVIEWLib.ViewModeType.Details;
	BrowseFolder := 'c:\Temp';
	Refresh();
end
38
How can I show grid lines around items

with AxExShellView1 do
begin
	ViewMode := EXSHELLVIEWLib.ViewModeType.Details;
	DrawGridLines := True;
	Refresh();
end
37
How can I prevent shwoing the overlay icons (shortcut icons have a small arrow in lower-left corner, shared folders have a hand that shows that folder is shared, etc. )

with AxExShellView1 do
begin
	ViewMode := EXSHELLVIEWLib.ViewModeType.LargeIcons;
	OverlayIcons := False;
	Refresh();
end
36
I need to provide my own context menu but I am not able to find RClick event. What can be done

// QueryContextMenu event - Fired when the context menu is about to be active. You can supply new items to the context menu.
procedure TWinForm1.AxExShellView1_QueryContextMenu(sender: System.Object; e: AxEXSHELLVIEWLib._IExShellViewEvents_QueryContextMenuEvent);
begin
	with AxExShellView1 do
	begin
		OutputDebugString( 'Show here your popup/context menu' );
	end
end;

with AxExShellView1 do
begin
	DefaultMenuItems := False;
end
35
How can I provide my own context menu (RClick event is missing)

// InvokeMenuCommand event - Fired when the user selects an item context menu that has been added during QueryContextMenu event.
procedure TWinForm1.AxExShellView1_InvokeMenuCommand(sender: System.Object; e: AxEXSHELLVIEWLib._IExShellViewEvents_InvokeMenuCommandEvent);
begin
	with AxExShellView1 do
	begin
		OutputDebugString( e.command );
	end
end;

// QueryContextMenu event - Fired when the context menu is about to be active. You can supply new items to the context menu.
procedure TWinForm1.AxExShellView1_QueryContextMenu(sender: System.Object; e: AxEXSHELLVIEWLib._IExShellViewEvents_QueryContextMenuEvent);
begin
	with AxExShellView1 do
	begin
		e.separator := ',';
		e.items := 'First,Second,Third';
	end
end;

with AxExShellView1 do
begin
	DefaultMenuItems := False;
end
34
Is it possible to specify the "Extra Large Icons" view

with AxExShellView1 do
begin
	ViewMode := EXSHELLVIEWLib.ViewModeType.Extra_Large_Icons;
end
33
Is it possible to specify the "Large Icons" view

with AxExShellView1 do
begin
	ViewMode := EXSHELLVIEWLib.ViewModeType.Large_Icons;
end
32
Is it possible to specify the "Medium Icons" view

with AxExShellView1 do
begin
	ViewMode := EXSHELLVIEWLib.ViewModeType.Medium_Icons;
end
31
How can I hide the file names

with AxExShellView1 do
begin
	HideFileNames := True;
	ViewMode := EXSHELLVIEWLib.ViewModeType.Thumbnail;
end
30
Is it possible to set the Auto Arrange and Align To Grid flags by code

with AxExShellView1 do
begin
	AutoArrange := True;
	AlignToGrid := True;
	ViewMode := EXSHELLVIEWLib.ViewModeType.Thumbnail;
end
29
Is it possible to set the Auto Arrange flag by code

with AxExShellView1 do
begin
	AutoArrange := True;
	ViewMode := EXSHELLVIEWLib.ViewModeType.Thumbnail;
end
28
How do I specify the current folder

with AxExShellView1 do
begin
	CurrentFolder := 'c:\windows';
end
27
Is it possible to disable showing tooltips for files and folders

with AxExShellView1 do
begin
	HideToolTips := True;
end
26
Is it possible to hide the control's header

with AxExShellView1 do
begin
	HeaderVisible := False;
end
25
How can I get the name of file being double clicked

// ObjectSelect event - Fired when the user selects a new object for browsing.
procedure TWinForm1.AxExShellView1_ObjectSelect(sender: System.Object; e: AxEXSHELLVIEWLib._IExShellViewEvents_ObjectSelectEvent);
begin
	with AxExShellView1 do
	begin
		CancelObjectSelect();
		OutputDebugString( e.object );
	end
end;
24
How can I prevent opening or selecting a folder or zip files when user double click it
// ObjectSelect event - Fired when the user selects a new object for browsing.
procedure TWinForm1.AxExShellView1_ObjectSelect(sender: System.Object; e: AxEXSHELLVIEWLib._IExShellViewEvents_ObjectSelectEvent);
begin
	with AxExShellView1 do
	begin
		CancelObjectSelect();
	end
end;
23
Is it possible to list only files, no folders

with AxExShellView1 do
begin
	ModifyFolderFlags(EXSHELLVIEWLib.FolderFlagsEnum.NoSubFolders,EXSHELLVIEWLib.FolderFlagsEnum.NoFlag);
end
22
How can I enable multiple selection

with AxExShellView1 do
begin
	ModifyFolderFlags(EXSHELLVIEWLib.FolderFlagsEnum.NoFlag,EXSHELLVIEWLib.FolderFlagsEnum.SingleSel);
	Refresh();
end
21
How can I select a file or a folder

with AxExShellView1 do
begin
	Objects.Get(EXSHELLVIEWLib.ObjectTypeEnum.AllItems);
	Objects.Item[TObject(0)].SelectItem(EXSHELLVIEWLib.SelectItemFlagsEnum.Select);
end
20
How can I get all files and folders as they are listed
with AxExShellView1 do
begin
	Objects.Get(Integer(EXSHELLVIEWLib.ObjectTypeEnum.AsDisplayed) Or Integer(EXSHELLVIEWLib.ObjectTypeEnum.AllItems));
	OutputDebugString( Objects.Count );
end
19
How can I get all files and folders being displayed
with AxExShellView1 do
begin
	Objects.Get(EXSHELLVIEWLib.ObjectTypeEnum.AllItems);
	OutputDebugString( Objects.Count );
end
18
How do I get the selected files or folders as they are displayed
with AxExShellView1 do
begin
	Objects.Get(Integer(EXSHELLVIEWLib.ObjectTypeEnum.AsDisplayed) Or Integer(EXSHELLVIEWLib.ObjectTypeEnum.SelectedItems));
	OutputDebugString( Objects.Count );
end
17
How do I get the selected files or folders
with AxExShellView1 do
begin
	Objects.Get(EXSHELLVIEWLib.ObjectTypeEnum.SelectedItems);
	OutputDebugString( Objects.Count );
end
16
How can I disable or enable the control's context menu

with AxExShellView1 do
begin
	DefaultMenuItems := False;
end
15
How can I include only files that match a pattern

with AxExShellView1 do
begin
	IncludeObjectType := EXSHELLVIEWLib.IncludeObjectEnum.PatternObjects;
	FilePattern := '*.exe *.lnk';
end
14
How can I include only files that match a pattern

with AxExShellView1 do
begin
	IncludeObjectType := EXSHELLVIEWLib.IncludeObjectEnum.PatternObjects;
	FilePattern := '*.bmp';
end
13
How can I list only folders in the view

with AxExShellView1 do
begin
	IncludeObjectType := EXSHELLVIEWLib.IncludeObjectEnum.FoldersOnly;
end
12
How do I specify what objects files or folders should be included in the list

with AxExShellView1 do
begin
	IncludeObjectType := EXSHELLVIEWLib.IncludeObjectEnum.FoldersOnly;
end
11
How do I browse a special folder

with AxExShellView1 do
begin
	BrowseFolder := (get_ShellFolder(get_SpecialFolder(EXSHELLVIEWLib.SpecialFolderPathConstants.Programs)) as EXSHELLVIEWLib.ExShellFolder);
end
10
How can I go up to one level, so I can browse the parent folder

with AxExShellView1 do
begin
	BrowseFolder := (get_ShellFolder('C:\') as EXSHELLVIEWLib.ExShellFolder);
	UpOneLevel();
end
9
How do I browse a specified folder

with AxExShellView1 do
begin
	BrowseFolder := (get_ShellFolder('C:\') as EXSHELLVIEWLib.ExShellFolder);
end
8
How can I disable or enable the entire control

with AxExShellView1 do
begin
	Enabled := False;
end
7
How do I refresh the control
with AxExShellView1 do
begin
	Refresh();
end
6
How can I change the control's font

with AxExShellView1 do
begin
	f := (ComObj.CreateComObject(ComObj.ProgIDToClassID('StdFont')) as stdole.StdFont);
	with f do
	begin
		Name := 'Verdana';
		Size := 12;
	end;
	Font := (f as stdole.StdFont);
end
5
How can I change the view, so it displays as THUMBNAIL

with AxExShellView1 do
begin
	ViewMode := EXSHELLVIEWLib.ViewModeType.Thumbnail;
end
4
How can I change the view, so it displays as a a grid with details

with AxExShellView1 do
begin
	ViewMode := EXSHELLVIEWLib.ViewModeType.Details;
end
3
How can I change the view, so it displays as a list

with AxExShellView1 do
begin
	ViewMode := EXSHELLVIEWLib.ViewModeType.List;
end
2
How can I change the view, so it displays small icons

with AxExShellView1 do
begin
	ViewMode := EXSHELLVIEWLib.ViewModeType.SmallIcon;
end
1
How can I change the view, so it displays large icons

with AxExShellView1 do
begin
	ViewMode := EXSHELLVIEWLib.ViewModeType.LargeIcons;
end