我正在搜索视觉组件,例如视频进度条/搜索栏或类似的东西:
有类似的东西吗?
答案 0 :(得分:2)
来自Benjamin van Ryseghem
| slider |
slider := SliderModel new.
slider
min: 0;
max: 100;
whenValueChangedDo: [:value | slider label: value asString ].
slider openWithSpec
答案 1 :(得分:1)
您可以使用PluggableSliderMorph
来实现此目的: