有个小程序 我想实现这样的功能~1。读个文件,文件内容如下“...”代表省略ALIST
曹操 cc
刘备 lb
...
BLIST
无懈可击 wxkj
南蛮入侵 nmrq
...2。把这个文件的ALIST内容读到一个 checklistBox中,把BLIST读取到一个CombList中如何实现呢,嘿嘿,我刚学delphi没多久~~ 希望大家指点一下关键的地方和注意的地方,最好贴伪代码~~
曹操 cc
刘备 lb
...
BLIST
无懈可击 wxkj
南蛮入侵 nmrq
...2。把这个文件的ALIST内容读到一个 checklistBox中,把BLIST读取到一个CombList中如何实现呢,嘿嘿,我刚学delphi没多久~~ 希望大家指点一下关键的地方和注意的地方,最好贴伪代码~~
var
list:TStringList;
i,j:Integer;
begin
j := 1;
list := TStringList.Create;
list.LoadFromFile('c:\1.txt');
for i := 0 to list.Count - 1 do
begin
if list.Strings[i] = 'BLIST' then
j := 2;
if (j = 1) and (list.Strings[i]<>'ALIST') and (list.Strings[i]<>'') then
begin
CheckListBox1.Items.Add(list.Strings[i]);
end
else if (j=2) and (list.Strings[i]<>'BLIST') and (list.Strings[i]<>'') then
begin
ComboBox1.Items.Add(list.Strings[i]);
end;
end;
list.Free;
end;
[ALIST]
曹操 cc
刘备 lb
...
[BLIST]
无懈可击 wxkj
南蛮入侵 nmrq
...
就可以按ini方式处理,可以使用Tmeminifile类