| 7 | #include "Lua/JuceClasses/LLookAndFeel.h" |
| 8 | |
| 9 | CtrlrSlider::CtrlrSlider (CtrlrModulator &owner) |
| 10 | : CtrlrComponent(owner), |
| 11 | lf(*this, componentTree), |
| 12 | ctrlrSlider (*this) |
| 13 | { |
| 14 | setColour (TooltipWindow::textColourId, Colours::red); |
| 15 | addAndMakeVisible (&ctrlrSlider); |
| 16 | |
| 17 | ctrlrSlider.setRange (1, 127, 1); |
| 18 | ctrlrSlider.setSliderStyle (Slider::RotaryVerticalDrag); |
| 19 | ctrlrSlider.setTextBoxStyle (Slider::TextBoxBelow, false, 64, 12); |
| 20 | ctrlrSlider.addListener (this); |
| 21 | ctrlrSlider.setLookAndFeel (&lf); |
| 22 | componentTree.addListener (this); |
| 23 | |
| 24 | setProperty (Ids::uiSliderStyle, "RotaryVerticalDrag"); |
| 25 | setProperty (Ids::uiSliderMin, 0); |
| 26 | setProperty (Ids::uiSliderMax, 127); |
| 27 | setProperty (Ids::uiSliderInterval, 1); |
| 28 | setProperty (Ids::uiSliderDoubleClickEnabled, true); |
| 29 | setProperty (Ids::uiSliderDoubleClickValue, 0); |
| 30 | setProperty (Ids::uiSliderValuePosition, (int)Slider::TextBoxBelow); |
| 31 | setProperty (Ids::uiSliderValueHeight, 12); |
| 32 | setProperty (Ids::uiSliderValueWidth, 64); |
| 33 | setProperty (Ids::uiSliderTrackCornerSize, 5); |
| 34 | setProperty (Ids::uiSliderThumbCornerSize, 3); |
| 35 | setProperty (Ids::uiSliderThumbWidth, 0); |
| 36 | setProperty (Ids::uiSliderThumbHeight, 0); |
| 37 | setProperty (Ids::uiSliderThumbFlatOnLeft, false); |
| 38 | setProperty (Ids::uiSliderThumbFlatOnRight, false); |
| 39 | setProperty (Ids::uiSliderThumbFlatOnTop, false); |
| 40 | setProperty (Ids::uiSliderThumbFlatOnBottom, false); |
| 41 | setProperty (Ids::uiSliderValueTextColour, "0xff000000"); |
| 42 | setProperty (Ids::uiSliderValueBgColour, "0xffffffff"); |
| 43 | setProperty (Ids::uiSliderRotaryOutlineColour, "0xff0000ff"); |
| 44 | setProperty (Ids::uiSliderRotaryFillColour, "0xff0000ff"); |
| 45 | setProperty (Ids::uiSliderThumbColour, "0xffff0000"); |
| 46 | setProperty (Ids::uiSliderValueHighlightColour, "0xff0000ff"); |
| 47 | setProperty (Ids::uiSliderValueOutlineColour, "0xffffffff"); |
| 48 | setProperty (Ids::uiSliderTrackColour, "0xff0f0f0f"); |
| 49 | setProperty (Ids::uiSliderIncDecButtonColour, "0xff0000ff"); |
| 50 | setProperty (Ids::uiSliderIncDecTextColour, "0xffffffff"); |
| 51 | setProperty (Ids::uiSliderValueFont, FONT2STR (Font(12))); |
| 52 | setProperty (Ids::uiSliderValueTextJustification, "centred"); |
| 53 | setProperty (Ids::uiSliderVelocitySensitivity, 1.0); |
| 54 | setProperty (Ids::uiSliderVelocityThreshold, 1); |
| 55 | setProperty (Ids::uiSliderVelocityOffset, 0.0); |
| 56 | setProperty (Ids::uiSliderVelocityMode, false); |
| 57 | setProperty (Ids::uiSliderVelocityModeKeyTrigger, true); |
| 58 | setProperty (Ids::uiSliderSpringMode, false); |
| 59 | setProperty (Ids::uiSliderSpringValue, 0); |
| 60 | setProperty (Ids::uiSliderMouseWheelInterval, 1); |
| 61 | setProperty (Ids::uiSliderPopupBubble, false); |
| 62 | |
| 63 | |
| 64 | setSize (64, 64); |
| 65 | } |
| 66 |
nothing calls this directly
no test coverage detected