From af009cae73ddeb9a96908b0ec1d794f1058c6cde Mon Sep 17 00:00:00 2001
From: Ray Greenwell <ray@threerings.net>
Date: Tue, 13 Mar 2007 01:13:56 +0000
Subject: [PATCH] A container that holds a slider (that you've set up) and a
 label showing the slider value.

git-svn-id: svn+ssh://src.earth.threerings.net/nenya/trunk@165 ed5b42cb-e716-0410-a449-f6a68f950b19
---
 src/as/com/threerings/flex/LabeledSlider.as | 42 +++++++++++++++++++++
 1 file changed, 42 insertions(+)
 create mode 100644 src/as/com/threerings/flex/LabeledSlider.as

diff --git a/src/as/com/threerings/flex/LabeledSlider.as b/src/as/com/threerings/flex/LabeledSlider.as
new file mode 100644
index 00000000..a76d6bfa
--- /dev/null
+++ b/src/as/com/threerings/flex/LabeledSlider.as
@@ -0,0 +1,42 @@
+package com.threerings.flex {
+
+import mx.containers.HBox;
+
+import mx.controls.Label;
+
+import mx.controls.sliderClasses.Slider;
+
+import mx.events.SliderEvent;
+
+/**
+ * A simple component that displays a label to the left of a slider.
+ */
+public class LabeledSlider extends HBox
+{
+    /** The slider, all public and accessable. Don't fuck it up! */
+    public var slider :Slider;
+
+    /**
+     * Create a LabeledSlider holding the specified slider.
+     */
+    public function LabeledSlider (slider :Slider)
+    {
+        _label = new Label();
+        _label.text = String(slider.value);
+
+        addChild(_label);
+        this.slider = slider;
+        slider.showDataTip = false; // because we do it...
+        addChild(slider);
+
+        slider.addEventListener(SliderEvent.CHANGE, handleSliderChange, false, 0, true);
+    }
+
+    protected function handleSliderChange (event :SliderEvent) :void
+    {
+        _label.text = String(event.value);
+    }
+
+    protected var _label :Label;
+}
+}