可以采用循环赋值试试,
....
query1.Open;//返回数据集;
query1.first;
while not query1.eof do
begin
comboboz1.items.add(query1.field[0].asstring);//向combobox里输入数据
query1.next;
end;
数组也差不多
可以采用循环赋值试试,
....
query1.Open;//返回数据集;
query1.first;
while not query1.eof do
begin
comboboz1.items.add(query1.field[0].asstring);//向combobox里输入数据
query1.next;
end;
数组也差不多
不同的控件之间不能直接整体赋值,你不能把一个TQuery控件的返回集合直接赋值给一个数组,需要程序控制进行,采用循环赋值的方式可以。如下:
for i := 0 to TQuery.recordcount-1 do
begin
TcomboBox.Items.Add(TQuery.fieldbyname(fieldname).AsString);
i := i+1;
end;
不同的控件之间不能直接整体赋值,你不能把一个TQuery控件的返回集合直接赋值给一个数组,需要程序控制进行,采用循环赋值的方式可以。如下:
for i := 0 to TQuery.recordcount-1 do
begin
TcomboBox.Items.Add(TQuery.fieldbyname(fieldname).AsString);
i := i+1;
end;
可以采用循环赋值试试,
....
query1.Open;//返回数据集;
query1.first;
while not query1.eof do
begin
comboboz1.items.add(query1.field[0].asstring);//向combobox里输入数据
query1.next;
end;
数组也差不多
不同的控件之间不能直接整体赋值,你不能把一个TQuery控件的返回集合直接赋值给一个数组,需要程序控制进行,采用循环赋值的方式可以。如下:
for i := 0 to TQuery.recordcount-1 do
begin
TcomboBox.Items.Add(TQuery.fieldbyname(fieldname).AsString);
i := i+1;
end;