Dialogo para seleccionar archivo o carpeta...

[Greco]

Hola,
Me gustaría saber como puedo incluir o crear un cuadro de dialogo para seleccionar una carpeta o un archivo especifico?? algo asi como se muestra en la siguiente imagen:

http://images.hack.free.fr/images/n19anwoc.jpg

Es para poner un dialogo en donde se deba escoger la ruta en donde se encuentra la base de datos (carpeta donde se creará) o bien la ruta incluyendo el archivo (en caso de que ya exista).

Mi duda es (por lo poco que se) existe algun componente para esto o se hace de manera simple??

Alguien podría ayudarme o mejor dicho indicarme como poder realizarlo??

Estare atento.

Saludos

[[enecumene]]

Hola Greco, Para seleccionar un archivo especifico, puedes usar el componente OpenDialog en la solapa Dialogs, ahora para que sea como la imagen debes descargarte los componente JVCL y buscas el componente JvSelectDirectory en la solapa JvDialogs, espero que esto te ayude. cualquier duda nos comentas.

Saludos.

[[xEsk]]

Una versión sencilla sin instalar componentes adicionales es usando: la función SelectDirectory que se encuentra en la unit FileCtrl del Delphi.

Aqui un ejemplo de uso:

Código Delphi [-]
var
  sDirectory : String;

begin
  if SelectDirectory('Selecciona directorio:', '', sDirectory) then
    ShowMessage(sDirectory);

Saludos.

[Greco]

Muchas gracias a enecumene y xEsk por su ayuda, en este momento no estoy en el pc donde tengo instalado delphi asi que mañana por la mañana voy a realizar las pruebas con resecto a la ayuda que me han dado.

Gracias por todo, cualquier uda o problema seguiré con el hilo.

Saludos.

[Greco]

Hola, aquí estoy otra vez para consultar algunas dudas respecto a lo mismo.

Ya probe el código que me facilitó xEsk y me funcionó, tambien me baje los componentes JVCL y proble lo que me dijo enecumene y tambien funcionó, ahora, cambié el JvSelectDirectory por el JvBrowseForFolderDialog que encontre que trae mas opciones, ahora mi duda es... que diferencia tienen estos dos componentes??? y la otra duda que tengo, como recupero la ruta que seleccioné en dicho dialogo?? por ejemplo para mostrarla en un edit.

Saludos.


--------------------------------------------------------------------
PD. hace tiempo que habia oido hablar de los componentes JVCL pero nunca habia tenido la oportunidad de instalarlo y ahora he visto la gran cantidad de cosas que trae

[[enecumene]]

Hola Intenta esto:

Código Delphi [-]
procedure TForm1.Button4Click(Sender: TObject);
begin
OpenDialog1.Execute;
Edit1.Text:=OpenDialog1.FileName;
end;

Saludos.

[Greco]

Empezado por enecumene

Hola Intenta esto:

Código Delphi [-]procedure TForm1.Button4Click(Sender: TObject);
begin OpenDialog1.Execute; Edit1.Text:=OpenDialog1.FileName; end;


Saludos.

En base a tu código probé lo siguiente:

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
begin
  if JvBrowseForFolderDialog2.Execute then
  begin
    Edit1.Text:=JvBrowseForFolderDialog2.Directory;
  end;
end;

y me funcionó a la perfección.

Gracias por al ayuda.

Saludos