Ver Mensaje Individual
  #4  
Antiguo 13-11-2009
Avatar de movorack
[movorack] movorack is offline
Miguel A. Valero
 
Registrado: feb 2007
Ubicación: Bogotá - Colombia
Posts: 1.346
Reputación: 20
movorack Va camino a la famamovorack Va camino a la fama
La vista de reporte no me srive de mucho pq en algunos casos se toman varias fotos, en este caso me ha servido mucho la vista de miniaturas... aqui mismo en el club encontré un codigo que me ayudo a desplegar la vista de miniaturas :

Código Delphi [-]
procedure TFrmPhotoCapture.OpenDialogFolderChange(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(OpenDialog.Handle), 0, 'SHELLDLL_DefView', nil), WM_COMMAND, newStyle, 0);
end;

Pero me aparecen en orden de creación ASC y yo lo quiero al contrario...
__________________
Buena caza y buen remar... http://mivaler.blogspot.com
Responder Con Cita