Discussion :

[Cazaux-Moutou-Philippe]

Bonjour

comment en D7, connaitre le nom repertoire du rep utilisateur windows

pour XP et Vista

merci

[Pascal Jankowski]

Tu trouveras ton bonheur dans la FAQ comment retrouver les répertoires spéciaux. Description de l'utilisation de l'API Windows HGetSpecialFolderLocation

[Cazaux-Moutou-Philippe]

Merci

j ai fais ca dans mon unité ou j ai toutes mes fonctions

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
function SpecialFolder(Folder: Integer): string;
var
  SFolder: pItemIDList;
  SpecialPath: array[0..MAX_PATH] of Char;
begin
 
  SHGetSpecialFolderLocation(FMain.Handle, Folder, SFolder);
  SHGetPathFromIDList(SFolder, SpecialPath);
  Result := StrPas(SpecialPath);
end;

et d une fenetre je fais ca pour faire afficher le chemin

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

showmessage(SpecialFolder(CSIDL_PERSONAL));

mais cette ligne provoque un runtime error à l execution

comment faire ?

merci

[Cl@udius]

Salut

Je viens de faire un test et cela fonctionne parfaitement.
Cela dit j'ai mis le hwndOwner à 0 sur l'appel de SHGetSpecialFolderLocation.

@+ Claudius