Estoy trabajando con Delphi 7 y quiero averiguar la ruta de mi directorio ../All Users/Documents.
me encontré con el siguiente códigocarpeta delphi get ruta
uses shlobj, ...
function GetMyDocuments: string;
var
r: Bool;
path: array[0..Max_Path] of Char;
begin
r := ShGetSpecialFolderPath(0, path, CSIDL_Personal, False) ;
if not r then
raise Exception.Create('Could not find MyDocuments folder location.') ;
Result := Path;
end;
Funciona bien, pero no es compatible con CSIDL_COMMON_DOCUMENTS
que devuelve la ruta deseada.
Además, según MS CSIDL ya no se debe utilizar en su lugar use KNOWNFOLDERID.
Y necesito trabajar esta aplicación en varios sistemas operativos (solo ventanas).
¿Cómo puedo hacer esto?
Se agradece la ayuda :)
No puedo encontrar 'CSIDL_COMMON_DOCUMENTS' dece Lección en mi archivo 'Shlobj.pas'. – Shirish11
Tiene un valor de $ 002E, tendrá que declarar la constante en su código –