Hi Alex, Previously I reported that the color of text does not appear as it should be, but light... You created the withoutBackground method that works but sometimes. As I display small fonts, having blurred texts does not help try this code... (1 to: 10) do: [:n | view shape rectangle borderColor:[ :each| Color blue ]. view node: n forIt: [ view node: (n * 2) using: (view shape rectangle withoutBorder withoutBackground; fontColor:[ :each| Color red ]; text:[ :e| e asString ]). ] ]. cheers, Veronica _______________________________________________ Moose-dev mailing list Moose-dev(a)iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev

Hi, This code produces the right color. view shape rectangle withoutBorder. view node: 10 forIt: [ (1 to: 10) do: [:n | view shape rectangle borderColor:[ :each| Color blue ]. view node: n forIt: [ view node: (n * 2) using: (view shape rectangle withoutBorder withoutBackground; fontColor:[ :each| Color black ]; text:[ :e| e asString ]). ] ] ] The code without the outer node produces labels with a light color. The outer node is the one i removed to make the drawing faster, but now i have the label color problem. (1 to: 10) do: [:n | view shape rectangle borderColor:[ :each| Color blue ]. view node: n forIt: [ view node: (n * 2) using: (view shape rectangle withoutBorder withoutBackground; fontColor:[ :each| Color black ]; text:[ :e| e asString ]). ] ] Attach 2 screenshots, there you will see better the problem (name of the packages). <textColor-Ok.png><textColor-blurried.png> Veronica On 20 Jul 2010, at 14:02, Alexandre Bergel wrote: > Hi! > > I am not sure to understand. > Consider the following example (to execute in a workspace): > -=-=-=--=-=-=--=-=-=--=-=-=- > | morphClass | > morphClass := Morph subclass: #TMPMorph. > morphClass compile: 'fillStyle ^ Color white'. > morphClass compile: 'drawOn: aCanvas > super drawOn: aCanvas. > aCanvas drawString: ''1 2 3'' > in: self bounds > font: TextStyle defaultFont > color: Color red.'. > morphClass new openInHand > -=-=-=--=-=-=--=-=-=--=-=-=- > It gives: > <Screen shot 2010-07-20 at 12.37.23.png> > > An example that uses the default text font in Mondrian. > > -=-=-=--=-=-=--=-=-=--=-=-=- > | morphClass | > morphClass := Morph subclass: #TMPMorph. > morphClass compile: 'fillStyle ^ Color white'. > morphClass compile: 'drawOn: aCanvas > super drawOn: aCanvas. > aCanvas drawString: ''1 2 3'' > in: self bounds > font: (MOBoundedShape new fontFor: MONode new) > color: Color red.'. > morphClass new openInHand > -=-=-=--=-=-=--=-=-=--=-=-=- > Which produces: > <Screen shot 2010-07-20 at 14.01.04.png> > > > Your easel script produces: > > <Screen shot 2010-07-20 at 12.37.30.png> > > I do not see any strange behavior. Can you provide a screenshot > > Cheers, > Alexandre > > > On 20 Jul 2010, at 11:28, Veronica Isabel Uquillas Gomez wrote: > >> Hi Alex, >> >> Previously I reported that the color of text does not appear as it should be, but light... You created the withoutBackground method that works but sometimes. >> As I display small fonts, having blurred texts does not help >> >> try this code... >> >> (1 to: 10) do: [:n | >> view shape rectangle >> borderColor:[ :each| Color blue ]. >> view node: n forIt: [ >> view node: (n * 2) using: (view shape rectangle withoutBorder >> withoutBackground; >> fontColor:[ :each| Color red ]; >> text:[ :e| e asString ]). >> ] >> ]. >> >> cheers, >> Veronica >> _______________________________________________ >> Moose-dev mailing list >> Moose-dev(a)iam.unibe.ch >> https://www.iam.unibe.ch/mailman/listinfo/moose-dev > > -- > _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: > Alexandre Bergel http://www.bergel.eu > ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. > > > > > > _______________________________________________ > Moose-dev mailing list > Moose-dev(a)iam.unibe.ch > https://www.iam.unibe.ch/mailman/listinfo/moose-dev _______________________________________________ Moose-dev mailing list Moose-dev(a)iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev