关于dblookupcombobox的问题

Question

我用dblookupcombox出现了问题:
(1)如何用键盘在其中的text属性中添入数据
(2)为什么选择内容总是选择不上??
(3)希望就该控件的使用提一点忠告,参与有分

Answer 1

只要不把readonly属性设为true就可以选择,也可以输入,用程序赋值也可以
dblookupcombox.text:='fff';这个控件很好用,没有什么忠告

Answer 2

Readonly必须设为false。这个控件用起来很方便的。

Answer 3

不对,老哥啊你们倒是试试看呢,,,我的readonly是设为false的,倒还是无法输入点击以后是被选择状态,也就是变蓝.

Answer 4

看一下ListSource(TDataSource)的状态，ListSource.DataSet的Active一定要为True才行。

Answer 5

DBLookupComboBox 由于必须和数据集绑定在一起使用，所以一般不允许
点击输入，其原因主要在于如果允许用户随便地输入，将会造成数据集的任
意修改，从而破坏数据的一致性。不过可以使用DBLookupCombo并且通过关闭DBLookupCombo.DataSource的
方法来实现，但输入输入完毕后要重新打开。下面的代码是根据用户在DBLookupCombo的输入动态修改Item的例子：DataSource1    DataSource2
table1         table2
bh  xm         bh
|______________|procedure TForm1.DBLookupCombo1Click(Sender: TObject);
begin
  DBLookupCombo1.DataSource := Nil;
end;procedure TForm1.DBLookupCombo1DropDown(Sender: TObject);
begin
  if trim(DBLookupCombo1.Value) = '' then begin
    DBLookupCombo1.Value := '';
    table1.Filtered := False
  end else begin
    table1.Filter := 'xm = '+QuotedStr(DBLookupCombo1.value + '*');
    table1.Filtered := True
  end;
  DBLookupCombo1.DataSource := datasource2;
  DBLookupCombo1.DataField := 'bh';
end;