Ordenar OpenDialog

[Neftali [Germán.Estévez]]

Yo lo más que he conseguido es abrirlo cambiando el sestilo a modi report, para luego sólo tener que pulsar sobre la columna (tenía el mismo problema que tú). Lo conseguí con este procedimiento, pero sigue faltándome lo de ordenar.

Código Delphi [-]
{: Modificar el sistema de apertura de los diálogos.}
procedure OpenDialogStyle(ASender:TCommonDialog; AStyle:TViewStyle=vsReport);
var
  Dlg: HWND;
begin
  // Ventana
  Dlg := GetParent((ASender as TCommonDialog).Handle);
  // Enviar un mensaje a la ventana principal
  PostMessage(Application.MainForm.Handle, WM_DIALOG_STYLE, Dlg, Ord(AStyle));
end;

Utilizando los eventos del diálogo, al abrirlo lo llamo así:

Código Delphi [-]
procedure TFormBrBase.SaveDialogShow(Sender: TObject);
begin
  // Abrir la vista de detalles.
  OpenDialogStyle(Sender as TCommonDialog);
end;