summaryrefslogtreecommitdiff
path: root/prototypes/fpgui2
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graemeg@gmail.com>2010-03-16 21:41:01 +0200
committerGraeme Geldenhuys <graemeg@gmail.com>2010-03-16 21:41:01 +0200
commitfbd4bf0c305a4d086ba8c3cc650ba68437197f09 (patch)
treececc213c9219fb77c6d6a62cb67fd8f55c7e4c55 /prototypes/fpgui2
parentbc0c83aee08846329865b8cc1bb541a37e187bfd (diff)
downloadfpGUI-fbd4bf0c305a4d086ba8c3cc650ba68437197f09.tar.xz
themetest: fix button state on mouseenter with button down
Diffstat (limited to 'prototypes/fpgui2')
-rw-r--r--prototypes/fpgui2/tests/themetest.lpr5
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;