[squeak-dev] The Inbox: ToolBuilder-Morphic-ct.254.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Feb 10 10:15:17 UTC 2020


Christoph Thiede uploaded a new version of ToolBuilder-Morphic to project The Inbox:
http://source.squeak.org/inbox/ToolBuilder-Morphic-ct.254.mcz

==================== Summary ====================

Name: ToolBuilder-Morphic-ct.254
Author: ct
Time: 10 February 2020, 11:15:15.198089 am
UUID: e95e688c-632c-7b40-b6ca-4e481bbe57fd
Ancestors: ToolBuilder-Morphic-mt.251

Adds support for PluggableSliderSpec. Complements ToolBuilder-Kernel-ct.139.

=============== Diff against ToolBuilder-Morphic-mt.251 ===============

Item was added:
+ ----- Method: MorphicToolBuilder>>buildPluggableSlider: (in category 'widgets optional') -----
+ buildPluggableSlider: spec
+ 
+ 	| widget |
+ 	widget := self sliderClass
+ 		on: spec model
+ 		getValue: spec getValue
+ 		setValue: spec setValue
+ 		min: spec minValue
+ 		max: spec maxValue
+ 		quantum: spec quantum.
+ 	self register: widget id: spec name.
+ 	
+ 	spec color ifNotNil: [:color | widget color: color].
+ 	spec thumbColor ifNotNil: [:color | widget sliderColor: color].
+ 	self setFrame: spec frame in: widget.
+ 	self setLayoutHintsFor: widget spec: spec.
+ 	parent ifNotNil: [self add: widget to: parent].
+ 	^ widget!

Item was added:
+ ----- Method: MorphicToolBuilder>>sliderClass (in category 'widget classes') -----
+ sliderClass
+ 
+ 	^ Slider!



More information about the Squeak-dev mailing list