请问,delphi可执行程序读取ini文件信息时,执行程序发送快捷方式后就不能读写ini文件的数据。
本来开始是正常的,是运行一段时间后突然出现这种情况,实在没有明白是什么原因

解决方案 »

  1.   

    不应该吧,在读ini前有没有逻辑判断?
      

  2.   

    //读取INI配置文件
    FUNCTION TDataModuleForm.ReadInifile(orwPath:String;FilePathname:String;Ywtype:String):String;
    var
      myinifile:Tinifile;
      pathname:String;
    begin
      myinifile:=Tinifile.create(orwPath);
      pathname := myinifile.ReadString(FilePathname,Ywtype,'');
      myinifile.Free;
      Result:=pathname;
    end;
    调用 DataModuleForm.ReadInifile('..\config\SYSINIT.ini','LOGININIT','JGBH');
      

  3.   

    两个问题
    1.最好只一次创建ini文件,你现在会多次创建而不释放
    2.改成绝对路径试试
      

  4.   

    权限不够?ini被设为只读了?
      

  5.   

    你用的是系统默认路径,改绝对路径问题肯定解决。ExtractFilePath(ParamStr(0)) + 'config\SYSINIT.ini' ;
      

  6.   

    你可以看一下你的快捷方式,,和正常程序的快捷方式 有一个起始位置 你的肯定为空用 innosetup打包的时候需要设置。
      

  7.   

    相对路径,用下面表述就可以。我觉得挺好
    resourcestring
      DefaultIniFilePath = '.\Default.ini';
      UserDefineIniPath = '.\UserDefine.ini';