ini文件的创建和读写访问

使用ini文件保存设置，简便易行。

 例如：保存和修改Timage组件的图片。

//相关变量
var
imgBack:Timage;
pndlgImgBack:TopenPictureDialog;
inifile:Tinifile;

//构建Tinifile对象
inifile:=Tinifile.create(getCurrentDir+'/test.ini'); //使用绝对路径,以免出错.不知为什么,调试程序时,目录老是出问题.@_@

Procedure Tform1.ImgBackChange;
var
tmps:string;

begin
    pndlgImgBack.execute;
    tmps:=pndlgImgBack.filename;
    imgBack.picture.loadfromfile(tmps);
    inifile.writestring('skin','ImageBack',tmps); //类似的还有writeinteger,writeboolean...;读取则为readinteger,readstring...
end;