WndProc, сообщения приходят по несколько раз

            virtual void WndProc(Message% m) override
            {
                switch (m.Msg)
                {
                    case WM_DEVICECHANGE:
                    {
                        switch (m.WParam.ToInt64())
                        {
                            case DBT_DEVICEARRIVAL:
                            {
                                PDEV_BROADCAST_HDR phdr = (PDEV_BROADCAST_HDR)m.LParam.ToInt64();
                                if (phdr->dbch_devicetype == DBT_DEVTYP_DEVICEINTERFACE)
                                {
                                    PDEV_BROADCAST_DEVICEINTERFACE pbd = (PDEV_BROADCAST_DEVICEINTERFACE)phdr;
                                    this->richTextBox1->Text += msclr::interop::marshal_as<String^>(pbd->dbcc_name);
                                    Sleep(500);
                                    
                                }
                                break;
                            }
                            case DBT_DEVICEREMOVECOMPLETE:
                                MessageBox::Show("Remove");
                            default:
                                break;
                        }
                        break;
                    }
            
                    default:
                        break;
                }
                Form::WndProc(m);
            }