请问如何设置DBGridEh 的某列显示下拉列表?
在 DBGridEh1中显示和编辑职工信息表,包括编号(bh)、姓名(xm)、籍贯(jg)、所在部门编号(bmbh),而部门编号来源于另一个数据库表格――部门表,包括部门编号(bmbh)、部门名称(bmmc)。设置了ADOQuery1 和ADOQuery2,ADOQuery1关联职工信息表,在DBGridEh1 中显示。ADOQuery2关联部门表。在DBGridEh1 的Columns属性中增加职工信息表所有字段,对所在部门编号字段返回显示相应的部门名称,并且有下拉显示。
1.设置DBGridEh要显示下拉框的列的属性如下:
设置DBGridEh1.Columns[3].FieldName=bmbh;
DBGridEh1.Columns[3].lookupdisplayfields=bmmc;
DBGridEh1.Columns[3].AlwaysShowEditButton:= True;
DBGridEh1.Columns[3].DropDownSizing:= True;
DBGridEh1.DataSource := ADOQuery1_DS;
2.对bmbh(所在部门编号)在adoquery1的Fields Editor中用New field建立Lookup字段。其中
fieldkind属性设为lookup;
keyfields属性值设为bh;
lookupdataset属性设为Adoquery2;
lookupkeyfields属性值设为bmbh;,
lookupresultfield属性值设为bmmc。
程序执行后报告“Adoquery1:Field ‘bh’not found’.
如果把keyfields属性值设为bmbh,则报告“发生未知错误”。到底应该怎么做呢?
烦请高手指教!谢谢!