100分(100分)

古

古惑狼

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-09

• #1

关于TDBComboBox
我的数据库中,有张student表.表中"学生班级"字段有许多值,问?
如何将这些不同的值取出,添加在TDBComboBox的下拉框中?
小生愚沌,还望诸位大虾执教!

 

S

snjat

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-09

• #2

TDBComboBox.items.add();
做个循环就行了

 

L

langzizheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-09

• #3

select distinct 学生班级 from student表 where ...

 

L

lanbing1400

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-09

• #4

student.first;
while not student.eof do
begin
TDBComboBox.items.add(student.fieldbyname('学生班级').asstring);
student.next;
end;

 

D

dae

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-09

• #5

把TDBComboBox属性设成lookup字段

 

卡

卡色

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-09

• #6

设置好DataSource和DataField就行了；

 

D

delphiandoracle

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #7

同意lanbing1400

 

S

sgs125

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #8

好像只能用lanbing1400的方法

 

C

chinaluo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #9

不就是用
select distinct 学生班级 from student表 where>>>>>
然后，用一个循环不就搞定了，
student.first;
while not student.eof do
begin
TDBComboBox.items.add(student.fieldbyname('学生班级').asstring);
student.next;
end;

 

Y

y2ky2k

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #10

楼上说得对呀。。。

 

N

nicklung

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-12

• #11

不需要用循环的！
select distinct 学生班级 from student表 where>>>>>

直接把 DBComboBox1的datasource设置到上面查询的数据集，就行了

 

S

shbjkl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-12

• #12

up
最好再refresh一下

 

银

银雨辰

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-12

• #13

query1.close;
query1.sql.clear;
query1.databasename := student.DatabaseName;
query1.sql.add('Select 学生班级 From student' Where 学生班级 <> '0' Group by 学生班级');
query1.Prepare;
query1.Open;
// 以上避免 '学生班级' 重复出现
完成下面设置（动态的，即在运行过程中设置）
DataSource1.DataSet := query1;（也可以在设计时设置）
DBComboBox1.DataSource := DataSource1;（也可以在设计时设置）
DBComboBox1.DataField := 学生班级;

你也可以直接使用ComboBox控件：
query1.first;
while not query1.eof do
begin
ComboBox.items.add(query1.fieldbyname('学生班级').asstring);
query1.next;
end;