[squeak-dev] The Inbox: Graphics-ct.423.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Oct 2 23:16:52 UTC 2019


A new version of Graphics was added to project The Inbox:
http://source.squeak.org/inbox/Graphics-ct.423.mcz

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

Name: Graphics-ct.423
Author: ct
Time: 3 October 2019, 1:16:38.424083 am
UUID: 23bd6e39-af77-de45-9be7-656e21b5c970
Ancestors: Graphics-nice.417

Add constructor for FormSetFont

=============== Diff against Graphics-nice.417 ===============

Item was changed:
  ----- Method: FormSetFont class>>copy:toClipBoardAs:ascent: (in category 'examples') -----
  copy: charForm toClipBoardAs: char ascent: ascent
  	Clipboard clipboardText:
  		(Text string: char asString
  			attribute: (TextFontReference toFont: 
+ 				(FormSetFont
- 				(FormSetFont new
  					fromFormArray: (Array with: charForm)
  					asciiStart: char asciiValue
  					ascent: ascent)))
  "
  	The S in the Squeak welcome window was installed by doing the following
  	in a workspace (where the value of, eg, charForm will persist through BitEdit...
  	f := TextStyle default fontAt: 4.
  	oldS := f characterFormAt: $S.
  	charForm := Form extent: oldS extent depth: 8.
  	oldS displayOn: charForm.
  	charForm bitEdit.
  	...Play around with the BitEditor, then accept and close...
  	FormSetFont copy: charForm toClipBoardAs: $S ascent: f ascent.
  	...Then do a paste into the Welcome window
  "!

Item was added:
+ ----- Method: FormSetFont class>>fromFormArray:asciiStart:ascent: (in category 'instance creation') -----
+ fromFormArray: formArray asciiStart: asciiStart ascent: ascentVal
+ 
+ 	^ self new
+ 		fromFormArray: formArray asciiStart: asciiStart ascent: ascentVal;
+ 		yourself!



More information about the Squeak-dev mailing list