C:\Doku. u. Einstellungen\<Benutzername>\Anwendungsdaten

[xZise]

Wie erreiche ich den Ordner
"C:\Dokumente und Einstellungen\<Benutzername>\Anwendungsdaten"?

[Daniel G]

Indem du dir diesen Code anguckst.

[xZise]

Und woher bekomme ich nun Max_Path?

Delphi-Quellcode:

function GetShellFolder(CSIDL: integer): string;
var
  pidl                   : PItemIdList;
  FolderPath             : string;
  SystemFolder           : Integer;
  Malloc                 : IMalloc;
begin
  Malloc := nil;
  FolderPath := '';
  SHGetMalloc(Malloc);
  if Malloc = nil then
  begin
    Result := FolderPath;
    Exit;
  end;
  try
    SystemFolder := CSIDL;
    if SUCCEEDED(SHGetSpecialFolderLocation(0, SystemFolder, pidl)) then
    begin


      SetLength(FolderPath, max_path); // <:=------------- hier


      if SHGetPathFromIDList(pidl, PChar(FolderPath)) then
      begin
        SetLength(FolderPath, length(PChar(FolderPath)));
      end;
    end;
    Result := FolderPath;
  finally
    Malloc.Free(pidl);
  end;
end;

[Daniel G]

MAX_PATH ist eine Konstante. Ich glaube, der Wert ist 256 oder 512...

[xZise]

Wo ist diese Konstate deklariert?

[kabuco]

Hallo,

du könntest auch die Umgebungsvariablen mit GetEnvironmentVarable auslesen.. Hierzu diser Link: Link

Gruß kabuco

[Bernhard Geyer]

Zitat von xZise:

Wo ist diese Konstate deklariert?

Solche Konstanten bekommt man - wenn sie in den Delphi-Sourcen definiert sind:

Einfach im Explorer den Delphi-Sourcepfad öffnen und mit Explorer in Pas-Dateien suchen ...
Oder GExpert installieren und mit Grep suchen.

[freak4fun]

Zitat von xZise:

Wo ist diese Konstate deklariert?

Windows

[xZise]

Und wie lautet der Übergabeparameter?
Showmessage(GetEnvironmentVariable(Parameter)); Das habe ich mit Parameter getestet:

• appath
  apppath
  appdir
  appdate

Und zwar mit und ohne die % vor und dahinter

[CalganX]

Hi,
ich würde es mit den Konstanten, die im Code auf Luckies Seite (Link oben), versuchen.

Ansonsten, reicht es auch innerhalb der DP ein wenig zu suchen (z.B. der Code-Library): http://www.delphipraxis.net/internal_redirect.php?t=502

Chris

Edit: Achso. Bei den Umgebungsvariablen würde ich es mit APPDATA versuchen. Allerdings würde dein Programm sofort Probleme bekommen, wenn ich aus Jux und Dollerei "set appdata bla" eingebe. Imho also nicht unbedingt empfehlenswert.