在文本文件中保存设置

[delphi]代码库

在文本文件中保存设置
    /// <summary>在本机保存一个设置值到一个文本文件里，成功返回true</summary>
    /// <param name="Aname">名称</param>
    /// <param name="Avalue">内容</param>
    /// <param name="mima">如果不为空，则为加密密码，如果为空，则不加密</param>
    function SheZhiSetToTxt(Aname, AValue: string; mima: string = ''): boolean;
    /// <summary>从一个文本文件里返回一个设置值</summary>
    /// <param name="Aname">名称</param>
    /// <param name="Adefaultvalue">出错或者没有值时的默认值</param>
    /// <param name="mima">如果不为空，则为解密密码，如果为空，表示没有加密无需解密</param>
    function SheZhiGetFromTxt(Aname: string; Adefaultvalue: string = '';
      mima: string = ''): string;
    /// <summary>删除一个文本文件里的设置，成功返回true</summary>
    /// <param name="Aname">名称</param>
    /// <param name="mima">如果不为空，则为解密密码，如果为空，表示没有加密无需解密</param>
    function SheZhiDeleteFromTxt(Aname: string; mima: string = ''): boolean;