能不能把数据表的记录全部(有上百个字段)递归放在TStrings中(或数组中，或记录中)，并能查录字符串是否在其中，那个会更好点，

Question

能不能把数据表的记录全部(有上百个字段)递归放在TStrings中(或数组中，或记录中)，并能查录字符串是否在其中，那个会更好点，怎么做？？？

Answer 1

问题已解了大半，用TStringlist，现在有个问题，现在不知怎么把一条数据记录递归到TStringlist中，
var
abc: TStringlist;
i:integer;
begin
  abc:=TStringlist.Create;
  abc.Add('')//怎样递归一条数据记录到里面去。
end

Answer 2

Anylib推出新版本，自由界面和报表的完美组合！
http://www.anylib.com

Answer 3

while not adoquery1.eof do
begin
    abc.Add(adoQuery1.fieldByName('name').asString);
end

Answer 4

这样：
    for I := 0 to ADOQuery1.FieldCount - 1 do //循环增加一条记录的所有字段的数据
    begin
      abc.Add(ADOQuery1.Fields[I].AsString;)
    end;