Question

数据库字段存入数组

如何将数据库中一个字段对应的一列值依次存如数组中
不行啊,提示FROM 子句有问题

Answer 1

select 字段名 from 表名 into array a

Answer 2

var
i:integer;
str:array[1..20]of string;
begin
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from t_cs');
adoquery1.Open;
adoquery1.First;
i:=1;
while not adoquery1.Eof do
begin
str[i]:=adoquery1.fieldbyname('SF').asstring;
i:=i+1;
adoquery1.Next;
end;
showmessage(str[1]+str[2]+str[3]+str[4]+str[5]+str[6]+str[7]+str[8]+str[9]+str[10]+str[11]+...);
end;
//delphi写的

Answer 3

直接读取出来赋给数组