如何在TDBComboBox中显示与数据库中不同的值?

时间:2015-03-17 21:07:06

标签: delphi delphi-xe7

我的表单上有一个TDBComboBox。现在,它已连接到只能包含YN的数据库字段。

我想稍微提高一点,然后让它显示YesNo。我怎么能这样做?

1 个答案:

答案 0 :(得分:0)

我的解决方案是:

  1. 将控件(YesNoCombo)切换为TDBLookupCombobox
  2. 在“设计”视图中的表单上,创建一个包含两个字段的TClientDataSet(名为YesNoCDS)
    • DisplayValue
    • DatabaseValue
  3. 右键单击YesNoCDS并选择Create Dataset
  4. FormShow事件中附加YesNoCDS的数据(这看起来像是一个kludge,但我在设计视图中看不到这样做的方法)
  5. 在名为YesNoDS的表单上创建一个TDataSource,并将其DataSet设置为YesNoCDS
  6. 在YesNoCombo上,将ListSource设置为YesNoDS,然后将List Field设置为DisplayValue,将KeyField设置为DatabaseValue