Ver Mensaje Individual
  #3  
Antiguo 14-04-2015
Avatar de duilioisola
[duilioisola] duilioisola is offline
Miembro Premium
 
Registrado: ago 2007
Ubicación: Barcelona, España
Posts: 1.735
Reputación: 20
duilioisola Es un diamante en brutoduilioisola Es un diamante en brutoduilioisola Es un diamante en bruto
Aquí puedes ver los diferentes valoes para el parámetro Folder.

http://www.installmate.com/support/i...ons/csidls.htm

En principio deberás concatenar con CSIDL_PROFILE

Código Delphi [-]
var
  ruta : string;

[...]

// Obtengo ruta a carpeta de usuario
ruta := (GetSpecialFolderPath(40 {CSIDL_PROFILE}, 0);

// Me aseguro de que termine con separador de path
ruta := IncludeTrailingPathDelimiter(ruta);

// Concateno ruta Dropbox
ruta := ruta +  + 'Dropbox\FotoVehiculos';

// Si la ruta existe
if DirectoryExists(ruta) then
begin 
   FileListBox1.Directory := ruta;
   [...]
end
else
begin
   ShowMessage('No encuentro la ruta ' + ruta);
end;
Responder Con Cita