[GB.FORM]

* BUG: Really fix the problem with ScrollArea having the Painted property
  set.


git-svn-id: svn://localhost/gambas/trunk@3932 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Benoît Minisini 2011-07-12 15:39:47 +00:00
parent 5177d66b87
commit 5b7b4e72ea

View file

@ -224,7 +224,7 @@ Public Sub DrawingArea_Draw()
Draw.Clip(hClip.X, hClip.Y, hClip.W, hClip.H)
If $bPainted Then Paint.Begin($hDrawingArea)
Raise Draw
If $bPainted Then Paint.End($hDrawingArea)
If $bPainted Then Paint.End
Draw.Clip.Enabled = False
Endif