c++ - C++ Builder 派生的 TComboBox 默认具有 Items

Question

这里是VCL组件新手，如果这是一个愚蠢的问题，请原谅我......

我正在尝试制作一个包含默认项目的 TComboBox 组件，然后将其拖放到表单上，即一个 TMonthComboBox，当拖放到表单上时，它将在其项目列表中包含月份列表。

我发现，如果我尝试在表单上删除此类组合框，则在构造期间尝试访问 Items 属性将导致“控件”没有父窗口“错误。

这是构造函数的（部分）：

__fastcall TMonthCombo::TMonthCombo(TComponent *Owner):TComboBox(Owner)
{
    this->Style = csDropDownList; // this is okay
    this->Items->Add("January"); // This is causing problem
}

我认为问题源于 Items 属性在构造的此时尚不可用的事实。

无论如何要确保组件已准备好在组件源代码本身内将值接受到其 Items 属性中（即在设计时不在属性编辑器中添加列表项）？

在有人告诉我“只需在运行时添加应用程序代码中的项目”之前，我必须解释一下，这个 ComboBox 将在很多地方非常频繁地使用，而月份选择只是我用来解释问题的一个简单示例，我想放在 ComboBox 中的实际值更加多样化，而且大多数时候都是动态的。它还必须以各种方式响应用户的选择。

我已经尝试过运行时的方式，但它变得非常乏味。这就是我将它制作成一个组件的原因，这样它就可以自行处理，而无需我重复输入多个版本的代码来填充组合框。

谢谢你的帮助。

编辑：在尝试了 manlio 的解决方案后，ComboBox 在运行时看起来很奇怪：

ComboBox 在运行时具有双图像。我做错了什么？

__fastcall TYearCombo::TYearCombo(TComponent* Owner) : TComboBox(Owner), init_items(true)
{

}
//---------------------------------------------------------------------------
void __fastcall TYearCombo::CreateWnd()
{
    unsigned short yr, mn, dy;

    this->Width = 90;
    this->Style = csDropDownList;
    this->DropDownCount = 11;
    TDate d = Today();
    d.DecodeDate(&yr, &mn, &dy);
    year = yr;

    if (init_items)
    {
        init_items = false;
        TComboBox::CreateWnd();
        Items->BeginUpdate();
        for(int i=year-5; i<=year+5; i++)
        {
            Items->Add(IntToStr(i));
        }
        this->ItemIndex = 5;
        Items->EndUpdate();
    }
}
//---------------------------------------------------------------------------

score -1 · Accepted Answer

你可以试试这个：

覆盖CreateWnd虚拟方法并添加init_items私有数据成员：

class TMonthCombo : public TComboBox
{
// ...

protected:
  virtual void __fastcall CreateWnd();

private:
  bool init_items;

// ...
};

设置init_items标志：

TMonthCombo::TMonthCombo(TComponent *Owner) : TComboBox(Owner),
                                              init_items(true)
{
  // ...
}

在里面CreateWnd你可以添加新项目：

void __fastcall TMonthCombo::CreateWnd()
{
  TComboBox::CreateWnd();

  if (init_items)
  {
    init_items = false;
    Items->BeginUpdate();
    Items->Add("January");
    // ...
    Items->EndUpdate();
  }
}

进一步说明：

Create ComboBox 中的“控件没有父级”（TComboBox需要分配HWND才能将字符串存储在其Items属性中）。
简单地将构造函数的Owner参数转换为TWinControl并将结果分配给组件的Parent属性不是解决方案：
```
TMonthCombo::TMonthCombo(TComponent *Owner) : TComBoBox(Owner)
{
  Parent = static_cast<TWinControl *>(Owner);
  // ...
}
```
该分配解决了“控件没有父窗口错误”，但产生了另一个问题：表单始终是组件的父级（您不能将表单添加到不同的容器）。

c++ - C++ Builder 派生的 TComboBox 默认具有 Items

1 回答 1

Related

Reference