Delphi ini 文件操作记要: 使用 TMemIniFile
2022-11-30 14:33:49 作者:admin
本文整理自网络,侵删。
unit Unit1;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
type TForm1 = class(TForm) Button1: TButton; Button2: TButton; procedure FormCreate(Sender: TObject); procedure FormDestroy(Sender: TObject); procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); private { Private declarations } public { Public declarations } end;
var Form1: TForm1;
implementation
{$R *.dfm}
uses IniFiles;var ini: TMemIniFile;
procedure TForm1.FormCreate(Sender: TObject);begin ini := TMemIniFile.Create('c:\temp\test.ini');end;
//写入procedure TForm1.Button1Click(Sender: TObject);begin ini.WriteString('AAA','A1','AAA-String');
//其他也都和 IniFile 一样使用// ini.WriteInteger();// ini.WriteBool();// ini.WriteDate();// ini.WriteTime();// ini.WriteDateTime();// ini.WriteFloat();// ini.WriteBinaryStream();
//ini.UpdateFile; //因为 TMemIniFile 是内存操作, 这样才能保存到文件end;
//读出及其他procedure TForm1.Button2Click(Sender: TObject);var s: string;begin s := ini.ReadString('AAA','A1','默认值'); ShowMessage(s); //AAA-String
//其他读入命令也都和 IniFile 一样使用// ini.ReadInteger();// ini.ReadBool();// ini.ReadDate();// ini.ReadTime();// ini.ReadDateTime();// ini.ReadFloat();// ini.ReadBinaryStream();
//还有四个常用方法也是和 IniFile 一样的//ini.DeleteKey();//ini.EraseSection();//ini.ReadSection();//ini.ReadSections();
//另外有三个 IniFile 中没有的方法也容易使用//ini.GetStrings(List: TStrings);//ini.SetStrings(List: TStrings);//ini.rename(const FileName: string; Reload: Boolean);//其中 rename 中的第二个 Boolean 参数如果为 True 将会刷新读入end;
procedure TForm1.FormDestroy(Sender: TObject);begin ini.Free;end;
end.
来源:https://www.cnblogs.com/del/archive/2007/12/18/1004101.html
相关阅读 >>
Delphi idhttp最简洁的修改和取得cookie例子
pascal 语言中的关键字及保留字
Delphi 判断图像格式bmp jpg gif pcx png psd ras sgi tiff err
Delphi图片上写水印文字函数
Delphi formatdatetime 显示日期时间
Delphi webbrowser1去边框
Delphi使用idhttp 获取 httpsurl内容
Delphi 以系统权限运行程序的代码
Delphi 查询某个字符在字符串出现的位置,支持查找次数
Delphi api 函数中使用 pchar 参数的几种方法
更多相关阅读请进入《Delphi》频道 >>
猜你喜欢
联络方式:
400-123-789
邮箱:xiachao@163.com
Q Q:12345678
微信公众号
微信二维码