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

	Viewer for TNEF-files (winmail.dat)
	Mail parser (ActiveX)
	Word Web-stream
	DBISAM Viewer
	DBISAM Password Recovery
	ExcelFile Viewer
	SMReport
	Paradox Password Recovery
	Excel Reader (dll)
	Viewer for MS Outlook Messages

Contact to webmaster