请问仁兄一个SQL难题!

wu_yongcai 2000-08-21 08:09:00
Delphi中进行数据库查询后,怎样对其返回的数据集进行控制。比如:怎样把数据集作为一个整体赋给一个数组或ComboBox框? Help Me!
...全文
766 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
meijg 2000-08-21
  • 打赏
  • 举报
回复
可以采用循环赋值试试,
....
query1.Open;//返回数据集;
query1.first;
while not query1.eof do
begin
comboboz1.items.add(query1.field[0].asstring);//向combobox里输入数据
query1.next;
end;
数组也差不多
pjy 2000-08-21
  • 打赏
  • 举报
回复
好象没有一条语句可以直接完成!
meijg 2000-08-21
  • 打赏
  • 举报
回复
可以采用循环赋值试试,
....
query1.Open;//返回数据集;
query1.first;
while not query1.eof do
begin
comboboz1.items.add(query1.field[0].asstring);//向combobox里输入数据
query1.next;
end;
数组也差不多
govy 2000-08-21
  • 打赏
  • 举报
回复
不同的控件之间不能直接整体赋值,你不能把一个TQuery控件的返回集合直接赋值给一个数组,需要程序控制进行,采用循环赋值的方式可以。如下:
for i := 0 to TQuery.recordcount-1 do
begin
TcomboBox.Items.Add(TQuery.fieldbyname(fieldname).AsString);
i := i+1;
end;
govy 2000-08-21
  • 打赏
  • 举报
回复
不同的控件之间不能直接整体赋值,你不能把一个TQuery控件的返回集合直接赋值给一个数组,需要程序控制进行,采用循环赋值的方式可以。如下:
for i := 0 to TQuery.recordcount-1 do
begin
TcomboBox.Items.Add(TQuery.fieldbyname(fieldname).AsString);
i := i+1;
end;
meijg 2000-08-21
  • 打赏
  • 举报
回复
可以采用循环赋值试试,
....
query1.Open;//返回数据集;
query1.first;
while not query1.eof do
begin
comboboz1.items.add(query1.field[0].asstring);//向combobox里输入数据
query1.next;
end;
数组也差不多
alin 2000-08-21
  • 打赏
  • 举报
回复
while DataSet.EOF do
Begin
ComboBox.Items.Add(DataSet.FiledByName('XXX').AsString;
DataSet.Next;
end;
//其它好像不行
govy 2000-08-21
  • 打赏
  • 举报
回复
不同的控件之间不能直接整体赋值,你不能把一个TQuery控件的返回集合直接赋值给一个数组,需要程序控制进行,采用循环赋值的方式可以。如下:
for i := 0 to TQuery.recordcount-1 do
begin
TcomboBox.Items.Add(TQuery.fieldbyname(fieldname).AsString);
i := i+1;
end;

5,386

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧