diff --git a/lcl/interfaces/qt/qtwidgets.pas b/lcl/interfaces/qt/qtwidgets.pas index a35b628ae8..375adb7eb0 100644 --- a/lcl/interfaces/qt/qtwidgets.pas +++ b/lcl/interfaces/qt/qtwidgets.pas @@ -9787,6 +9787,8 @@ begin begin Result := TQtComboBox(LCLObject.Handle).InUpdate or (csDesigning in LCLObject.ComponentState); + if (QEvent_type(Event) = QEventPaint) and (csDesigning in LCLObject.ComponentState) then + QObject_event(Sender, Event); if Result then QEvent_ignore(Event) else diff --git a/lcl/interfaces/qt5/qtwidgets.pas b/lcl/interfaces/qt5/qtwidgets.pas index f3838fcfcd..bb25da0069 100644 --- a/lcl/interfaces/qt5/qtwidgets.pas +++ b/lcl/interfaces/qt5/qtwidgets.pas @@ -9695,6 +9695,8 @@ begin begin Result := TQtComboBox(LCLObject.Handle).InUpdate or (csDesigning in LCLObject.ComponentState); + if (QEvent_type(Event) = QEventPaint) and (csDesigning in LCLObject.ComponentState) then + QObject_event(Sender, Event); if Result then QEvent_ignore(Event) else