Einzelnen Beitrag anzeigen

Darlo

Registriert seit: 28. Jul 2008
Ort: München
1.196 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#13

AW: Demoversion Programm beenden

  Alt 31. Jan 2012, 11:39
Ich nehme für sowas folgendes Verzeichnis:
C:\Users\[user]\AppData\Roaming
Eine schlechte Wahl ... besser
Code:
%APPDATA%
bzw.
Code:
CSIDL_APPDATA
, dann ist Windows dafür zuständig, das richtige Verzeichnis zu liefern
Das war nur der Pfad.
Code:
    SHGetSpecialFolderLocation(Einstellungen.Handle, CSIDL_APPDATA, SpecialDir);
    SHGetPathFromIDList(SpecialDir, @FBuf[0]);
    Allocator.Free(SpecialDir);
    pfad := FBuf+'\[Firma]\[Programmname]\';
Gruß
Philip
  Mit Zitat antworten Zitat