用Writebool,writeInteger,WriteString函数

解决方案 »

  1.   

    if inifile.SectionExists('yoursection') then
      inifile.WriteString(yoursection,....)
      

  2.   

    用api GetPrivateProfileString 和WritePrivateProfileString吧,极简单好用的.
      

  3.   

    用api GetPrivateProfileString 和WritePrivateProfileString吧,极简单好用的.
    var 
    strResult:pchar; 
    begin 
    GetPrivateProfileString( 
    'windows', // []中标题的名字 
    'NullPort', // =号前的名字 
    'NIL', // 如果没有找到字符串时,返回的默认值 
    strResult, //存放取得字符 
    100, //取得字符的允许最大长度 
    'c:\forwin95\win.ini' // 调用的文件名 
    ); 
    edit1.text:=strResult; //显示取得字符串 
    向.INI文件写入字符串 
    WritePrivateProfileString( 
    'windows', // []中标题的名字 
    'load', // 要写入“=”号前的字符串 
    'accca', //要写入的数据 
    'c:\forwin95\win.ini' // 调用的文件名 
    );