Einzelnen Beitrag anzeigen

Benutzerbild von blawen
blawen

Registriert seit: 1. Dez 2003
Ort: Luterbach (CH)
677 Beiträge
 
Delphi 12 Athens
 
#2

AW: Lokalisierte Benutzerverzeichniss

  Alt 24. Sep 2024, 23:22
Dein genaues Problem mit diesem Umstand/Verhalten habe ich zwar nicht ganz begriffen...

Kann es sein, dass Du so etwas in dieser Art suchst?
Delphi-Quellcode:
uses
  Windows, ShlObj, ShellAPI, SysUtils;

function GetLocalizedFolderPath(const NonLocalizedPath: string): string;
var
  SHFileInfo: TSHFileInfo;
begin
  Result := NonLocalizedPath;
  if SHGetFileInfo(PChar(NonLocalizedPath), 0, SHFileInfo, SizeOf(SHFileInfo), SHGFI_DISPLAYNAME) <> 0 then
    Result := SHFileInfo.szDisplayName;
end;
Roland

Geändert von blawen (24. Sep 2024 um 23:25 Uhr)
  Mit Zitat antworten Zitat