Q&A

  • ini화일 값 불러오기
ini화일을 읽어 값을 비교 자동 copy되는 프로그램을 하는데 ini화일 자체를 인식을

못하는 건지 찾지를 못하는 것인지 원인을 모르겠읍니다. 고수님들 도와 주세요



****** 제가 작성한 프로시져 ******

procedure TForm1.inifilechk;

var syscomm: TiniFile;

pgnm: string;

vList: TStringList;

begin

pgnm := Exe_Path + 'vchk.ini';

// ini화일의 경로

SysComm := Tinifile.Create(pgnm);

vList := TStringList.Create;

verinfo := syscomm.ReadString('Version',vList[0],'');

// verinfo에 string값을 위치 시켜 값을 비교

end;



예) vchk.ini

[Version]

ver=1

이라고 구성이 되면 1값을 읽어 처리 할 예정인데 ....

1  COMMENTS
  • Profile
    기타맨 2000.11.01 02:45
    verinfo := syscomm.ReadString('Version',vList[0],'');

    이부분을 고치면 될거 같아요..

    vList[0]을 ver로 고쳐야 하구요..값이 integer니까.

    syscomm.ReadInteger('Version','ver',0);

    이렇게 하시면 되겠네요.

    저장할때도 WriteIntger을 사용하세요.





    초보 wrote:

    > ini화일을 읽어 값을 비교 자동 copy되는 프로그램을 하는데 ini화일 자체를 인식을

    > 못하는 건지 찾지를 못하는 것인지 원인을 모르겠읍니다. 고수님들 도와 주세요

    >

    > ****** 제가 작성한 프로시져 ******

    > procedure TForm1.inifilechk;

    > var syscomm: TiniFile;

    > pgnm: string;

    > vList: TStringList;

    > begin

    > pgnm := Exe_Path + 'vchk.ini';

    > // ini화일의 경로

    > SysComm := Tinifile.Create(pgnm);

    > vList := TStringList.Create;

    > verinfo := syscomm.ReadString('Version',vList[0],'');

    > // verinfo에 string값을 위치 시켜 값을 비교

    > end;

    >

    > 예) vchk.ini

    > [Version]

    > ver=1

    > 이라고 구성이 되면 1값을 읽어 처리 할 예정인데 ....