请问各位高手,如何在DELPHI中生成INI文件?给分!!
解决方案 »
- 开发VPN服务端代码,有难度哦!!!
- 如何执行Oracle的带返回参数的存储过程?
- 是否需要自己拆分参数?
- 这个AdoQuery的参数如何写Sql.text:='Insert into 固定资产表 VALUES(:固定资产编号,:固定资产名称)
- 帮我看一下,这代码哪里错了?
- DatetoStr(Date),索引文件,输入判断, I love delphi......
- ADOQUERY中SQL为'select 计算_姓名='',姓名代码,工资 FROM 工资',列计算_姓名如何 实现修改功能?
- 如何获取tif文件的分辨率、压缩品质等??
- 关于TStringGrid控件的显示问题
- 软件加密的解决方案!!!!!!!!!!!!
- 用Delphi制作的DLL文件可不可以直接被Delphi(或其他应用程序如VB)调用?
- 怎样用Delphi编写SQL-SERVER建库程序?
procedure TForm1.Button1Click(Sender: TObject);
var
MyIniFile: TIniFile;
begin
MyIniFile := TIniFile.Create('myapp.ini');//如果不存在,会自动创建一个的
Memo1.Clear;
MyIniFile.ReadSectionValues('Transfer', Memo1.Lines);
if Memo1.Lines.Values['Title1'] <> 'Picture Painter' then
MyIniFile.WriteString('Transfer', 'Title1', 'Picture Painter');
MyIniFile.Free;
end;
uses IniFiles;//在前面要加入这个单元文件
procedure TForm1.Button1Click(Sender: TObject);
var
ini: TIniFile;
begin
ini:=Tinifile.Create(ExtractFilePath(ParamStr(0))+'\test.INI');//在程序的目录下
end;