delphi - 如何允许在 TDBLookupComboBox 中选择 NULL 值？

Question

我有一个 TDBLookupComboBox，显示 fkLookup 类型的 TStringField，它允许 Null 值(来自可为空的值)整数数据库列)。

下拉列表显示分配的 LookupDataSet 中的项目，该项目来自联接表。如果该字段为Null，则不会显示任何列表项，组合框为空。如果该字段有值，则会显示正确的描述。

我可以通过按分配的 NullValueKey 将其重置为 Null。

没关系，但用户更喜欢使用鼠标。所以我可以提供一个清晰的按钮，但我认为在列表顶部添加一行会更好。我怎样才能做到这一点？

Answer 1

您可以将空行放入查询中，如果需要对其进行排序，可以使其显示在列表的顶部，如下所示:

select 0 as sort,
       convert(int, null) as UserID,
       'Clear' as Name
union all
select 1 as sort,
       u.UserID,
       u.Name
from   tblUser u
order by sort, Name

排序列将使其显示在顶部，之后您可以根据需要进行排序。