Question

Delphi中DBLookupComboBox1怎样实现按键后清空

控件有 DBLookupComboBox1 DataSource1 adotable1 DBLookupComboBox1的listsource是 DataSource1 的其中一个字段 DataSource1的dataset是adotable1 能正确的显示下拉菜单 但是怎样实现 按一个键后清空呢 望高手解决

Answer 1

在Button1Click事件中如果DBLookupComboBox1的keyField是integer类型DBLookupComboBox1.KeyValue:='';如是string型择 DBLookupComboBox1.KeyValue:=null;这个应该是的吧

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
begin
DBLookupComboBox1.KeyValue:='';
end;

Answer 3

adotable1.Active := false; 这样不就行了吗?