关于dbcombobox组件

welyngj 2005-04-05 07:43:21
1。如何使得dbcombobox上选的内容不会点击窗题的其他地方不会改变?
2。如何使的dbcombobox上的初始值是表的字段的值?我的怎么会是空的呢?
我的代码是这样的
while not oraquery1.Eof do
begin
bsskindbComboBox1.Items.Add(oraquery1.FieldByName('table_name').AsString);
oraquery1.Next;
end;
...全文
132 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
dongliu 2005-04-06
  • 打赏
  • 举报
回复
DbComboBox.datafield:='name';
yiyideyi 2005-04-06
  • 打赏
  • 举报
回复
//不知道为什么每次设置了dbcombobox1.ItemIndex:=0
//一运行又变为dbcombobox1.ItemIndex:=-1

TDBComboBox默认的的ItemIndex是等于-1的,表示还没有选择任何选项。
dbcombobox1.ItemIndex:=0默认显示第一条记录,
如果ItemIndex=-1则说明该表没有记录。


Heyongfeng 2005-04-06
  • 打赏
  • 举报
回复
不能用dbcombobox1.ItemIndex:=0
要用字段赋值query1.fieldbyname('dbcombobox1关联的字段名').asstring:='值';
invadeoxford 2005-04-05
  • 打赏
  • 举报
回复
ItemIndex是列表指针
invadeoxford 2005-04-05
  • 打赏
  • 举报
回复
首先要初始化啊,在窗体创立的时候先给它附值,在oncreate事件里初始化。
要使dbcombobox上的初始值可以设置dbcombobox1.ItemIndex:=0,0是表里的第一个元素,可以换其他,依次累加
caiso 2005-04-05
  • 打赏
  • 举报
回复
顶一下
xjp6688 2005-04-05
  • 打赏
  • 举报
回复
while not oraquery1.Eof do
begin
bsskindbComboBox1.Items.Add(oraquery1.FieldByName('filed_name').AsString);
oraquery1.Next;
end;
welyngj 2005-04-05
  • 打赏
  • 举报
回复
不知道为什么每次设置了dbcombobox1.ItemIndex:=0
一运行又变为dbcombobox1.ItemIndex:=-1

5,402

社区成员

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

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