From f69330e51e7da1daec7de90845a3aac04894db52 Mon Sep 17 00:00:00 2001 From: zeljko Date: Wed, 5 Oct 2011 08:30:49 +0000 Subject: [PATCH] Qt: do not pass OnChange to LCL when value is setted up for the first time under 64bit. issue #19881 git-svn-id: trunk@32698 - --- lcl/interfaces/qt/qtwidgets.pas | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lcl/interfaces/qt/qtwidgets.pas b/lcl/interfaces/qt/qtwidgets.pas index a70a81783a..1b85dd72a8 100644 --- a/lcl/interfaces/qt/qtwidgets.pas +++ b/lcl/interfaces/qt/qtwidgets.pas @@ -914,7 +914,7 @@ type TQtAbstractSpinBox = class(TQtWidget, IQtEdit) private {$ifdef CPU64 and not WIN64} - FParentShowPassed: Integer; + FParentShowPassed: PtrInt; {$endif} FEditingFinishedHook: QAbstractSpinBox_hookH; // parts @@ -8694,7 +8694,9 @@ begin if QEvent_type(Event) <> QEventPaint then begin inc(FParentShowPassed); + BeginUpdate; setValue(getValue); + EndUpdate; end; end;