我发现我的Delphi XE4程序存在一个奇怪的问题。我有一个带有一些工具按钮的工具栏。他们也有一个下拉列表。我有这样的代码:
m_View_SideColumns.Enabled := TmpOptionEnabled_View_SideColumns;
tb_View_Columns.Indeterminate := False;
tb_View_Columns.Enabled := TmpOptionEnabled_View_SideColumns;
{$IFDEF mymsDELPHI}
tb_View_Columns.EnableDropDown := TmpOptionEnabled_View_SideColumns;
{$ENDIF}
(以上只是多个类似工具按钮之一)
以上代码在更改时或应用程序空闲时以某种方式显式称为ether。
我发现有时Indeterminate
是真的......
我没有将代码设置为true,所以我认为这是在Delphi内部使用工具按钮处理我的工具栏时发生的事情......
更新#1
另外值得注意的是。我在为Windows 10添加清单支持后首次看到这个问题...所以可能是相关的,因为我已经在Windows版本上使用我的软件10年而没有注意到他的问题。
也可能是Windows 10更新发生了变化。
更新#2
似乎与单击工具栏按钮/下拉菜单和 EnableDropDown 设置有关。
如果我没有触摸EnableDropDown(将其设置为true),单击按钮时不会出现问题......