点击DBCombobox的下拉列表中的一项，DBEdit中绑定的字段数据也随之变化，怎么实现

点击DBCombobox的下拉列表中的一项，DBEdit中绑定的字段数据也随之变化，如何实现？
点击DBCombobox的下拉列表中的一项，DBEdit中绑定的字段数据也随之变化，如何实现？
如下图：

-------------------
日期            号码
2012/6/12      2145377WK
2012/8/18      2145321WS
2013/2/19      3345375WK
1013/5/16      1147372WT
2013/7/11      6142960WP

Access数据库“号码”字段绑定在DBCombobox控件上，数据库“日期”绑定在DBEdit控件上。当点击Combobox下拉中的3345375WK，Edit控件上自动显示为2013/2/19。

请问大侠如何实现？
------解决方案--------------------
在Combo控件的Change事件下写下如下代码：
dbedit1.Text:=qry1.fieldbyname('日期').AsString;
一句代码就可以了。