¿ Conocías ésta función ?
Pues si no la conocías te comento que permite mostrar el diálogo Open (OpenDialog) ó Save (SaveDialog) sin necesidad de utilizar ninguno de los dos componentes.
Esta función regresa true si se ha seleccionado un archivo o false si se presiona el botón cancel.
Aquí podemos ver su uso.
delphi
if PromptForFileName(selectedFile, // Nombre del archivo 'Archivos de Texto (*.txt)|*.txt', // Filtro '', // Extensión por omisión 'Selecciona archivo de Texto', // Título de la ventana de Diálogo 'C:\', // Ruta de búsqueda inicial False) // False = OpenDialog, True = SaveDialog begin end else begin end;
Espero les sea de utilidad.
Salud OS