Attached patch solves CheckBox panting issue. P.S.: CheckBox is not yet aligned correctly if corresponding row is selected.
Sandro On 19 November 2014 11:35, Juha Manninen <juha.mannine...@gmail.com> wrote: > On Wed, Nov 19, 2014 at 10:30 AM, Sandro Cumerlato > <sandro.cumerl...@gmail.com> wrote: > > Painting is not working properly under Windows. Look at the attachments. > > Pease try commenting out the code I added in r46885. For me it makes > no difference but I don't see the redraw errors either. > You can try other experiments around that code, too. > > There were serious redraw problems earlier but I thought I solved them > by using AutoSize instead of SetBounds for CheckBox in r468850. > See also issue: > http://bugs.freepascal.org/view.php?id=22347 > > BTW, did you notice a slowdown after my component palette changes? > > Juha > > -- > _______________________________________________ > Lazarus mailing list > Lazarus@lists.lazarus.freepascal.org > http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus >
Index: components/ideintf/objectinspector.pp =================================================================== --- components/ideintf/objectinspector.pp (revisione 46885) +++ components/ideintf/objectinspector.pp (copia locale) @@ -2632,9 +2632,6 @@ begin FCurrentEdit.Top := EditCompRect.Top; FCurrentEdit.Left := EditCompRect.Left; - // For testing: Try to prevent redraw errors in some Windows machines. - //Canvas.Brush.Color := FBackgroundColor; - //Canvas.FillRect(EditCompRect); end else FCurrentEdit.BoundsRect:=EditCompRect; @@ -2673,9 +2670,6 @@ begin if Assigned(FCurrentButton) and (FCurrentButton.Visible) then Dec(FullRect.Right, FCurrentButton.Width); - - if Assigned(FCurrentEdit) and (FCurrentEdit.Visible) then - Dec(FullRect.Right, FCurrentEdit.Width); end; end;
-- _______________________________________________ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus