combobox的用法(100分)

L

liuu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-12

• #1

我想用一个combobox，将一个表中所有记录某一字段的值，作为
combobox的下拉选项，而字段的值及字段值的个数是变化的，这样能
否实现？怎样实现？用标准控件行吗？怎么设置？若要用自定义控件，
那里能下载，怎么定义？

 

M

mech

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-12

• #2

用TDBLOOKUPCOMBOBOX可以实现。
如果用COMBOBOX，必须编程。

 

L

liuchuanbo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-12

• #3

procedure table1.afterrefresh;
var i:integer;
begin
table1.first;
combobox1.text:=table1.fieldbyname(field1name).asstring;
table1.first;
for i:=0 to table1.recordcount-1do
combobox1.items.add(table1.fieldbyname(field1name).asstring);
end;

不知道是不是你的意思

 

王

王亮

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-12

• #4

别太懒，这是基本操作。

 

L

liuchuanbo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-12

• #5

不好意思，错了点
procedure table1.afterrefresh;
begin
table1.first;
combobox1.text:=table1.fieldbyname(field1name).asstring;
table1.first;
while not table1.eofdo
begin
combobox1.items.add(table1.fieldbyname(field1name).asstring);
table1.next;
end;
end;

不知道是不是你的意思

 

千

千中元

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-12

• #6

我问了个类似的问题，答的很详细，你看下吧。

 

A

Athlon Chen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-13

• #7

可以用TDBLookupComboBox,将listDataset和listfield属性设一下就行了

 

L

liuu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-13

• #8

多人接受答案了。