我写的有问题吗？急，在线等待(50分)

3

3368aa

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-23

• #1

我想得到一INI文件中某小节的全部内容，不包括关键字
请看

procedure TForm1.FormCreate(Sender: TObject);
var
i,j:integer;
s:string;
begin
myini:=tinifile.Create('h:/ok.ini');
try
myini.ReadSectionValues('gw',combobox1.items);
finally
myini.Destroy;
end;
for i:=0 to combobox1.items.count-1 do
begin
s:=combobox1.items.strings;
j:=pos('=',s);
delete(s,0,j);
end;

end;

end.

但结果没有改变，为什么？
急!!!

 

P

Pipi.

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-23

• #2

1、delete(s,0,j);不对，应该是 delete(s,1,j);
2、 delete(s,1,j)
之后还要写回去：combobox1.items.strings:=s;

 

T

tan_jian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-23

• #3

你又没有回写，什么没改变啊！你的s拿来干什么用了，没明白你的意思！

 

迷

迷侠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-23

• #4

同意pipi的看法。

 

B

beta

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-25

• #5

又让大皮抢先了：（

 

B

beyondair

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-25

• #6

再加一句：combobox1.ItemIndex:=0;

 

3

3368aa

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-03

• #7

多人接受答案了。