一个简单的问题

Question

怎么读写INI文件啊 ？我写了一段程序，怎么不行啊？Procedure GetRegistValue;
var
   AInifile:TIniFile;
   values:string;
Begin
   AInifile := TIniFile.Create('test.INI');
   values := AInifile.ReadString('test','aaaa','');   showmessage(values);End;
test.ini文件定义如下：
[test]
aaaa=bbbb但是，我的程序运行的时候，总是取不到．请高手解答．谢谢

Answer 1

没有指定路径的,默认是Windows\System32路径的
所以
TIniFile.Create(ExtractFilePath(ParamStr(0))+'test.INI');

Answer 2

应该是test.ini文件没有找到。
var
   AInifile:TIniFile;
   values:string;
Begin
   AInifile := TIniFile.Create('c:\test.INI');
   values := AInifile.ReadString('test','aaaa','');   showmessage(values);
   AInifile.Free;
end;我这就可以,不过指定了决定路径.

Answer 3

ExtractFilePath这个有什么用啊???

Answer 4

不过这个问题我解决了,我调用了API函数,得到了文件的当前路径!呵呵,谢谢大家