From b25ac3724bfba2d1d4b060c2905e34a9c9109a8e Mon Sep 17 00:00:00 2001 From: Graeme Geldenhuys Date: Thu, 20 Dec 2012 12:11:34 +0000 Subject: menus: No need to call BeginDraw/EndDraw The whole HandlePaint() method is already covered by BeginDraw/EndDraw in a parent class. --- src/gui/fpg_menu.pas | 4 ---- 1 file changed, 4 deletions(-) (limited to 'src') diff --git a/src/gui/fpg_menu.pas b/src/gui/fpg_menu.pas index a3fa0d2d..8da9302f 100644 --- a/src/gui/fpg_menu.pas +++ b/src/gui/fpg_menu.pas @@ -1024,8 +1024,6 @@ procedure TfpgPopupMenu.HandlePaint; var n: integer; begin - Canvas.BeginDraw; -// inherited HandlePaint; Canvas.Clear(BackgroundColor); // Canvas.SetColor(clBlack); // Canvas.DrawRectangle(0, 0, Width, Height); // black rectangle border @@ -1033,8 +1031,6 @@ begin for n := 0 to VisibleCount-1 do DrawRow(n, n = FFocusItem); - - Canvas.EndDraw; end; procedure TfpgPopupMenu.HandleShow; -- cgit v1.2.3-70-g09d2