sm
Просветленный
(32514)
12 лет назад
uses
ShlObj;
function GetSpecialPath(CSIDL: Word): AnsiString;
var
s: AnsiString;
begin
SetLength(s, MAX_PATH);
if not SHGetSpecialFolderPath(0, PAnsiChar(s), CSIDL, True) then
Result := ''
else
Result := StrPas(PAnsiChar(s));
end;
..
ShowMessage(GetSpecialPath(CSIDL_APPDATA))
Требуется чтоб программа изменила несколько параметров
например этого файла %appdata%\config.ini
Подскажите куда копать