Вопрос Подмена Back Slash в ini-файле на Forward Slash и Double Back Slash

[Infest]

Доброго времени суток, камрады и гуру IS. Столкнулся с такой задачей. Необходимо при использовании константы {app} обратный слеш "\" заменять на обычный слэш "/" в одних случаях и на двойной обратный слэш "\\" в других случаях при изменении некоторых параметров пути в .ini-файле программы. Перекопал кучу инфы в инете, но информации под мою задачу так и не нашёл. Кто нибудь сталкивался с подобным? Как можно решить подобную задачу?

Заранее спасибо и с уважением.

 

[Хамик]

Функция StringChange поможет, поищите примеры её использования, компа под рукой нет.

 

[tihiy_don]

Материал можете почитать тут: https://jrsoftware.org/ishelp/index.php?topic=isxfunc_stringchangeex
Example:
var
S: String;
begin
S := ExpandConstant('{commonappdata}');
// S = 'C:\Documents and Settings\All Users\Application Data'

StringChangeEx(S, '\', '/', True);
// S = 'C:/Documents and Settings/All Users/Application Data'
end;

 

[HandyMan]

procedure CurStepChanged(CurStep: TSetupStep);
var
    strValue, fileName: String;
    sectionINI, keyINI: String;
begin
    if CurStep = ssPostInstall then
    begin
        sectionINI:='Settings';
        keyINI:='Path';
        fileName:=ExpandConstant('{app}\data.ini');
        strValue:=GetIniString(sectionINI, keyINI, '', fileName);
        StringChangeEx(strValue, '\', '\\', True);
        SetIniString(sectionINI, keyINI, strValue, fileName); 
    end;
end;