怎么把数据库里一个字段的值放到ListBox中?

ledalln 2001-12-19 02:24:54
我用DBListBox竟然什么也取不到?!这是什么原因?
后来我用ListBox写了程序:
for i:=0 to ADOQuery1. -1 do//不知道怎么写
begin
ListBox2.Items[i]:=ADOQuery2.Parameters[0].Value;
end;
请问我该怎么办????
...全文
85 点赞 收藏 9
写回复
9 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
stdxhwj 2001-12-19
你用dblookuplistbox就可以了,你只要设下面的listsource 和keyfield就可以了!
回复
ledalln 2001-12-19
打开了,而且我还拿着DBGrid对照,DBGrid显示的很清楚
回复
snjun 2001-12-19
adoquery有没有打开呢
回复
ledalln 2001-12-19
谢谢!可是我的DBListBox为什么不行呢?DBListBox的DataSource和DataField都设好了啊!
回复
刘志飞 2001-12-19
ListBox2.Items.Clear;
AdoQuery1.First;
While Not AdoQuery1.Eof do
begin
if AdoQuery1.FieldByName('FieldName').IsNull then
ListBox2.Items.Add(AdoQuery1.FieldByName('FieldName').AsString;
AdoQuery1.Next;
end;
回复
hymn 2001-12-19
listbox2.items.clear;
ADOQuery1.First;
while not ADOQuery1.eof do
begin
listbox2.items.add(ADOQuery2.fieldbyname('fieldname').asstring;
next;
end;
回复
xyc189 2001-12-19
listbox2.items.clear;
while not ADOQuery1.eof do
begin
listbox2.items.add(ADOQuery2.fieldbyname('fieldname').asstring;
next;
end;
回复
Liusp 2001-12-19
AdoQuery1.First;
for i:=0 to ADOQuery1.RecordCount - 1 do
begin
ListBox2.Items.Add( ADOQuery1.FieldByName('FieldName').AsStrring);
AdoQuery1.Next;
end;
回复
Liusp 2001-12-19
for i:=0 to ADOQuery1.RecordCount - 1 do
begin
ListBox2.Items.Add( ADOQuery1.FieldByName('FieldName').AsStrring);
end;
回复
相关推荐
发帖
数据库相关
创建于2007-08-02

2455

社区成员

Delphi 数据库相关
申请成为版主
帖子事件
创建了帖子
2001-12-19 02:24
社区公告
暂无公告