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 | |
| parent | 9034b9f6f7208fe5d5fd40041b6a38adc8ee66b0 (diff) | |
| download | fpGUI-5d2ea9fdea953113f64f83c8f408b1848166fae0.tar.xz | |
customstyle demo: minor style fix for menus.
Diffstat (limited to 'examples')
| -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; |