Собственно, разобрался сам. Вдруг если кому-то пригодится:
Код:
DB_Query:=TStringList.Create;
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('SELECT name FROM table');
Query1.Open;
for i:=1 to Query1.RecordCount do
begin
DB_Query.Add(Query1.Fields.Fields[0].AsString);
Query1.FindNext;
end;
Вот так все просто, оказывается
