diff options
author | Graeme Geldenhuys <graemeg@gmail.com> | 2010-03-16 21:41:01 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graemeg@gmail.com> | 2010-03-16 21:41:01 +0200 |
commit | fbd4bf0c305a4d086ba8c3cc650ba68437197f09 (patch) | |
tree | cecc213c9219fb77c6d6a62cb67fd8f55c7e4c55 | |
parent | bc0c83aee08846329865b8cc1bb541a37e187bfd (diff) | |
download | fpGUI-fbd4bf0c305a4d086ba8c3cc650ba68437197f09.tar.xz |
themetest: fix button state on mouseenter with button down
-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; |