For iCounter:=1 to MaxNumber do
Begin
VPhone:=inifile.ReadString('FreePhones',IntToStr(iCounter),'0');
……
End;
Begin
VPhone:=inifile.ReadString('FreePhones',IntToStr(iCounter),'0');
……
End;
I:Integer;For I:=1 to MaxNum do
Begin
VPhone:=inifile.ReadString('FreePhones','''' + IntToStr(I) + '''','0');
……
End;肯定行;不用怀疑,直接用吧。
~~~~~用这么多分号作什么?
救命啊