定义数组
var
arr: array of string;
遍历结果集
with DataModule2.ADODataSet1 do
begin
setlength(arr, recordcount);// 动态数组设定长度
first;
while not eof do
begin
arr[recno - 1] := FieldByName('Username').AsStringl; // 数组赋值
next;
end;
end;
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024