dbLookupComboxeh 用法

1. 属性：

datasource ，datafield 显示原来数据源和字段

2.编辑时用到 listsource listfield,listfieldindex 属性

listsouce 设置显示下拉框的数据源

listfield显示字段，可以显示多个字段 用' ; '隔开。

listfieldindex 显示 第几个字段

keyfield 为实际编辑的值。

效果如下图：

 

本次还要用到的计巧：

1. 手动创建 clientdataset

  cdselec.CreateDataSet;
  cdselec.InsertRecord([1, '自营店']);
  cdselec.InsertRecord([2, '代管店']);
  cdselec.InsertRecord([3, '加盟店']);

2. clientdataset 的gettext方法

procedure TbgsxxForm.strngfldCDSelecGetText(Sender: TField;
  var Text: String; DisplayText: Boolean);
begin
  inherited;
   if  sender.asinteger=0 then
  text:='自营店'
  else  if sender.asinteger=1 then
  text:='代管店'
  else if sender.asinteger=2 then
  text:='加盟店';
end;