Re: [Pharo-project] how to center a workspace in the World ?

May 20, 2010


      morph := Morph new.
morph extent: 400@400.
centeredPosition := ( RealEstateAgent maximumUsableArea center - ( ( morph width /2) @ ( morph height /2) ) ) rounded .
morph position: centeredPosition.
morph openInWorld .


On May 20, 2010, at 1:31 PM, Mariano Martinez Peck wrote:
...
How can I do that?  For the moment, I am doing:
openWelcomeWorkspace
(Workspace new
    acceptContents: '  Welcome to pharo...blah blah
';
    embeddedInMorphicWindowLabeled: 'Welcome to Pharo')
    position: 50@120;
    extent: 800 @ 500;
   openAsIs
I want to keep the extent, but the position to be centered.
Thanks for any hint,
Mariano
<ATT00001..txt>

Re: [Pharo-project] how to center a workspace in the World ?

Fernando olivero