GetPrivateProfileString(PChar('文件操作'),PChar('String'),nil,nil,0,PChar(sFileName));显示EAccessViolation异常
什么原因

解决方案 »

  1.   

    从.INI文件中获取字符串
      var
      strResult:array[0..30] of Char;
      begin
      GetPrivateProfileString(' desktop ', 'wallpaper', 
      'c:\windows\newwall.bmp' , strResult, 100, 
      'c:\windows\win.ini' );
      edit1.text:=strResult; //显示取得字符串
      end;
      

  2.   

    var
      KeyString : String;
      HexString : array[0..255] of Char;
    begin
    KeyString :='hild';
    GetPrivateProfileString(PChar(KeyString),PChar('kill'),PChar(''),
              HexString,255,PChar(configFile));
    //执行成功后,HexString=ocls
    end;
    {
    ini文件内容:
    [hild]
    kill=ocls}