编程问题,delphi读列表的问题

来源:百度知道 编辑:UC知道 时间:2024/06/07 12:15:44
[SELphi]
A=123|123|456|789
B=123|123|456|789
C=123|123|456|789
D=123|123|456|789
....
上面的这段列表,A,B,C,D,....:sting;
都是可以自定义的类型,也就是说A,B,C,D可以是‘收费列表’也可以是‘123465’,我想请教的,我想把A,B,C,D分别加到listbox1的itms里。然后选择其中之一,可以读取他们分别对应的,请教这个程序应该怎么写?
我是新手,望大家赐教!谢谢,

uses
inifiles;

var
ini:TIniFile;
begin
{
[节点]
a=123
b=123
c=123
这样的形式
}
ini:=TIniFile.Create('ini文件名');
ini.ReadSection('节点',listbox.items); //listbox里面就显示了a,b,c节点下面的选项.
// 然后你在listbox的click事件里面写上
if listbox.itemindex>=0 then
begin
edit1.text:=Ini.readstring('节点',listbox.items[lstbox.itemindex],'默认值');
end;

你说的是配置文件的问题。
你可以查查相关DELPHI读取配置文件的相关知识。