function WriteIniValueW(const FileName, Section, Ident, Value: WideString): Boolean;
begin
Result := WritePrivateProfileStringW(
PWideChar(Section), PWideChar(Ident),
PWideChar(Value),
PWideChar(FileName));
end;
function DeleteIniValueW(const FileName, Section, Ident: WideString): Boolean;
begin
Result := WritePrivateProfileStringW(
PWideChar(Section), PWideChar(Ident),
nil,
PWideChar(FileName));
end;
function DeleteIniSectionW(const FileName, Section: WideString): Boolean;
begin
Result := WritePrivateProfileStringW(
PWideChar(Section), nil,
nil,
PWideChar(FileName));
end;
|
