这个怎么解决??

shilydream 2002-05-25 01:08:03
我的DBComBox已经可以读出表中某个字段了,但是在运行时,下拉对话框怎么不起作用,不论我怎么选择,但是DBComBox都为空,这是怎么回事?
望高手指点!!
...全文
15 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
shilydream 2002-05-25
  • 打赏
  • 举报
回复
怎么没有人了啊,大家都不知道吗?
shilydream 2002-05-25
  • 打赏
  • 举报
回复
对了,这段代码应该在哪个事件添加?
shilydream 2002-05-25
  • 打赏
  • 举报
回复
上面的代码有错,我用的是query,然后我将代码改成:
query1.open;
//DBCombobox1.clear;(如果有这句,DBCombobox根本读不出字段)
while not eof do
begin
DBCombobox1.items.add(query1.fieldbyname('content').AsString);
next;
end;
query1.close;

但是DBCombox还是空的啊!
netlib 2002-05-25
  • 打赏
  • 举报
回复

Table1.open;
DBCombobox1.clear;
while not eof do
begin
DBCombobox1.items.add(Table1['字段名'])
next;
end;
Table1.close;
如果你用的是query,把sql数据写好,在用上面的程序table变为query就好。
shilydream 2002-05-25
  • 打赏
  • 举报
回复
请问楼上的,是什么啊,可以在说说吗?
shilydream 2002-05-25
  • 打赏
  • 举报
回复
添加事件吗?什么事件?思路是什么?
lxpbuaa 2002-05-25
  • 打赏
  • 举报
回复
要先:
Table1.Edit;


—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”或者去掉';
I.Desire := '加不加分随你';
—————————————————————————————————


       
netlib 2002-05-25
  • 打赏
  • 举报
回复
需要你自己增加。

5,388

社区成员

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

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