update cache, userdata and log folders RunTime

[kayaliabd]

I am working on multi user application and I need to change cache, userdata and log folders in run time but that is not allowed after in run time

[kayaliabd]

`procedure TCEFConfig.SetPathCache(const Value: String); begin

     if AnsiLowerCase(FPathCache) = AnsiLowerCase(Value) Then
       Exit;

     ForceDirectories(PWideChar(ExtractFilePath(Value)));
     if not TestaOk(FPathCache, Value) Then     Exit;
           FPathCache            := Value;

end;`

TestaOK return = False

[marcelo386]

PNewValue must be equal to POldValue in this case it returns false

function TCEFConfig.TestaOk(POldValue, PNewValue: String):Boolean; var LDir : String; begin if AnsiLowerCase(POldValue) = AnsiLowerCase(PNewValue) Then Begin Result := False; Exit; End;

LDir := ExtractFilePath(PNewValue); if Self.status = asInitialized then raise Exception.Create(MSG_ConfigCEF_ExceptNotFoundPATH); if not DirectoryExists(LDir) then //raise Exception.Create(Format(MSG_ExceptPath, [LDir])); //Aurino 11/07/2022 deletefile(pwidechar(ExtractFilePath(Application.ExeName) + NomeArquivoIni)) ; Result := true; end;

[kayaliabd]

yea, I try to disable this line but that did not work, I could not update cash folder path!!!