Scalabium Software
Knowledge for your independence'.
Home Delphi and C++Builder tips

#166: How can I change the view style in OpenDialog/SaveDialog?

Friends,
we all uses the TOpenDialog/TSaveDialog to open the directory with files. By default, the file list there displayed in LIST mode.

If you need change this style (for example, for picture tool you may use the thumbnail mode), execute the next code in OnFolderChange event for dialog instance:

procedure TForm1.OpenDialog1FolderChange(Sender: TObject);
const
  FCIDM_SHVIEW_LARGEICON = $7029;
  FCIDM_SHVIEW_SMALLICON = $702A;
  FCIDM_SHVIEW_LIST = $702B;
  FCIDM_SHVIEW_REPORT = $702C;
  FCIDM_SHVIEW_THUMBNAIL = $702D;
  FCIDM_SHVIEW_TILE = $702E;
var
  newStyle: dWord;
begin
  newStyle := FCIDM_SHVIEW_THUMBNAIL;
  SendMessage(FindWindowEx(GetParent(OpenDialog1.Handle), 0, 'SHELLDLL_DefView', nil), WM_COMMAND, newStyle, 0);
end;

As you see from sample, the thumbnail mode will be used always in TOpenDialog. The const values for all available styles declared in function above too.

Published: August 23, 2005

See also

	Mail parser (ActiveX)
	Clarion to Text converter
	SMMsg suite
	Paradox ActiveX
	ExcelFile Viewer
	Fast Document Viewer
	SMDBGrid
	Clarion Viewer
	Metafile Convert
	DBExport tools

Contact to webmaster