Ordnung muss sein (LaunchBar)

[EWeiss]

Zitat:

Man erstellt im "\AppData\Roaming\BrewIdeas\OTTB\" eine OTTB.ini Datei.
Das gleiche auch im \bin\ ordner.

Du solltest gar nichts addieren das macht die Anwendung.

Zitat:

schwupps ist die .ini ausm \Roaming\ gelöscht.

Richtig weil die Portable Anwendung über die INI Datei geschaltet wird

Siehe!

Delphi-Quellcode:

procedure InitPath(const ACheckPortable: Boolean);
var
   sIniFile: string;
   ExeName: String;
   FilePath: String;
begin

   ExeName := ExtractFileName(ChangeFileExt(ParamStr(0), ''));
   FilePath := ExtractFilePath(ParamStr(0));
   sIniFile := FilePath + ExeName + '.ini';
   UserAppDataDir := GetSpecialFolder(CSIDL_APPDATA);

   if ACheckPortable then
     gP.Portable := FileExists(sIniFile);
   if gP.Portable then
   begin
     OTTBIni := TIniFile.Create(sIniFile);
     // falls wenn auf portable geschaltet wurde
     DeleteFile(UserAppDataDir + '\BrewIdeas\OTTB' + '\OTTB.ini');
   end
   else
   begin
     DeleteFile(sIniFile); // falls auf nicht portable geschaltet wurde

     // Direktory erstellen wenn nicht vorhanden
     if not ForceDirectories(UserAppDataDir + '\BrewIdeas\OTTB') then
       raise Exception.Create('Cannot create' + UserAppDataDir + '\BrewIdeas\OTTB');

     if not FileExists(UserAppDataDir + '\BrewIdeas\OTTB' + '\OTTB.config') then
       MainApp.CreateDefaultConfigFile;

     OTTBIni := TIniFile.Create(UserAppDataDir + '\BrewIdeas\OTTB' + '\OTTB.ini')
   end;
end;

gruss