Foros Club Delphi - Seleccionar una carpeta

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - Seleccionar una carpeta (https://www.clubdelphi.com/foros/showthread.php?t=3751)

miguelb

18-09-2003 19:57:36

Seleccionar una carpeta

Hola a todos:
Necesito seleccionar una carpeta desde delphi 5,
probe a utilizar un TOpenDialog, pero solo puedo seleccionar archivos y no carpetas.
No encontre otro componente que me sirva, bueno estan los de win 3.1 pero tienen el estilo de windows viejo, y ademas no reconoce por ejemplo Escritorio, Mis Documentos, etc,

Existe algun otro componente que me solucione este problema? o se puede configurar el TOpenDialog?
Gracias
Miguel

roman

18-09-2003 20:57:12

No recuerdo si ya viene en Delphi 5 pero intenta incluir la unidad FileCtrl en tu proyecto. En dicha unidad viene una función que se llama SelectDirectory que te abre la ventana de selección de carpetas usual desde Windows95. Sería algo asi como:

Código:

var

  Carpeta: String;



begin

  if SelectDirectory(

    'Seleccione una carpeta', // Texto de la ventana

    'c:\documentos',  // Carpeta inicial

    Carpeta  // Carpeta seleccionada

  )

  then

    Application.MessageBox(PChar(Carpeta), 'Carpeta' , 0);

// Saludos

miguelb

19-09-2003 15:00:21

Roman: gracias por tu ayuda.
Funciono exactamente como yo necesitaba.
Muchas gracias
Miguel

La franja horaria es GMT +2. Ahora son las 13:59:00.