会用ado的帮忙看一下,谢谢!

ZGJDCSDN 2003-09-30 09:54:55
for i:=1 to ADOQuery1.RecordCount do
combobox1.Items.Add(ADOQuery1.Fields[0].AsString);

我想把查到的那个字段对应的几条记录都加到combobx1的下拉列表中来,不成功,把第一个记录重复了adoquery1.recordcount次,所以我写的肯定是错的,请哥哥们指教哈!
...全文
30 14 打赏 收藏 转发到动态 举报
写回复
用AI写文章
14 条回复
切换为时间正序
请发表友善的回复…
发表回复
Shiyl 2003-09-30
  • 打赏
  • 举报
回复
都说了揭贴
hiflower 2003-09-30
  • 打赏
  • 举报
回复
楼上正解
Heyongfeng 2003-09-30
  • 打赏
  • 举报
回复
with adoquery1 do begin
first;
while not(eof) do
begin
combobox1.Items.Add(Fields[0].AsString);
next;
end;
end;
建议不要用recordcount,用EOF的方法好。
jixinfa 2003-09-30
  • 打赏
  • 举报
回复
for i:=1 to ADOQuery1.RecordCount do
combobox1.Items.Add(ADOQuery1.Fields[0].AsString);

这种写法ADOQuery1的记录指针是不会移动的,所以会出现ADOQuery1.RecordCount个重复记录.
用foxyy8888(面向Money编程)的方法就可以了!
sailer_shi 2003-09-30
  • 打赏
  • 举报
回复
procedure TFrm_InMZSF.CBB_YFNameDropDown(Sender: TObject);
var
s: string;
begin
CBB_YFName.Items.Clear;
with DM.ADOQuery_YK do
begin
close;
open;
First;
while Not Eof do
begin
s := FieldByName('Cangk_Mc').AsString;
CBB_YFname.Items.Add(s);
next;
end;
end;
end;
thebest123 2003-09-30
  • 打赏
  • 举报
回复
同意foxyy8888(面向Money编程),我们公司也都用这种方法判断的!
OO_is_just_P 2003-09-30
  • 打赏
  • 举报
回复
adoquery1.first;
while not ADOQuery1.eof do
BEGIN
combobox1.Items.Add(ADOQuery1.Fields[0].AsString);
ADOQuery1.NEXT;
END;

最好用这种方法。
cjfzy 2003-09-30
  • 打赏
  • 举报
回复
ADOQuery1.first;
for i:=1 to ADOQuery1.RecordCount do
begin
combobox1.Items.Add(ADOQuery1.Fields[0].AsString);
ADOQuery1.next;
end;
IORILI 2003-09-30
  • 打赏
  • 举报
回复
adoquery1.first;
for i:=1 to ADOQuery1.RecordCount do
BEGIN
combobox1.Items.Add(ADOQuery1.Fields[0].AsString);
adoquery1.next;
END;

或者
adoquery1.first;
while not ADOQuery1.eof do
BEGIN
combobox1.Items.Add(ADOQuery1.Fields[0].AsString);
ADOQuery1.NEXT;
END;
neilwq 2003-09-30
  • 打赏
  • 举报
回复
for i:=1 to ADOQuery1.RecordCount do
BEGIN
combobox1.Items.Add(ADOQuery1.Fields[0].AsString);
ADOQuery1.NEXT;
END;
haike_911 2003-09-30
  • 打赏
  • 举报
回复
ADOQuery1.recordCount-1
lfzyh 2003-09-30
  • 打赏
  • 举报
回复
我也up一下!!!
guge 2003-09-30
  • 打赏
  • 举报
回复
up 一下
S.F. 2003-09-30
  • 打赏
  • 举报
回复
用while 是最好的 。。。
另外,想这样的Combobox 最好是用数据敏感的最方便

5,379

社区成员

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

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