delphi - 从adoquery获取数据到字符串列表

好的，我有一个查询，应该返回所有问题编号。我想要的是获取返回的每个发行号并将其添加到字符串列表中。

ADOQuery1.SQL.Clear;
SQLQuery := 'SELECT issue FROM Comics WHERE SeriesName = '+Quotedstr(SeriesName)+' AND Volume = '+quotedstr(VolumeNumber);

ADOQuery1.SQL.Add(SQLQuery);
ADOQuery1.Active := true;

因此，一旦获得此信息，将结果放入字符串列表的最佳方法是什么。我试过使用ADOQuery1.GetFieldList(issuelist,'issue');，但是想要一个tlist而不是tstringlist不确定这是否真的很重要或者我是否做对了。

最佳答案

您不想使用GetFieldList。这将返回数据集中字段对象的列表。您需要执行以下操作：

ADOQuery1.Open;
ADOQuery1.First;
while not ADOQuery1.Eof do
begin
  issuelist.Add(ADOQuery1.FieldByName('issue').AsString);
  ADOQuery1.Next;
end;