怎么使用ini文件进行一些设置的保存?

发布网友发布时间：2022-05-24 15:49

共1个回答

热心网友时间：2023-10-19 11:52

procere TForm1.FormClose(Sender: TObject; var Action: TCloseAction);beginWith TINIFile.Create('a.ini') do//创建a.inibeginWriteBool('MySetting', 'CheckBox1_Checked', CheckBox1.Checked);{保存到MySetting下面的CheckBox1_Checked子键下,然后把Checkbox1的是否按下状态写进去}
WriteString('MySetting', 'Edit1_Text', Edit1.Text);//同上end;end;procere TForm1.FormCreate(Sender: TObject);//读入a.ini文件中的设置beginWith TINIFile.Create('a.ini') do//打开已创建的a.inibeginCheckBox1.Checked := ReadBool('MySetting', 'CheckBox1_Checked', False);{同上面的写入一样,这里是读取ReadBool和WriteBool是两个BOOL值的写入方法.}

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com