delphi中如何读取ini文件中的内容,并显示在edit中,需要执行程序后edit中就显示

delphi中如何读取ini文件中的内容,并显示在edit中,需要执行程序后edit中就显示,第1张

一、打开INI文件

Filename:=ExtractFilePath(Paramstr(0))+’programini’;

myinifile:=TinifileCreate(filename);

二、读取关键字的值

针对INI文件支持的字符串、整型数值、布尔值三种数据类型,TINIfiles类提供了三种不同的对象方法来读取INI文件中关键字的值。

vs:=myinifileReadstring(’小节名’,’关键字’,缺省值); string类型

vi:=myinifileReadinteger(’小节名’,’关键字’,缺省值);integer类型

vb:=myinifileReadbool(’小节名’,’关键字’,缺省值); boolean类型

至于在执行程序后edit中就显示的问题:

在页面的show事件中增加edit1 := myinifileReadstring(’小节名’,’关键字’,缺省值);

就可以了

用LoadFromFile就可以 比如C盘下有个123txt ListBox1ItemsLoadFromFile('C:\123txt'); 不会可以加Q 272399954

try{

InputStream fis =getClass()getResourceAsStream("jdbcsqlproperties");

Properties ps=new Properties();

psload(fis);

driver=psgetProperty("driver");

url=psgetProperty("url");

user=psgetProperty("username");

password=psgetProperty("password");

ClassforName(thisdriver);

procedure SavePointedFile(cStart,cEnd:Integer;OFile,NFile:string);

var

F:TextFile;

SL:TStringList;

T:String;

begin

SL:=TStringListCreate;

SLLoadFromFile(OFile);//先读入一个文本

T:=Copy(SLText,cStart,cEnd);//截取你指定的部分

AssignFile(F,NFile);

ReWrite(F);

Write(F,T);//将截取的文本写入新的文本文件中

CloseFile(F);

SLFree;

end;

以上就是关于delphi中如何读取ini文件中的内容,并显示在edit中,需要执行程序后edit中就显示全部的内容,包括:delphi中如何读取ini文件中的内容,并显示在edit中,需要执行程序后edit中就显示、Delphi 7 列表框如何读取某个文本文档的内容如题 谢谢了、Delphi 如何读入文本文档txt中的数据等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/web/10147775.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-05
下一篇 2023-05-05

发表评论

登录后才能评论

评论列表(0条)

保存