Если пользователь выбрал две кнопки с одинаковыми Caption-ами, убрать их с формы - C++ Builder - Ответ 9392756

#define WM_DELETE_FROM_SENDER   WM_USER + 1
 
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner) : TForm(Owner) {
    for (int i = 0; i < 10; i++) {
        TButton *ABtn = new TButton(this);
        ABtn->Parent = this;
        ABtn->Align = alTop;
        ABtn->Caption = "Кнопка " + UnicodeString(Random(5));
        ABtn->OnClick = &Button1Click;
    }
}
 
//---------------------------------------------------------------------------
void __fastcall TForm2::ApplicationEvents1Message(tagMSG &Msg, bool &Handled) {
    if (Msg.message == WM_DELETE_FROM_SENDER && Msg.hwnd == this->Handle) {
        TObject *AObject = (TObject*)Msg.wParam;
        AObject->Free();
    }
}
 
//---------------------------------------------------------------------------
void __fastcall TForm2::Button1Click(TObject *Sender) {
    TButton * ASelectedBtn = dynamic_cast<TButton*>(Sender);
    if (ASelectedBtn) {
        ASelectedBtn->Font->Style = ASelectedBtn->Font->Style.Contains(fsBold)
        ? ASelectedBtn->Font->Style >> fsBold : ASelectedBtn->Font->Style << fsBold;
 
        if (ASelectedBtn->Font->Style.Contains(fsBold)) {
 
            TButton *ACompareBtn = 0;
            for (int i = 0; i < this->ComponentCount; i++) {
                TButton *AButton = dynamic_cast<TButton*>(this->Components[i]);
                if (AButton && AButton->Font->Style.Contains(fsBold) && ASelectedBtn != AButton) {
                    if (ASelectedBtn->Caption == AButton->Caption) {
                        ACompareBtn = AButton;
                    }
                    else {
                        AButton->Font->Style = AButton->Font->Style >> fsBold;
                        ASelectedBtn->Font->Style = ASelectedBtn->Font->Style >> fsBold;
                    }
 
                    break;
                }
            }
            if (ACompareBtn) {
                PostMessage(this->Handle, WM_DELETE_FROM_SENDER, (int)ACompareBtn, 0);
                PostMessage(this->Handle, WM_DELETE_FROM_SENDER, (int)ASelectedBtn, 0);
            }
        }
    }
}
 
//---------------------------------------------------------------------------