diff options
author | Graeme Geldenhuys <graemeg@gmail.com> | 2010-08-29 20:23:10 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graemeg@gmail.com> | 2010-08-29 20:23:10 +0200 |
commit | 5d2ea9fdea953113f64f83c8f408b1848166fae0 (patch) | |
tree | cf755f24fc7bfc8819ec423d97836649bbf15ceb /examples/gui/customstyles | |
parent | 9034b9f6f7208fe5d5fd40041b6a38adc8ee66b0 (diff) | |
download | fpGUI-5d2ea9fdea953113f64f83c8f408b1848166fae0.tar.xz |
customstyle demo: minor style fix for menus.
Diffstat (limited to 'examples/gui/customstyles')
-rw-r--r-- | examples/gui/customstyles/mystyle.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/gui/customstyles/mystyle.pas b/examples/gui/customstyles/mystyle.pas index d96e8284..5f95506c 100644 --- a/examples/gui/customstyles/mystyle.pas +++ b/examples/gui/customstyles/mystyle.pas @@ -120,7 +120,7 @@ end; procedure TMyStyle.DrawMenuRow(ACanvas: TfpgCanvas; r: TfpgRect; AFlags: TfpgMenuItemFlags); begin inherited DrawMenuRow(ACanvas, r, AFlags); - if mifSelected in AFlags then + if (mifSelected in AFlags) and not (mifSeparator in AFlags) then ACanvas.GradientFill(r, TfpgColor($fec475), TfpgColor($fb9d24), gdVertical); end; |