paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-13 04:20:47 +01:00
Code Issues Packages Projects Releases Wiki Activity

Qt,Qt5: show text when TComboBox is csOwnerDrawEditableFixed or csOwnerDrawEditableVariable during design time. issue #33295

Browse Source 
git-svn-id: trunk@59773 -
This commit is contained in:
zeljko 2018-12-10 09:55:50 +00:00
parent 8eded5232b
commit 02e5547687
2 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/qt/qtwidgets.pas
View File

@ -9787,6 +9787,8 @@ begin
begin begin
Result := TQtComboBox(LCLObject.Handle).InUpdate or Result := TQtComboBox(LCLObject.Handle).InUpdate or
(csDesigning in LCLObject.ComponentState); (csDesigning in LCLObject.ComponentState);
if (QEvent_type(Event) = QEventPaint) and (csDesigning in LCLObject.ComponentState) then
QObject_event(Sender, Event);
if Result then if Result then
QEvent_ignore(Event) QEvent_ignore(Event)
else else

2
lcl/interfaces/qt5/qtwidgets.pas
View File

@ -9695,6 +9695,8 @@ begin
begin begin
Result := TQtComboBox(LCLObject.Handle).InUpdate or Result := TQtComboBox(LCLObject.Handle).InUpdate or
(csDesigning in LCLObject.ComponentState); (csDesigning in LCLObject.ComponentState);
if (QEvent_type(Event) = QEventPaint) and (csDesigning in LCLObject.ComponentState) then
QObject_event(Sender, Event);
if Result then if Result then
QEvent_ignore(Event) QEvent_ignore(Event)
else else