如何读取配置文件中的标题行？谁告诉我啊？我把我的积分都给你．(38分)

Y

ysp_1984

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-07

• #1

比如配置文件中的内容是：
[常用工具]
路径=D:/Tools/常用工具
外挂根目录=d:/
显示外挂栏=0

[棋牌聊天]
路径=D:/Tools/棋牌聊天
外挂根目录=d:/
显示外挂栏=0
如何读取其中的‘常用工具’标题栏，并将其赋给edit1.text;

 

F

freeskyzu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-07

• #2

一个通用函数
function GetIniValue(Titles,Values:string):string;
var Myini:TINIFile;
begin
Myini:=TIniFile.Create(ExtractFilePath(Application.ExeName)+'Setup.inf');
try
Result := MyINI.ReadString(Titles,Values,'');
finally
MyINI.Free;
end;
end;

 

黑

黑星星

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-08

• #3

var
MyIniFile:TIniFile;
slTitle:TStringList;
begin
slTitle:=TStringList.Create;
MyIniFile:=TIniFile.Create('./MyPara.ini');
MyIniFile.ReadSections(slTitle);
Edit1.Text:=slTitle.Strings[0]; // 取第2个标题就用Strings[1],以此类推
MyIniFile.Destroy;
slTitle.Destroy;
end;

 

Y

ysp_1984

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-09

• #4

谢谢大家了！

 

黑

黑星星

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-05-22

• #5

问题解决了吗？怎么不结贴？

 

Y

ysp_1984

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-06-03

• #6

多人接受答案了。