delphi中的TDBLookupComboBox无法正确滚动

Question

我的TDBLookupComboBox在delphi中滚动时有一个错误。图片会更好地说明。

我的dblkComboBox中有200多个项目。当我通过单击右下拉菜单打开它时，它从中间的滚动条开始。然后，

1. 我无法使用鼠标滚动属性浏览项目。
2. 滚动条卡在中间，无论我是在第一项还是在150º项中，滚动条始终在中间。
3. 只有当我转到最后一项时，滚动条才会改变其位置，然后滚动到底部。
4. 我能够选择项目并继续使用我的应用程序，但是此错误给用户带来了非常奇怪的体验。

我将信息添加到带有以下代码的ComboBox中（尽管我认为这可能不会引起问题）

with qryUF do
begin
  Connection := dmDados.FDConnection;
  Active := False;
  SQL.Clear;
  Open('SELECT * FROM estado');
end;

dblkcbbUF.ListSource := dsUF;
dblkcbbUF.ListField := C_UF;
dblkcbbUF.KeyField := C_UF;
dblkcbbUF.KeyValue := qryUF.FieldByName(C_UF).AsVariant;

以及我的TDBLookupComboBox的一些属性

dblkcbb。

有什么方法可以通过良好的滚动使滚动条更加平滑，滚动条显示项目的真实位置？