Ordenar OpenDialog

[xio]

Ummmm! Necesito abrir un cuadro de dialogo y que me lo muestre con la vista de windows en miniaturas, pero no tengo forma de hacerlo. He estado viendo este post y he visto que hay forma de hacerlo pero no lo consigo.

Podriais echarme una mano??

Código Delphi [-]
  if OpenDialog.Execute then begin
    OpenDialog.InitialDir := ExtractFilePath(OpenDialog.FileName);
  end;

Asi es como abro yo el dialogo, podria adaptar esa forma que exponeis??