Ver Mensaje Individual
  #2  
Antiguo 01-09-2008
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Reputación: 22
Caro Va por buen camino
Hola krlox31416, según a lo que te entiendo, tu quieres obtener el path que se selecciona en el ShellTreeView, lo puedes hacer de esta forma.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
 showmessage(ShellTreeView1.SelectedFolder.PathName);
end;

sobre el path que tienes, despues sería aumentar el slash, con la función TrailingBackslash o una cadena '\' y concatenar el nombre de tu archivo que ya lo tienes.

Otra forma de seleccionar una carpeta es usando SelectDirectory.

Código Delphi [-]
var
  Carpeta : String;
begin
  if SelectDirectory('Seleccione la ruta de la carpeta', 'c:\', Carpeta) then
  begin
   showmessage(Carpeta+'\Tabla.DB');
  end;

para este ultimo añades en el uses la unidad FileCtrl.

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita