各位大侠看过来，INI文件关键字的过滤读取，如何操作？

Question

for i:=0 to ItemList.Count-1 do
  if FileIni.ReadString('waste',ItemList[i],'')='1' then
  begin
    NewColumn:=Columns.Add;
    ...
  end;

Answer 1

将所有的记录都读到一TStrings中后，
for i:=0 to ItemList.Count-1 do
begin
  if ReadBoolean('waste',ItemList.Strings[i],False) then
  加上

Answer 2

将所有的记录都读到一TStrings中后，
for i:=0 to ItemList.Count-1 do
begin
  if ReadBoolean('waste',ItemList.Strings[i],False) then
  begin
    NewColumn:=Columns.Add;
    NewColumn.AutoSize:=True;
    NewColumn.Caption:=ItemList.Strings[i];
   ...