From: Marcel B. <jed...@us...> - 2002-12-25 10:53:45
|
Update of /cvsroot/jvcl/jvcl/source In directory sc8-pr-cvs1:/tmp/cvs-serv23587/jvcl/source Modified Files: JvInspector.pas Log Message: Mantis 558 and 559. Index: JvInspector.pas =================================================================== RCS file: /cvsroot/jvcl/jvcl/source/JvInspector.pas,v retrieving revision 1.24 retrieving revision 1.25 diff -C2 -d -r1.24 -r1.25 *** JvInspector.pas 13 Dec 2002 20:20:27 -0000 1.24 --- JvInspector.pas 25 Dec 2002 10:53:42 -0000 1.25 *************** *** 2288,2292 **** RebuildVisible; UpdateScrollbars; ! end; end else --- 2288,2294 ---- RebuildVisible; UpdateScrollbars; ! end ! else ! NeedRebuild := True; end else *************** *** 2618,2621 **** --- 2620,2625 ---- if Painter <> nil then begin + if NeedRebuild then + InvalidateList; IncPaintGeneration; Painter.Setup(Canvas); *************** *** 2667,2670 **** --- 2671,2675 ---- SelectedIndex := FVisible.IndexOfObject(OldSel); CalcImageHeight; + NeedRebuild := False; end; *************** *** 4786,4791 **** begin DoValueChanged; if Inspector <> nil then ! Inspector.DoItemValueChanged(Self); end; --- 4791,4798 ---- begin DoValueChanged; + { Removed: InvalidateValue will be called from the data instance which will already notify + each inspector involved once. if Inspector <> nil then ! Inspector.DoItemValueChanged(Self); } end; |