TCheckBox的显示属性为true时为false

Question

我正在使用C ++ Builder XE，并且TCheckBox的“显示”属性有问题。

我有一个TForm （ChannelConfigForm），其中有一个TGroupBox （AlarmsGroupBox），其中有一个TCheckBox （A4_en_Xbox）。

有时，我看不到窗体上的某些控件。

根据帮助文档：“如果组件及其父级层次结构中的所有父级的Visible属性为true，则保证显示为true。如果包含控件的父项之一的Visible属性值为false，则Showing可能为true。可以是true或false。显示是只读属性。”

为了了解发生了什么，我编写了以下函数来调试程序：（注意：该函数中的debugf只是我编写的调试语句，其作用类似于printf，后者将调试内容写入窗体）

void ShowParentTree(TControl *Control)
{
  wchar_t Name[32];
  static int level=0;
  TWinControl *wc;

  level++;
  if (level==1)
    debugf(L"Parents of control \"%s\" (%s) :",
                       Control->Name.c_str(),
                       Control->ClassName().c_str());

  // Display what Control has as parents and if they're visible and showing
  debugf(L"level %d : %s->Visible  = %s",level,
                       Control->Name.c_str(),
                       Control->Visible?L"true":L"false");
  wc=(TWinControl *)Control;
  debugf(L"level %d : %s->Showing  = %s",level,
                       wc->Name.c_str(),
                       wc->Showing?L"true":L"false");

  if (Control->Parent)
    ShowParentTree((TControl *)Control->Parent);

  level--;
}

有时当我显示ChannelConfigForm时，我得到以下信息：

Parents of control "A4_en_Xbox" (TCheckBox) :
level 1 : A4_en_Xbox->Visible  = true
level 1 : A4_en_Xbox->Showing  = false
level 2 : AlarmsGroupBox->Visible  = true
level 2 : AlarmsGroupBox->Showing  = true
level 3 : ChannelConfigForm->Visible  = true
level 3 : ChannelConfigForm->Showing  = true

我的理解是，当我认为A4_en_Xbox-> Showing属性为true时，它为false。

Answer 1

检查A4_en_Xbox->HandleAllocated()返回什么。 如果HandleAllocated()返回false，则Showing为false。 VCL不保证TWinControl派生的组件始终始终分配有HWND 。 有时，它会在内部释放HWND并在需要时重新创建它们。

另外，您的代码中有一个小的逻辑错误。 并非所有TControl后代都源自TWinControl ，但是您的代码假定输入TControl始终是TWinControl后代。 您需要进行检查，以免访问非TWinControl控件的Showing属性。 您也可以完全取消递归，只需使用简单循环即可：

void ShowParentTree(TControl *Control)
{
    if (!Control)
        return;

    int level = 0;
    TWinControl *wc = dynamic_cast<TWinControl*>(Control);

    debugf(L"Parents of control \"%s\" (%s) :",
                         Control->Name.c_str(),
                         Control->ClassName().c_str());

    // Display what Control has as parents and if they're visible and showing
    do
    {
        level++;

        if (wc)
        {
            debugf(L"level %d : %s Visible = %s, Showing = %s, HandleAllocated = %s",
                level,
                Control->Name.c_str(),
                Control->Visible ? L"true" : L"false",
                wc->Showing ? L"true" : L"false",
                wc->HandleAllocated() ? L"true" : L"false");

        }
        else
        {
            debugf(L"level %d : %s Visible = %s",
                level,
                Control->Name.c_str(),
                Control->Visible ? L"true" : L"false");
        }

        wc = Control->Parent;
        Control = wc;
    }
    while (Control);
}