diff options
| -rw-r--r-- | prototypes/fpgui2/tests/themetest.lpr | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/prototypes/fpgui2/tests/themetest.lpr b/prototypes/fpgui2/tests/themetest.lpr index 82761806..60cb95f4 100644 --- a/prototypes/fpgui2/tests/themetest.lpr +++ b/prototypes/fpgui2/tests/themetest.lpr @@ -562,7 +562,10 @@ begin inherited HandleMouseEnter; if Enabled then begin - State := 1; + if not FDown then + State := 1 + else + State := 2; Repaint; end; end; |