API读写INI文件(转载)

Wesley13
• 阅读 649

 

API读写INI文件(转载)

20

用API写INI文件的函数有
BOOL WritePrivateProfileString(

    LPCTSTR lpAppName, // 节名
    LPCTSTR lpKeyName, // 键名 
    LPCTSTR lpString, // 添加的字符串 
    LPCTSTR lpFileName  // Ini文件名 
   );

BOOL WritePrivateProfileStruct(
    LPCTSTR lpszSection, // pointer to section name
    LPCTSTR lpszKey, // pointer to key name
    LPVOID lpStruct, // 要写入的数据缓冲区
    UINT uSizeStruct, // 缓冲区的大小
    LPCTSTR szFile // pointer to initialization filename
   );
BOOL WritePrivateProfileSection(

    LPCTSTR lpAppName, // pointer to string with section name 
    LPCTSTR lpString, // 写入的字符串
    LPCTSTR lpFileName  // pointer to string with filename 
   );
用API读INI文件的函数有
DWORD GetPrivateProfileString(

    LPCTSTR lpAppName, // points to section name 
    LPCTSTR lpKeyName, // points to key name 
    LPCTSTR lpDefault, // 默认字符串 ,如果没有则返回该值
    LPTSTR lpReturnedString, // 返回的字符串 
    DWORD nSize, // 返回字符串的大小 
    LPCTSTR lpFileName  // points to initialization filename 
   );
DWORD GetPrivateProfileSection(

    LPCTSTR lpAppName, // address of section name 
    LPTSTR lpReturnedString, // address of return buffer 
    DWORD nSize, // size of return buffer 
    LPCTSTR lpFileName  // address of initialization filename  
   );
UINT GetPrivateProfileInt(

    LPCTSTR lpAppName, // address of section name
    LPCTSTR lpKeyName, // address of key name
    INT nDefault, // return value if key name is not found
    LPCTSTR lpFileName  // address of initialization filename
   ); 
BOOL GetPrivateProfileStruct(

    LPCTSTR lpszSection, // address of section name
    LPCTSTR lpszKey, // address of key name
    LPVOID lpStruct, // address of return buffer
    UINT uSizeStruct, // size of return buffer
    LPCTSTR szFile // address of initialization filename
   );
DWORD GetPrivateProfileSectionNames(

    LPTSTR lpszReturnBuffer, // address of return buffer 
    DWORD nSize, // size of return buffer 
    LPCTSTR lpFileName // address of initialization filename
   );
当然还有如WriteProfileString,WriteProfileSection,WriteProfileSturct, GetProfileString,GetProfileStruct,GetProfileSectionNames,GetProfileInt,GetProfileSection但这些只对Win.ini有效
下面我们来学习它们的用法
WritePrivateProfileString函数是向ini文件中写入字符串,如
WritePrivateProfileString(Pchar('类型'),Pchar('API'),Pchar('API 真好!'),Pchar('c:/example.ini'));
如果第二个参数是nil,那么该操作将删除该节
如果第三个参数为nil,那么该操作将删除该节中的所有键
如果在指定的文件中没有路径,那么它将在系统的目录寻找文件,如果不存在则建立

WritePrivateProfileSection是向文件中写入一整个键,其它键的格式为key = value,如
WritePrivateProfileSection(Pchar('类型'),Pchar('其它=123'),Pchar('c:/example.ini'));
注意,该操作将删除该节中的所有键后在进行本次的写入

WritePrivateProfileStruct是向文件中写入一个结构,如
type
  TPerson = record
    Name:string;
    Age:integer;
  end;
var
   Per:TPerson;
WritePrivateProfileStruct(Pchar('类型'),Pchar('结构'),@Per ,Sizeof(Per),Pchar('C:/example.ini'));

GetPrivateProfileString是从文件中读出一个指定键的字符串,如果没有找到,则返回默认值
GetPrivateProfileString(Pchar(‘类型'),Pchar('API'),Pchar('no value'),Str1,21,Pchar('c:/example.ini'));

GetPrivateProfileSection是从文件中读出一整个键
GetprivateProfileSection('类型',str1,200,'c:/example.ini');

GetPrivateProfileInt是从文件中读出指定键的整型值,如果没找到或不是整型的值,则返回默认值,如果返回值小于0,则返回0,如
i:=GetPrivateProfileInt(Pchar('类型'),Pchar('整型'),i,Pchar('C:/example.ini'));
showMessage(inttostr(i));

GetPrivateProfileStruct从文件中读出指定键的结构值,如
type
  TPerson = record
    Name:string;
    Age:integer;
  end;
var
   Buffer:TPerson;
GetPrivateProfileStruct(Pchar('类型'),Pchar('结构'),@Buffer ,Sizeof(Per),Pchar('C:/example.ini'));

GetPrivateProfileSectionNames是从文件中读出所有节的名称,该函数返回读入缓冲区的字符数,如
count:=GetPrivateProfileSectionNames(Str3,200,Pchar('c:/example.ini'));
ShowMessage(Str3);
此处显示的只是第一个节的名称,如果要显示第二个字符的名称则要用到下面这句
showmessage(str3+5);
这句不用多解释吧?
以上就是这些函数的用法。你可能要问“怎么只有写字符串的呀,怎么没有写其它的类型的呢?”,问的好,不过其它类型的用WritePrivateProfileString都能代替,如要写浮点型的就把该类型的放到’’当中,如’12.5’。那位学友又问了,“如果是让用户输入,他们也不知道应该输入什么,怎么能限制他们输入的都是数字”,这方法可太多了,如用控件或检查它们是不是在指定的数字,你可别说不会限制它们是不是数字呀*_^,如果真的不会,你就看它们的ASCII码是不是在48-57之间就行了。“那读出呢?”,Delphi不是有StrToInt,StrToFloat,StrToCurr等这么函数嘛,可以用它们来转换。
我在研究这些函数的同时,发现了一段有趣程序代码,但我不知道它为什么要这样做,有什么好处,大家可以看看它们,不过是用C写的,它们在Delphi SDK或MSDN中查找WritePrivateProfileString函数,在最下面的那个段代码就是

如果我在上面说的有错误的话,希望大家指正,共同讨论学习  

下面是另一网友文章

/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

VC中用函数读写ini文件的方法

         ini文件(即Initialization file),这种类型的文件中通常存放的是一个程序的初始化信息。ini文件由若干个节(Section)组成,每个Section由若干键(Key)组成,每个Key可以赋相应的值。读写ini文件实际上就是读写某个的Section中相应的Key的值,而这只要借助几个函数即可完成。

一、向ini文件中写入信息的函数
1. 把信息写入系统的win.ini文件
BOOL WriteProfileString(
      LPCTSTR lpAppName, // 节的名字,是一个以0结束的字符串
      LPCTSTR lpKeyName, // 键的名字,是一个以0结束的字符串。若为NULL,则删除整个节
      LPCTSTR lpString       // 键的值,是一个以0结束的字符串。若为NULL,则删除对应的键
)

2. 把信息写入自己定义的.ini文件
BOOL WritePrivateProfileString(
      LPCTSTR lpAppName,      // 同上
      LPCTSTR lpKeyName,      // 同上
      LPCTSTR lpString,       // 同上
      LPCTSTR lpFileName      // 要写入的文件的文件名。若该ini文件与程序在同一个目录下,也可使用相对
            //路径,否则需要给出绝度路径。
)

如:
::WriteProfileString("Test","id","xym"); 
//在win.ini中创建一个Test节,并在该节中创建一个键id,其值为xym

::WritePrivateProfileString("Test","id","xym","d://vc//Ex1//ex1.ini");
//在Ex1目录下的ex1.ini中创建一个Test节,并在该节中创建一个键id,其值为xym

//若Ex1.ini文件与读写该文件的程序在同一个目录下,则上面语句也可写为:
::WritePrivateProfileString("Test","id","xym",".//ex1.ini");

需要注意的是,C系列的语言中,转义字符'//'表示反斜线'/'。另外,当使用相对路径时,//前的.号不能丢掉了。

二、从ini文件中读取数据的函数
1、从系统的win.ini文件中读取信息
(1) 读取字符串
DWORD GetProfileString(
      LPCTSTR lpAppName,            // 节名
      LPCTSTR lpKeyName,            // 键名,读取该键的值
      LPCTSTR lpDefault,            // 若指定的键不存在,该值作为读取的默认值
      LPTSTR lpReturnedString,      // 一个指向缓冲区的指针,接收读取的字符串
      DWORD nSize                   // 指定lpReturnedString指向的缓冲区的大小
)

如:
CString str;
::GetProfileString("Test","id","Error",str.GetBuffer(20),20);

(2) 读取整数
UINT GetProfileInt(
      LPCTSTR lpAppName,      // 同上
      LPCTSTR lpKeyName,      // 同上
      INT nDefault            // 若指定的键名不存在,该值作为读取的默认值
)

如使用以下语句写入了年龄信息:
::WriteProfileString("Test","age","25"); 
//在win.ini中创建一个Test节,并在该节中创建一个键age,其值为25

则可用以下语句读取age键的值:
int age;
age=::GetProfileInt("Test","age",0);

2、从自己的ini文件中读取信息
(1) 读取字符串
DWORD GetPrivateProfileString(
      LPCTSTR lpAppName,            // 同1(1)
      LPCTSTR lpKeyName,            // 同1(1)
      LPCTSTR lpDefault,            // 同1(1)
      LPTSTR lpReturnedString,      // 同1(1)
      DWORD nSize,                  // 同1(1)
      LPCTSTR lpFileName            // 读取信息的文件名。若该ini文件与程序在同一个目录下,也可使用相      
            //对路径,否则需要给出绝度路径。
)

如:
CString str;
::GetPrivateProfileString("Test","id","Error",str.GetBuffer(20),20,".//ex1.ini");
或:
::GetPrivateProfileString("Test","id","Error",str.GetBuffer(20),20,"d://vc//Ex1//ex1.ini");

(2) 读取整数

UINT GetPrivateProfileInt(
      LPCTSTR lpAppName,      // 同上
      LPCTSTR lpKeyName,      // 同上
      INT nDefault,           // 若指定的键名不存在,该值作为读取的默认值
      LPCTSTR lpFileName      // 同上
)

如使用以下语句写入了年龄信息:
::WritePrivateProfileString("Test","age","25",".//ex1.ini"); 
//在ex1.ini中创建一个Test节,并在该节中创建一个键age,其值为25

则可用以下语句读取age键的值:
int age;
age=::GetPrivateProfileInt("Test","age",0,".//ex1.ini");

三、 删除键值或节

       回顾一下WriteProfileString函数的说明
BOOL WriteProfileString(
      LPCTSTR lpAppName, // 节的名字,是一个以0结束的字符串
      LPCTSTR lpKeyName, // 键的名字,是一个以0结束的字符串。若为NULL,则删除整个节
      LPCTSTR lpString       // 键的值,是一个以0结束的字符串。若为NULL,则删除对应的键
)

       由此可见,要删除某个节,只需要将WriteProfileString第二个参数设为NULL即可。而要删除某个键,则只需要将该函数的第三个参数设为 NULL即可。这是删除系统的win.ini中的节或键,类似的,要删除自己定义的ini文件中的节或键,也可做相同的操作。
       如:
::WriteProfileString("Test",NULL,NULL);      //删除win.ini中的Test节
::WriteProfileString("Test","id",NULL);      //删除win.ini中的id键

::WritePrivateProfileString("Test",NULL,NULL,".//ex1.ini");      //删除ex1.ini中的Test节
::WritePrivateProfileString("Test","id",NULL,".//ex1.ini");      //删除ex1.ini中的id键

四、如何判断一个ini文件中有多少个节
       要判断一个ini文件中有多少个节,最简单的办法就是将所有的节名都找出来,然后统计节名的个数。而要将所有的节名找出来,使用GetPrivateProfileSectionNames函数就可以了,其原型如下:
DWORD GetPrivateProfileSectionNames(
      LPTSTR lpszReturnBuffer,      // 指向一个缓冲区,用来保存返回的所有节名
      DWORD nSize,                  // 参数lpszReturnBuffer的大小
      LPCTSTR lpFileName            // 文件名,若该ini文件与程序在同一个目录下,

                                                //也可使用相对路径,否则需要给出绝度路径
)

下面的是用来统计一个ini文件中共有多少个节的函数,当然,如果需要同时找到每个节中的各个键及其值,根据找到节名就可以很容易的得到了。

/*统计共有多少个节
节名的分离方法:若chSectionNames数组的第一字符是'/0'字符,则表明
有0个节。否则,从chSectionNames数组的第一个字符开始,顺序往后找,
直到找到一个'/0'字符,若该字符的后继字符不是 '/0'字符,则表明前
面的字符组成一个节名。若连续找到两个'/0'字符,则统计结束*/

int CTestDlg::CalcCount(void)
{
TCHAR       chSectionNames[2048]={0};       //所有节名组成的字符数组
char * pSectionName; //保存找到的某个节名字符串的首地址
int i;       //i指向数组chSectionNames的某个位置,从0开始,顺序后移
int j=0;      //j用来保存下一个节名字符串的首地址相对于当前i的位置偏移量
int count=0;      //统计节的个数

//CString name;
//char id[20];
::GetPrivateProfileSectionNames(chSectionNames,2048,".//ex1.ini");   
for(i=0;i<2048;i++,j++)
{
      if(chSectionNames[0]=='/0')
       break;       //如果第一个字符就是0,则说明ini中一个节也没有
      if(chSectionNames[i]=='/0')
      {
       pSectionName=&chSectionNames[i-j]; //找到一个0,则说明从这个字符往前,减掉j个偏移量,
            //就是一个节名的首地址

       j=-1;         //找到一个节名后,j的值要还原,以统计下一个节名地址的偏移量
            //赋成-1是因为节名字符串的最后一个字符0是终止符,不能作为节名

            //的一部分
       /*::GetPrivateProfileString(pSectionName,"id","Error",id,20,".//ex1.ini");
       name.Format("%s",id);*/   
       //在获取节名的时候可以获取该节中键的值,前提是我们知道该节中有哪些键。
   
       AfxMessageBox(pSectionName);      //把找到的显示出来

       if(chSectionNames[i+1]==0)
       {
         break;      //当两个相邻的字符都是0时,则所有的节名都已找到,循环终止
       }
      }   
}
return count;

 
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// 
/////////////////////////////////////////////////////////////////
在VC程序中利用系统提供的GetPrivateProfileString及WritePrivateProfileString函数直接读写系统配置ini文件(指定目录下的Ini文件)

假设在当前目录下有一个文件名为Tets.ini的文件
用于保存用户名和密码
文件格式如下:
[Section1]
Item1=huzhifeng
Item2=1234565

1.写INI文件
void CINI_File_TestDlg::OnButtonWrite() 
{
 // TODO: Add your control notification handler code here

 CString strSection       = "Section1";
  CString strSectionKey    = "Item1";
 char strBuff[256];
  CString strValue       = _T("");
 CString strFilePath;

 strFilePath=GetCurrentDirectory(256,strBuff);  //获取当前路径
 strFilePath.Format("%s//Test.ini",strBuff);

 GetDlgItemText(IDC_EDIT_NAME,strValue);     //获取文本框内容:即姓名
 WritePrivateProfileString(strSection,strSectionKey,strValue,strFilePath);  //写入ini文件中相应字段

 strSectionKey="Item2";
 GetDlgItemText(IDC_EDIT_PASSWORD,strValue);   //获取文本框内容:即密码
 WritePrivateProfileString(strSection,strSectionKey,strValue,strFilePath);
}

2.读INI文件内容
void CINI_File_TestDlg::OnButtonRead() 
{
 // TODO: Add your control notification handler code here
 CString strSection       = "Section1";
  CString strSectionKey    = "Item1";
 char strBuff[256];
 CString strValue       = _T("");
 CString strFilePath;

 strFilePath=GetCurrentDirectory(256,strBuff);  //获取当前路径
 strFilePath.Format("%s//Test.ini",strBuff);

 GetPrivateProfileString(strSection,strSectionKey,NULL,strBuff,80,strFilePath); //读取ini文件中相应字段的内容
 strValue=strBuff;
 SetDlgItemText(IDC_EDIT_NAME,strValue);

 strSectionKey="Item2";
 GetPrivateProfileString(strSection,strSectionKey,NULL,strBuff,80,strFilePath);
 strValue=strBuff;
 SetDlgItemText(IDC_EDIT_PASSWORD,strValue);

 UpdateData(FALSE);
}

点赞
收藏
评论区
推荐文章
blmius blmius
3年前
MySQL:[Err] 1292 - Incorrect datetime value: ‘0000-00-00 00:00:00‘ for column ‘CREATE_TIME‘ at row 1
文章目录问题用navicat导入数据时,报错:原因这是因为当前的MySQL不支持datetime为0的情况。解决修改sql\mode:sql\mode:SQLMode定义了MySQL应支持的SQL语法、数据校验等,这样可以更容易地在不同的环境中使用MySQL。全局s
皕杰报表之UUID
​在我们用皕杰报表工具设计填报报表时,如何在新增行里自动增加id呢?能新增整数排序id吗?目前可以在新增行里自动增加id,但只能用uuid函数增加UUID编码,不能新增整数排序id。uuid函数说明:获取一个UUID,可以在填报表中用来创建数据ID语法:uuid()或uuid(sep)参数说明:sep布尔值,生成的uuid中是否包含分隔符'',缺省为
待兔 待兔
3个月前
手写Java HashMap源码
HashMap的使用教程HashMap的使用教程HashMap的使用教程HashMap的使用教程HashMap的使用教程22
Jacquelyn38 Jacquelyn38
3年前
2020年前端实用代码段,为你的工作保驾护航
有空的时候,自己总结了几个代码段,在开发中也经常使用,谢谢。1、使用解构获取json数据let jsonData  id: 1,status: "OK",data: 'a', 'b';let  id, status, data: number   jsonData;console.log(id, status, number )
Wesley13 Wesley13
2年前
Java获得今日零时零分零秒的时间(Date型)
publicDatezeroTime()throwsParseException{    DatetimenewDate();    SimpleDateFormatsimpnewSimpleDateFormat("yyyyMMdd00:00:00");    SimpleDateFormatsimp2newS
Wesley13 Wesley13
2年前
mysql设置时区
mysql设置时区mysql\_query("SETtime\_zone'8:00'")ordie('时区设置失败,请联系管理员!');中国在东8区所以加8方法二:selectcount(user\_id)asdevice,CONVERT\_TZ(FROM\_UNIXTIME(reg\_time),'08:00','0
Wesley13 Wesley13
2年前
00:Java简单了解
浅谈Java之概述Java是SUN(StanfordUniversityNetwork),斯坦福大学网络公司)1995年推出的一门高级编程语言。Java是一种面向Internet的编程语言。随着Java技术在web方面的不断成熟,已经成为Web应用程序的首选开发语言。Java是简单易学,完全面向对象,安全可靠,与平台无关的编程语言。
Stella981 Stella981
2年前
Django中Admin中的一些参数配置
设置在列表中显示的字段,id为django模型默认的主键list_display('id','name','sex','profession','email','qq','phone','status','create_time')设置在列表可编辑字段list_editable
Wesley13 Wesley13
2年前
MySQL部分从库上面因为大量的临时表tmp_table造成慢查询
背景描述Time:20190124T00:08:14.70572408:00User@Host:@Id:Schema:sentrymetaLast_errno:0Killed:0Query_time:0.315758Lock_
Python进阶者 Python进阶者
8个月前
Excel中这日期老是出来00:00:00,怎么用Pandas把这个去除
大家好,我是皮皮。一、前言前几天在Python白银交流群【上海新年人】问了一个Pandas数据筛选的问题。问题如下:这日期老是出来00:00:00,怎么把这个去除。二、实现过程后来【论草莓如何成为冻干莓】给了一个思路和代码如下:pd.toexcel之前把这