- 浏览: 133600 次
- 性别:
文章分类
最新评论
Delphi TStrings取得Ini文件键值对
- 博客分类:
- Delphi
Delphi TStrings取得Ini文件键值对的简单方法如下:
procedure TForm1.BitBtn1Click(Sender: TObject); var StrList:TStrings; I:Integer; IniCfg:TInifile; begin Memo1.Clear; StrList := TStringList.Create;//TStrings中含有抽象方法,是抽象类,不能实例化 IniCfg := TInifile.Create( ExtractFilePath(Application.ExeName)+'SysCfg.ini'); try IniCfg.ReadSectionValues('SubTitle',StrList); for I := 0 to StrList.Count - 1 do begin Memo1.Lines.Add('Key:'+StrList.Names[i]); Memo1.Lines.Add('Value:'+StrList.ValueFromIndex[i]); // Memo1.Lines.Add('Value:'+StrList.Values[StrList.Names[i]]);//也可以 end; finally IniCfg.Free; StrList.Free; end; end;
SysCfg.ini文件如下:
[SubTitle] SubTitle1=子标题1 SubTitle2=子标题2 SubTitle3=子标题3 SubTitle4=子标题4 SubTitle5=子标题5
输出结果如下:
Key:SubTitle1
Value:子标题1
Key:SubTitle2
Value:子标题2
Key:SubTitle3
Value:子标题3
Key:SubTitle4
Value:子标题4
Key:SubTitle5
Value:子标题5
发表评论
-
Delphi中的接口和抽象类
2010-12-06 16:30 554接口:Interface Delphi中接口的关键字 ... -
Delphi中票据凭证的精确打印
2011-04-06 15:13 977一、概述 在银行,税务,邮政等行业的实际工作中,经常涉及到在 ... -
Delphi编程中流的应用
2011-05-25 11:19 768一、流的概念 流简单说是建立在面向对象基础上的一种 ... -
Pascal与C的指针
2011-05-26 13:49 990大家都认为,C语言 ... -
Delphi编程的一些资料1
2011-06-16 10:40 710手机 SMS PDU 格式参考手册 1.相关的GSM AT指 ... -
Delphi编程的一些资料2
2011-06-16 10:43 704算法步骤: 一、地址 ... -
Delphi编程的一些资料3
2011-06-16 10:46 770一、一般命令 AT+CGMI ... -
Delphi编程的一些资料4
2011-06-16 10:48 766七、追加服务命令 AT+CCFC 呼叫继续 ... -
Delphi编程的一些资料5
2011-06-16 10:53 760十三、SIM卡工具箱命令 AT+STSF ... -
短信文本模式下的解码方法
2011-06-16 10:57 777接收短信有两种编码格式: 1.中英文混合的为unicode 2 ... -
通过注册表获取当前所有串口号
2011-06-16 15:49 2691usesWindows, Messages, SysUtils ... -
Delphi 分隔GSMModem接收到的短信字符串
2011-06-20 10:37 1069Delphi 分隔GSMModem接收到的短信字符串 ... -
Delphi流的操作
2011-06-22 14:34 792Delphi流的操作 一、流的概念 流简单说是建立在面 ... -
Delphi、PChar和Char数组的比较
2011-06-22 16:14 1244Delphi、PChar和Char数组的 ... -
Delphi 判断数据库表是否存在
2011-06-26 12:54 1036//根据表名和一个数据库连接判断表是否存在 function ... -
Delphi ListView基本用法大全
2011-08-22 17:27 1340Delphi ListView基本用法大全 //增加项或列( ... -
Delphi2010 无效的类别字符串, ProgID: "ADOX.Catalog"问题
2012-07-18 09:56 2052程序中用ADOX创建的Access数据库,一直运行正常,其 ... -
Delphi 禁用TEdit右键菜单及复制粘贴
2012-07-19 11:24 1364Delphi 禁用TEdit右键菜单及复制粘贴简的单方法 ... -
Delphi 压缩Access数据库
2012-07-21 12:21 1602由于Access数据库在反复使用过程中会自动增大,Del ...
相关推荐
关于 Delphi字符串、数组的函数,包含【Copy】、【Concat】等函数
Delphi将TableToClass 表文件转换成类文件,//刷新数据库procedure RefreshDB; //读取数据库名称列表 function ReadDBNameList: TStringList; //读取数据表名称列表 function ReadTableNameList: ...
Delphi编写的日志记录组件源代码,从中可以学习自定义组件的一些技巧,如注册到组件面板、添加自定义图标等。 日志组件具有以下属性及方法: public { Public declarations } procedure AddLog(p_Info: string); /...
json4delphi JSON for Delphi,支持较早版本的Delphi(6或更高版本) 对象-pascal本机代码,仅使用TList,TStrings和TStringList类例子: var Json: TJson; Str: Stringbegin Json := TJson.Create(); // put Json....
procedure GetDisks(Strings: TStrings { TStringList ??? }); //获取所有盘符 procedure HideApp; //隐藏程序 function GetTmpPath: String; //取得WINDOWS的Temp路径 function GetSysPath: String; //取得...
执行DOS命令的DELPHI控件: property StdOutRead :THandle read fOutputRead; property StdInWrite :THandle read fInputWrite; property StdErrRead :THandle read fErrorRead; procedure ...
//在Path下取得唯一FilenameX文件 function FileGetUniqueFileName(const Path: string; Filename: string): string; //取得临时文件 function FileGetTemporaryFileName: string; //取得系统路径 function ...
delphi:子符串替换函数 delphi:TStrings的详细用法
{* 取得与文件相关的图标,成功则返回True} function CreateBakFile(FileName, Ext: string): Boolean; {测试通过} {* 创建备份文件} function Deltree(Dir: string): Boolean; {测试通过} {* 删除整个目录} ...
源码包中一共介绍了4种在Delphi程序中动态地建立和使用别名的方法,每种方法都附有完整的源码文件,AliasN为数据库别名,DbLocat为数据库别名对应的目录,DriverN为驱动类型,对数据库各组件属性进行设置,Tstrings是...
Borland公司日前发布了其最新版Windows开发工具Delphi 2005,新版软件在同一开发环境中加入了对Win32、.Net、Delphi和C#的支持,同时集成了Borland应用生命周期管理工具。 代号Diamondback的新版Delphi是为支持...
1) 自动识别当前系统的语言 2) 能自动设置数值型属性,对于引用型属性(目前只支持tstrings) 3) 支持导出目前窗口中控件属性功能,使系统变成多语言工作简单化 4)支持任意中语言
对窗体设置语言文件,自动读写.DFM中的文字资源到INI文件中, 之后再对INI文件统一修改. 主要设置以下几项属性: AnsiString: Caption , AnsiString: Text, AnsiString: DisplayLabel, AnsiString: Hint,(当属性...
vs2005自定义控件,实现了delphi中TStrings(TStringList)一样的效果
0019 构成Delphi项目的主要文件 12 0020 如何在程序中调用帮助文件 12 第2章 语言基础 17 2.1 基础语言 18 0021 如何对代码进行注释 18 0022 Exit语句的使用 18 0023 有效地使用Self对象 19 0024 ...
0019 构成Delphi项目的主要文件 12 0020 如何在程序中调用帮助文件 12 第2章 语言基础 17 2.1 基础语言 18 0021 如何对代码进行注释 18 0022 Exit语句的使用 18 0023 有效地使用Self对象 19 0024 ...
在Delphi中,对对象的调用实际上采用了两个步骤,首先是把对象地址放入eax寄存器中,然后call类方法,所以如果不使用继承类增加数据的话,用父类调用继承类的方法是没问题的,所以其实这样的方法在D7中也可以使用,...
TStrings是一个抽象类,在实际开发中,是除了基本类型外,应用得最多的。 常规的用法大家都知道,现在来讨论它的一些高级的用法。
procedure DebugLog_SetStrings(LogsStrings:TStrings); procedure DebugLog_Start; procedure DebugLog_Stop; *调用方式: 如果需要设置自定义日志文件名及路径则需要先调用Debug_InitiLog() ,然后直接使用...