- Pharo-dev - lists.pharo.org

Re: [Pharo-project] problem starting up with a script on windows

by StÃ©phane Ducasse

Thanks doru. Can you open a ticket? Stef > I managed to debug some more and the problem seems to be introduced by System-Download after the version System-Download-StephaneDucasse.51. If you try any of the newer version, you should get the error. > > Ah, one more detail: I worked on a Windows Server 2008 R2 using a Cog VM (both r2316 and r2348). > > It would be great if someone else could confirm. > > Cheers, > Doru > > > On 25 Jan 2011, at 14:04, Tudor Girba wrote: > >> Hi, >> >> There seems to be a problem with starting a Pharo 1.2-based image with an initial .st script on Windows. >> >> The problem seems to be in CodeLoader>>installSourceFiles and it is related to the contentStream retrieved from the HTTPDownloadRequest being nil. I attached the debug.log. >> >> I checked the paths and they are all correct. In fact, if I run the same script with a Pharo 1.1.1 image, everything works as expected. I also tried to drag and drop the .st script and again, everything works as expected. So, it seems that there is some initialization problem. >> >> I cannot debug well because I do not have a Windows machine (the situation happens on a server that I cannot access easily). Can someone take a look to see if the problem can be reproduced? >> >> >> Cheers, >> Doru >> >> >> -- >> www.tudorgirba.com >> >> "The coherence of a trip is given by the clearness of the goal." >> >> >> <PharoDebug.log> > > -- > www.tudorgirba.com > > "Relationships are of two kinds: those we choose and those that happen. They both matter." > > > > > >

Jan. 25, 2011

Re: [Pharo-project] Issue 3579 in pharo: "declare temp" adds the variable twice

by pharo＠googlecode.com

Comment #4 on issue 3579 by marcus.d...(a)gmail.com: "declare temp" adds the variable twice http://code.google.com/p/pharo/issues/detail?id=3579 this is not Core, but Full (OB)

Jan. 25, 2011

Re: [Pharo-project] Issue 3579 in pharo: "declare temp" adds the variable twice

by pharo＠googlecode.com

Comment #3 on issue 3579 by marianopeck: "declare temp" adds the variable twice http://code.google.com/p/pharo/issues/detail?id=3579 Laurent, I cannot reproduce it anymore in PharoCore 12319, can you?

Jan. 25, 2011

Re: [Pharo-project] Issue 3470 in pharo: [Failing Tests] OBKeyBindingsTest

by pharo＠googlecode.com

Comment #3 on issue 3470 by panu.j.m...(a)gmail.com: [Failing Tests] OBKeyBindingsTest http://code.google.com/p/pharo/issues/detail?id=3470 If one changes OBTextMorph>>#editorClass to return OBTextMorphEditor instead of SmalltalkEditor the OBKeyBindingsTest will pass. But I am don't know what are the consequences of this change.

Jan. 25, 2011

Re: [Pharo-project] why does monticello updates accessing web when i save on dir?

by Adrian Lienhard

Do you mean #checkForNewerVersions with the message 'CAUTION! These versions in the repository may be newer:'? At least in PharoCore 1.1.1 this method doesn't have a sender. Adrian On Jan 25, 2011, at 15:49 , Igor Stasenko wrote: > At some point it tries to refresh all know repositories.. > probably to show you the warning "Oh, but there is more recent version > of the package you saving.. maybe you need to merge with it before > saving" > I think this message could be made optional and turned off for > "professionals" :) > > On 25 January 2011 15:25, HwaJong Oh <daliot.oh(a)gmail.com> wrote: >> >> It accesses the web when i store to my local repo. >> Since my last post here, I am coming up with a suspicion that it may have >> some package dependency toward the web. >> I better check. >> >> Your interest tell me, it is not a usual case. It is interesting to me, too. >> :-) >> -- >> View this message in context: http://forum.world.st/why-does-monticello-updates-accessing-web-when-i-save… >> Sent from the Pharo Smalltalk mailing list archive at Nabble.com. >> >> > > > > -- > Best regards, > Igor Stasenko AKA sig. >

Jan. 25, 2011

Re: [Pharo-project] collapsing panes

by Gary Chambers

Once wrapped, we could have the panes that are not being resized reverted to their spaceFill mode... Regards, Gary ----- Original Message ----- From: "Gary Chambers" <gazzaguru2(a)btinternet.com> To: <Pharo-project(a)lists.gforge.inria.fr> Sent: Tuesday, January 25, 2011 3:52 PM Subject: Re: [Pharo-project] collapsing panes > Once wrapped in a more specific class, a workaround will be possible to > maintain > the integrity of the layout. > > Regards, Gary > > ----- Original Message ----- > From: "Gary Chambers" <gazzaguru2(a)btinternet.com> > To: <Pharo-project(a)lists.gforge.inria.fr> > Sent: Tuesday, January 25, 2011 3:40 PM > Subject: Re: [Pharo-project] collapsing panes > > >> Ta, no problem! >> >> Not quite perfect though... expanding after manual resize of an upper one >> won't fill properly. >> Unfortunately that's the limit with Morphic as it stands. >> There's no concept of "desired extent" (which would normally be like >> extent when rigid but slightly flexible)... >> >> It would be nice to have layout etc. totally redone, perhaps based on the >> Xwindows model... a big job >> though that would probably benefit from a new (lowish level) UI >> framework... along with >> Cairo/Rome etc. >> >> Regards, Gary >> >> ----- Original Message ----- >> From: "Tudor Girba" <tudor.girba(a)gmail.com> >> To: <Pharo-project(a)lists.gforge.inria.fr> >> Sent: Tuesday, January 25, 2011 3:33 PM >> Subject: Re: [Pharo-project] collapsing panes >> >> >> It's really great working with you :) >> >> Cheers, >> Doru >> >> >> On 25 Jan 2011, at 16:07, Gary Chambers wrote: >> >>> I'm working on it... changeset soon... >>> >>> Regards, Gary >>> >>> ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> >>> To: <Pharo-project(a)lists.gforge.inria.fr> >>> Sent: Tuesday, January 25, 2011 2:15 PM >>> Subject: Re: [Pharo-project] collapsing panes >>> >>> >>> Ahh, indeed! My bad. Thanks Gary. >>> >>> The main issue that seems to be left is the resizing. Currently, >>> resizing propagates the changes to all the following morphs. This is >>> great when the table layout is inside a GeneralScrollPane, but it leads >>> to a bit of an odd behavior when stretching inside a bounded morph. Is >>> there an easy option to change the behavior of the resizer? >>> >>> Cheers, >>> Doru >>> >>> >>> >>> On 25 Jan 2011, at 12:07, Gary Chambers wrote: >>> >>>> Hi Doru, >>>> >>>> The weight should be applied to the expanders themselves... >>>> >>>> >>>> ex1 := (UITheme builder newExpander: 'Red' for: morph1) >>>> spaceFillWeight: 1; >>>> expanded: true. >>>> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) >>>> spaceFillWeight: 2; >>>> expanded: true. >>>> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) >>>> spaceFillWeight: 3; >>>> expanded: true. >>>> >>>> Regards, Gary >>>> >>>> ----- Original Message ----- From: "Tudor Girba" >>>> <tudor.girba(a)gmail.com> >>>> To: <Pharo-project(a)lists.gforge.inria.fr> >>>> Sent: Monday, January 24, 2011 9:14 PM >>>> Subject: Re: [Pharo-project] collapsing panes >>>> >>>> >>>> Hi Gary, >>>> >>>> On 24 Jan 2011, at 16:16, Gary Chambers wrote: >>>> >>>>> Hi, >>>>> I don't think the layouts can be merged, as such, as they have very >>>>> different >>>>> approaches. >>>>> >>>>> With the TableLayout, it is possible to assign "weights" to each >>>>> spaceFill >>>>> section to get what you want, I think. (see #spaceFillWeight:) >>>> >>>> I tried to use it, but I get no effect when I use it in your example. >>>> >>>> Below is one of my trouts (added spaceFillWeight: 10 to morph2). What >>>> am I doing wrong? >>>> >>>> | container morph1 morph2 morph3 ex1 ex2 ex3 sp1 sp2| >>>> morph1 := (PanelMorph new fillStyle: (SolidFillStyle color: Color red)) >>>> hResizing: #spaceFill; >>>> vResizing: #spaceFill. >>>> morph2 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>> blue)) >>>> hResizing: #spaceFill; >>>> vResizing: #spaceFill; >>>> spaceFillWeight: 10. >>>> morph3 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>> yellow)) >>>> hResizing: #spaceFill; >>>> vResizing: #spaceFill. >>>> ex1 := (UITheme builder newExpander: 'Red' for: morph1) expanded: true. >>>> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) expanded: >>>> true. >>>> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) expanded: >>>> true. >>>> sp1 := EdgeGripMorph new >>>> target: ex1; >>>> edgeName: #bottom; >>>> vResizing: #rigid; >>>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>>> on: #mouseDown send: #expandedSizingRigid to: ex1. >>>> sp2 := EdgeGripMorph new >>>> target: ex2; >>>> edgeName: #bottom; >>>> vResizing: #rigid; >>>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>>> on: #mouseDown send: #expandedSizingRigid to: ex2. >>>> container := UITheme builder newColumn: { ex1. sp1. ex2. sp2. ex3}. >>>> container cellInset: 0. >>>> container extent: 400@400. >>>> container openInWindow. >>>> >>>> Cheers, >>>> Doru >>>> >>>> >>>> >>>>> Regards, Gary >>>>> >>>>> ----- Original Message ----- From: "Tudor Girba" >>>>> <tudor.girba(a)gmail.com> >>>>> To: <Pharo-project(a)lists.gforge.inria.fr> >>>>> Sent: Monday, January 24, 2011 2:32 PM >>>>> Subject: Re: [Pharo-project] collapsing panes >>>>> >>>>> >>>>> Thanks a lot, Gary! I gave it a try and it does go in the wanted >>>>> direction. >>>>> >>>>> Now, the next question. I see that you are using a TableLayout. Is >>>>> there a way to specify a proportion (like in the proportional layout?) >>>>> for the initial extent of the inner panes? >>>>> >>>>> If yes, then I suppose we could merge the two layouts into one. >>>>> >>>>> Cheers, >>>>> Doru >>>>> >>>>> >>>>> On 24 Jan 2011, at 14:51, Benjamin wrote: >>>>> >>>>>> I love that :) >>>>>> It could be very useful ^^ >>>>>> >>>>>> >>>>>> Ben >>>>>> >>>>>> On Jan 24, 2011, at 2:36 PM, Gary Chambers wrote: >>>>>> >>>>>>> Tricky... >>>>>>> Just an experiment, but try the following after filing in attached >>>>>>> change set. >>>>>>> Can make the re-proportioning explicit and maybe fix things to >>>>>>> constrain to >>>>>>> the owner morph if interested... >>>>>>> >>>>>>> >>>>>>> | container morph1 morph2 morph3 ex1 ex2 ex3 sp1 sp2| >>>>>>> morph1 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>>> red)) >>>>>>> hResizing: #spaceFill; >>>>>>> vResizing: #spaceFill. >>>>>>> morph2 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>>> blue)) >>>>>>> hResizing: #spaceFill; >>>>>>> vResizing: #spaceFill. >>>>>>> morph3 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>>> yellow)) >>>>>>> hResizing: #spaceFill; >>>>>>> vResizing: #spaceFill. >>>>>>> ex1 := (UITheme builder newExpander: 'Red' for: morph1) >>>>>>> expanded: true. >>>>>>> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) >>>>>>> expanded: true. >>>>>>> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) >>>>>>> expanded: true. >>>>>>> sp1 := EdgeGripMorph new >>>>>>> target: ex1; >>>>>>> edgeName: #bottom; >>>>>>> vResizing: #rigid; >>>>>>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>>>>>> on: #mouseDown send: #expandedSizingRigid to: ex1. >>>>>>> sp2 := EdgeGripMorph new >>>>>>> target: ex2; >>>>>>> edgeName: #bottom; >>>>>>> vResizing: #rigid; >>>>>>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>>>>>> on: #mouseDown send: #expandedSizingRigid to: ex2. >>>>>>> container := UITheme builder newColumn: { >>>>>>> ex1. >>>>>>> sp1. >>>>>>> ex2. >>>>>>> sp2. >>>>>>> ex3}. >>>>>>> container cellInset: 0. >>>>>>> container extent: 400@400. >>>>>>> container openInWindow. >>>>>>> >>>>>>> >>>>>>> >>>>>>> Have a play/fun. >>>>>>> >>>>>>> Regards, Gary >>>>>>> >>>>>>> ----- Original Message ----- From: "Tudor Girba" >>>>>>> <tudor.girba(a)gmail.com> >>>>>>> To: "Pharo-project(a)lists.gforge.inria.fr Development" >>>>>>> <pharo-project(a)lists.gforge.inria.fr> >>>>>>> Sent: Friday, January 21, 2011 11:18 PM >>>>>>> Subject: [Pharo-project] collapsing panes >>>>>>> >>>>>>> >>>>>>> Hi, >>>>>>> >>>>>>> I have a question about how to obtain an effect similar to >>>>>>> minimizing a pane in Eclipse. Let's consider the example from below. >>>>>>> I have a ProportionalLayout because I want to fill the entire space >>>>>>> and be able to resize the inside panes. Now, I would also like to >>>>>>> have some way of collapsing one of the panes and have the rest >>>>>>> resize to fill the rest of the space. It's a bit like I would need >>>>>>> some part of a behavior from the TableLayout. >>>>>>> >>>>>>> Can anyone provide me with some hints in this direction? Do I need >>>>>>> to create a new Layout? >>>>>>> >>>>>>> | container morph1 morph2 morph3 window | >>>>>>> container := PanelMorph new. >>>>>>> morph1 := PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>>> red). >>>>>>> morph2 := PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>>> blue). >>>>>>> morph3 := PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>>> yellow). >>>>>>> container changeProportionalLayout. >>>>>>> container addMorph: morph1 fullFrame: (LayoutFrame fractions: (0 @ 0 >>>>>>> corner: 1 @ 0.33)). >>>>>>> container addMorph: morph2 fullFrame: (LayoutFrame fractions: (0 @ >>>>>>> 0.33 corner: 1 @ 0.66)). >>>>>>> container addMorph: morph3 fullFrame: (LayoutFrame fractions: (0 @ >>>>>>> 0.66 corner: 1 @ 1)). >>>>>>> container addPaneSplitters. >>>>>>> container fillStyle: (SolidFillStyle color: Color yellow). >>>>>>> container extent: 400@400. >>>>>>> container openInWindow. >>>>>>> >>>>>>> Cheers, >>>>>>> Doru >>>>>>> >>>>>>> >>>>>>> -- >>>>>>> www.tudorgirba.com >>>>>>> >>>>>>> "Be rather willing to give than demanding to get." >>>>>>> >>>>>>> >>>>>>> >>>>>>> <ExpanderTweak.1.cs> >>>>>> >>>>>> >>>>> >>>>> -- >>>>> www.tudorgirba.com >>>>> >>>>> "Every now and then stop and ask yourself if the war you're fighting >>>>> is the right one." >>>>> >>>>> >>>>> >>>>> >>>>> >>>> >>>> -- >>>> www.tudorgirba.com >>>> >>>> "Problem solving efficiency grows with the abstractness level of >>>> problem understanding." >>>> >>>> >>>> >>>> >>>> >>> >>> -- >>> www.tudorgirba.com >>> >>> "There are no old things, there are only old ways of looking at them." >>> >>> >>> >>> >>> >> >> -- >> www.tudorgirba.com >> >> "Sometimes the best solution is not the best solution." >> >> >> > >

Jan. 25, 2011

Re: [Pharo-project] collapsing panes

by Gary Chambers

Once wrapped in a more specific class, a workaround will be possible to maintain the integrity of the layout. Regards, Gary ----- Original Message ----- From: "Gary Chambers" <gazzaguru2(a)btinternet.com> To: <Pharo-project(a)lists.gforge.inria.fr> Sent: Tuesday, January 25, 2011 3:40 PM Subject: Re: [Pharo-project] collapsing panes > Ta, no problem! > > Not quite perfect though... expanding after manual resize of an upper one > won't fill properly. > Unfortunately that's the limit with Morphic as it stands. > There's no concept of "desired extent" (which would normally be like > extent when rigid but slightly flexible)... > > It would be nice to have layout etc. totally redone, perhaps based on the > Xwindows model... a big job > though that would probably benefit from a new (lowish level) UI > framework... along with > Cairo/Rome etc. > > Regards, Gary > > ----- Original Message ----- > From: "Tudor Girba" <tudor.girba(a)gmail.com> > To: <Pharo-project(a)lists.gforge.inria.fr> > Sent: Tuesday, January 25, 2011 3:33 PM > Subject: Re: [Pharo-project] collapsing panes > > > It's really great working with you :) > > Cheers, > Doru > > > On 25 Jan 2011, at 16:07, Gary Chambers wrote: > >> I'm working on it... changeset soon... >> >> Regards, Gary >> >> ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> >> To: <Pharo-project(a)lists.gforge.inria.fr> >> Sent: Tuesday, January 25, 2011 2:15 PM >> Subject: Re: [Pharo-project] collapsing panes >> >> >> Ahh, indeed! My bad. Thanks Gary. >> >> The main issue that seems to be left is the resizing. Currently, resizing >> propagates the changes to all the following morphs. This is great when >> the table layout is inside a GeneralScrollPane, but it leads to a bit of >> an odd behavior when stretching inside a bounded morph. Is there an easy >> option to change the behavior of the resizer? >> >> Cheers, >> Doru >> >> >> >> On 25 Jan 2011, at 12:07, Gary Chambers wrote: >> >>> Hi Doru, >>> >>> The weight should be applied to the expanders themselves... >>> >>> >>> ex1 := (UITheme builder newExpander: 'Red' for: morph1) >>> spaceFillWeight: 1; >>> expanded: true. >>> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) >>> spaceFillWeight: 2; >>> expanded: true. >>> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) >>> spaceFillWeight: 3; >>> expanded: true. >>> >>> Regards, Gary >>> >>> ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> >>> To: <Pharo-project(a)lists.gforge.inria.fr> >>> Sent: Monday, January 24, 2011 9:14 PM >>> Subject: Re: [Pharo-project] collapsing panes >>> >>> >>> Hi Gary, >>> >>> On 24 Jan 2011, at 16:16, Gary Chambers wrote: >>> >>>> Hi, >>>> I don't think the layouts can be merged, as such, as they have very >>>> different >>>> approaches. >>>> >>>> With the TableLayout, it is possible to assign "weights" to each >>>> spaceFill >>>> section to get what you want, I think. (see #spaceFillWeight:) >>> >>> I tried to use it, but I get no effect when I use it in your example. >>> >>> Below is one of my trouts (added spaceFillWeight: 10 to morph2). What am >>> I doing wrong? >>> >>> | container morph1 morph2 morph3 ex1 ex2 ex3 sp1 sp2| >>> morph1 := (PanelMorph new fillStyle: (SolidFillStyle color: Color red)) >>> hResizing: #spaceFill; >>> vResizing: #spaceFill. >>> morph2 := (PanelMorph new fillStyle: (SolidFillStyle color: Color blue)) >>> hResizing: #spaceFill; >>> vResizing: #spaceFill; >>> spaceFillWeight: 10. >>> morph3 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>> yellow)) >>> hResizing: #spaceFill; >>> vResizing: #spaceFill. >>> ex1 := (UITheme builder newExpander: 'Red' for: morph1) expanded: true. >>> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) expanded: >>> true. >>> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) expanded: >>> true. >>> sp1 := EdgeGripMorph new >>> target: ex1; >>> edgeName: #bottom; >>> vResizing: #rigid; >>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>> on: #mouseDown send: #expandedSizingRigid to: ex1. >>> sp2 := EdgeGripMorph new >>> target: ex2; >>> edgeName: #bottom; >>> vResizing: #rigid; >>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>> on: #mouseDown send: #expandedSizingRigid to: ex2. >>> container := UITheme builder newColumn: { ex1. sp1. ex2. sp2. ex3}. >>> container cellInset: 0. >>> container extent: 400@400. >>> container openInWindow. >>> >>> Cheers, >>> Doru >>> >>> >>> >>>> Regards, Gary >>>> >>>> ----- Original Message ----- From: "Tudor Girba" >>>> <tudor.girba(a)gmail.com> >>>> To: <Pharo-project(a)lists.gforge.inria.fr> >>>> Sent: Monday, January 24, 2011 2:32 PM >>>> Subject: Re: [Pharo-project] collapsing panes >>>> >>>> >>>> Thanks a lot, Gary! I gave it a try and it does go in the wanted >>>> direction. >>>> >>>> Now, the next question. I see that you are using a TableLayout. Is >>>> there a way to specify a proportion (like in the proportional layout?) >>>> for the initial extent of the inner panes? >>>> >>>> If yes, then I suppose we could merge the two layouts into one. >>>> >>>> Cheers, >>>> Doru >>>> >>>> >>>> On 24 Jan 2011, at 14:51, Benjamin wrote: >>>> >>>>> I love that :) >>>>> It could be very useful ^^ >>>>> >>>>> >>>>> Ben >>>>> >>>>> On Jan 24, 2011, at 2:36 PM, Gary Chambers wrote: >>>>> >>>>>> Tricky... >>>>>> Just an experiment, but try the following after filing in attached >>>>>> change set. >>>>>> Can make the re-proportioning explicit and maybe fix things to >>>>>> constrain to >>>>>> the owner morph if interested... >>>>>> >>>>>> >>>>>> | container morph1 morph2 morph3 ex1 ex2 ex3 sp1 sp2| >>>>>> morph1 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>> red)) >>>>>> hResizing: #spaceFill; >>>>>> vResizing: #spaceFill. >>>>>> morph2 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>> blue)) >>>>>> hResizing: #spaceFill; >>>>>> vResizing: #spaceFill. >>>>>> morph3 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>> yellow)) >>>>>> hResizing: #spaceFill; >>>>>> vResizing: #spaceFill. >>>>>> ex1 := (UITheme builder newExpander: 'Red' for: morph1) >>>>>> expanded: true. >>>>>> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) >>>>>> expanded: true. >>>>>> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) >>>>>> expanded: true. >>>>>> sp1 := EdgeGripMorph new >>>>>> target: ex1; >>>>>> edgeName: #bottom; >>>>>> vResizing: #rigid; >>>>>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>>>>> on: #mouseDown send: #expandedSizingRigid to: ex1. >>>>>> sp2 := EdgeGripMorph new >>>>>> target: ex2; >>>>>> edgeName: #bottom; >>>>>> vResizing: #rigid; >>>>>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>>>>> on: #mouseDown send: #expandedSizingRigid to: ex2. >>>>>> container := UITheme builder newColumn: { >>>>>> ex1. >>>>>> sp1. >>>>>> ex2. >>>>>> sp2. >>>>>> ex3}. >>>>>> container cellInset: 0. >>>>>> container extent: 400@400. >>>>>> container openInWindow. >>>>>> >>>>>> >>>>>> >>>>>> Have a play/fun. >>>>>> >>>>>> Regards, Gary >>>>>> >>>>>> ----- Original Message ----- From: "Tudor Girba" >>>>>> <tudor.girba(a)gmail.com> >>>>>> To: "Pharo-project(a)lists.gforge.inria.fr Development" >>>>>> <pharo-project(a)lists.gforge.inria.fr> >>>>>> Sent: Friday, January 21, 2011 11:18 PM >>>>>> Subject: [Pharo-project] collapsing panes >>>>>> >>>>>> >>>>>> Hi, >>>>>> >>>>>> I have a question about how to obtain an effect similar to minimizing >>>>>> a pane in Eclipse. Let's consider the example from below. I have a >>>>>> ProportionalLayout because I want to fill the entire space and be >>>>>> able to resize the inside panes. Now, I would also like to have some >>>>>> way of collapsing one of the panes and have the rest resize to fill >>>>>> the rest of the space. It's a bit like I would need some part of a >>>>>> behavior from the TableLayout. >>>>>> >>>>>> Can anyone provide me with some hints in this direction? Do I need to >>>>>> create a new Layout? >>>>>> >>>>>> | container morph1 morph2 morph3 window | >>>>>> container := PanelMorph new. >>>>>> morph1 := PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>> red). >>>>>> morph2 := PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>> blue). >>>>>> morph3 := PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>> yellow). >>>>>> container changeProportionalLayout. >>>>>> container addMorph: morph1 fullFrame: (LayoutFrame fractions: (0 @ 0 >>>>>> corner: 1 @ 0.33)). >>>>>> container addMorph: morph2 fullFrame: (LayoutFrame fractions: (0 @ >>>>>> 0.33 corner: 1 @ 0.66)). >>>>>> container addMorph: morph3 fullFrame: (LayoutFrame fractions: (0 @ >>>>>> 0.66 corner: 1 @ 1)). >>>>>> container addPaneSplitters. >>>>>> container fillStyle: (SolidFillStyle color: Color yellow). >>>>>> container extent: 400@400. >>>>>> container openInWindow. >>>>>> >>>>>> Cheers, >>>>>> Doru >>>>>> >>>>>> >>>>>> -- >>>>>> www.tudorgirba.com >>>>>> >>>>>> "Be rather willing to give than demanding to get." >>>>>> >>>>>> >>>>>> >>>>>> <ExpanderTweak.1.cs> >>>>> >>>>> >>>> >>>> -- >>>> www.tudorgirba.com >>>> >>>> "Every now and then stop and ask yourself if the war you're fighting is >>>> the right one." >>>> >>>> >>>> >>>> >>>> >>> >>> -- >>> www.tudorgirba.com >>> >>> "Problem solving efficiency grows with the abstractness level of problem >>> understanding." >>> >>> >>> >>> >>> >> >> -- >> www.tudorgirba.com >> >> "There are no old things, there are only old ways of looking at them." >> >> >> >> >> > > -- > www.tudorgirba.com > > "Sometimes the best solution is not the best solution." > > >

Jan. 25, 2011

Re: [Pharo-project] collapsing panes

by Gary Chambers

Indeed, the point being that when resizing, the lower panes running outside the container is prevented. Initially, all panes are in spaceFill mode, weight accounted for. Upon manual resizing the affected pane becomes rigid. Contracting an expander will reset the the associated pane to spaceFill such that, when re-expanded it scales again.. Regards, Gary ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> To: <Pharo-project(a)lists.gforge.inria.fr> Sent: Tuesday, January 25, 2011 3:40 PM Subject: Re: [Pharo-project] collapsing panes Hi Gary, I tried it but there does not seem to be any difference. Resizing the red morph leads to resizing all other panes. Resizing the yellow pane, affects only yellow and green. Am I looking at the wrong thing? In any case, going towards Announcements in Morphic is really cool. Cheers, Doru On 25 Jan 2011, at 16:31, Gary Chambers wrote: > OK, try the following, after filing in attached change set, > I've had a dabble with announcements too ;-) ... > > > | container morph1 morph2 morph3 morph4 ex1 ex2 ex3 ex4 sp1 sp2 sp3| > morph1 := (PanelMorph new fillStyle: (SolidFillStyle color: Color red)) > hResizing: #spaceFill; vResizing: #spaceFill. > morph2 := (PanelMorph new fillStyle: (SolidFillStyle color: Color blue)) > hResizing: #spaceFill; vResizing: #spaceFill. > morph3 := (PanelMorph new fillStyle: (SolidFillStyle color: Color yellow)) > hResizing: #spaceFill; vResizing: #spaceFill. > morph4 := (PanelMorph new fillStyle: (SolidFillStyle color: Color green)) > hResizing: #spaceFill; vResizing: #spaceFill. > ex1 := (UITheme builder newExpander: 'Red' for: morph1) spaceFillWeight: > 1; expanded: true. > ex2 := (UITheme builder newExpander: 'Blue' for: morph2) spaceFillWeight: > 2; expanded: true. > ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) > spaceFillWeight: 3; expanded: true. > ex4 := (UITheme builder newExpander: 'Green' for: morph4) > spaceFillWeight: 4; expanded: true. > sp1 := EdgeGripMorph new > target: ex1; > edgeName: #bottom; > fitTargetOwner: true; > on: #mouseDown send: #expandedSizingRigid to: ex1. > sp2 := EdgeGripMorph new > target: ex2; > edgeName: #bottom; > fitTargetOwner: true; > on: #mouseDown send: #expandedSizingRigid to: ex2. > sp3 := EdgeGripMorph new > target: ex3; > edgeName: #bottom; > fitTargetOwner: true; > on: #mouseDown send: #expandedSizingRigid to: ex3. > ex1 announcer on: ExpanderMorphAnnouncement do: [:ann | > sp1 > visible: ann expanderMorph expanded; > disableTableLayout: ann expanderMorph expanded not]. > ex2 announcer on: ExpanderMorphAnnouncement do: [:ann | > sp2 > visible: ann expanderMorph expanded; > disableTableLayout: ann expanderMorph expanded not]. > ex3 announcer on: ExpanderMorphAnnouncement do: [:ann | > sp3 > visible: ann expanderMorph expanded; > disableTableLayout: ann expanderMorph expanded not]. > container := UITheme builder newColumn: { > ex1. > sp1. > ex2. > sp2. > ex3. > sp3. > ex4}. > container cellInset: 0. > container extent: 400@400. > container openInWindow. > > > > > Once people are happy with it I'll wrap thing up into a new morph that > takes the burdensome details away (ExpanderGroupMorph or something like > that). > Later, like tabs, ability to add/remove sections dynamically etc. > > Regards, Gary > > ----- Original Message ----- From: "Gary Chambers" > <gazzaguru2(a)btinternet.com> > To: <Pharo-project(a)lists.gforge.inria.fr> > Sent: Tuesday, January 25, 2011 3:07 PM > Subject: Re: [Pharo-project] collapsing panes > > >> I'm working on it... changeset soon... >> >> Regards, Gary >> >> ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> >> To: <Pharo-project(a)lists.gforge.inria.fr> >> Sent: Tuesday, January 25, 2011 2:15 PM >> Subject: Re: [Pharo-project] collapsing panes >> >> >> Ahh, indeed! My bad. Thanks Gary. >> >> The main issue that seems to be left is the resizing. Currently, resizing >> propagates the changes to all the following morphs. This is great when >> the table layout is inside a GeneralScrollPane, but it leads to a bit of >> an odd behavior when stretching inside a bounded morph. Is there an easy >> option to change the behavior of the resizer? >> >> Cheers, >> Doru >> >> >> >> On 25 Jan 2011, at 12:07, Gary Chambers wrote: >> >>> Hi Doru, >>> >>> The weight should be applied to the expanders themselves... >>> >>> >>> ex1 := (UITheme builder newExpander: 'Red' for: morph1) >>> spaceFillWeight: 1; >>> expanded: true. >>> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) >>> spaceFillWeight: 2; >>> expanded: true. >>> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) >>> spaceFillWeight: 3; >>> expanded: true. >>> >>> Regards, Gary >>> >>> ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> >>> To: <Pharo-project(a)lists.gforge.inria.fr> >>> Sent: Monday, January 24, 2011 9:14 PM >>> Subject: Re: [Pharo-project] collapsing panes >>> >>> >>> Hi Gary, >>> >>> On 24 Jan 2011, at 16:16, Gary Chambers wrote: >>> >>>> Hi, >>>> I don't think the layouts can be merged, as such, as they have very >>>> different >>>> approaches. >>>> >>>> With the TableLayout, it is possible to assign "weights" to each >>>> spaceFill >>>> section to get what you want, I think. (see #spaceFillWeight:) >>> >>> I tried to use it, but I get no effect when I use it in your example. >>> >>> Below is one of my trouts (added spaceFillWeight: 10 to morph2). What am >>> I doing wrong? >>> >>> | container morph1 morph2 morph3 ex1 ex2 ex3 sp1 sp2| >>> morph1 := (PanelMorph new fillStyle: (SolidFillStyle color: Color red)) >>> hResizing: #spaceFill; >>> vResizing: #spaceFill. >>> morph2 := (PanelMorph new fillStyle: (SolidFillStyle color: Color blue)) >>> hResizing: #spaceFill; >>> vResizing: #spaceFill; >>> spaceFillWeight: 10. >>> morph3 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>> yellow)) >>> hResizing: #spaceFill; >>> vResizing: #spaceFill. >>> ex1 := (UITheme builder newExpander: 'Red' for: morph1) expanded: true. >>> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) expanded: >>> true. >>> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) expanded: >>> true. >>> sp1 := EdgeGripMorph new >>> target: ex1; >>> edgeName: #bottom; >>> vResizing: #rigid; >>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>> on: #mouseDown send: #expandedSizingRigid to: ex1. >>> sp2 := EdgeGripMorph new >>> target: ex2; >>> edgeName: #bottom; >>> vResizing: #rigid; >>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>> on: #mouseDown send: #expandedSizingRigid to: ex2. >>> container := UITheme builder newColumn: { ex1. sp1. ex2. sp2. ex3}. >>> container cellInset: 0. >>> container extent: 400@400. >>> container openInWindow. >>> >>> Cheers, >>> Doru >>> >>> >>> >>>> Regards, Gary >>>> >>>> ----- Original Message ----- From: "Tudor Girba" >>>> <tudor.girba(a)gmail.com> >>>> To: <Pharo-project(a)lists.gforge.inria.fr> >>>> Sent: Monday, January 24, 2011 2:32 PM >>>> Subject: Re: [Pharo-project] collapsing panes >>>> >>>> >>>> Thanks a lot, Gary! I gave it a try and it does go in the wanted >>>> direction. >>>> >>>> Now, the next question. I see that you are using a TableLayout. Is >>>> there a way to specify a proportion (like in the proportional layout?) >>>> for the initial extent of the inner panes? >>>> >>>> If yes, then I suppose we could merge the two layouts into one. >>>> >>>> Cheers, >>>> Doru >>>> >>>> >>>> On 24 Jan 2011, at 14:51, Benjamin wrote: >>>> >>>>> I love that :) >>>>> It could be very useful ^^ >>>>> >>>>> >>>>> Ben >>>>> >>>>> On Jan 24, 2011, at 2:36 PM, Gary Chambers wrote: >>>>> >>>>>> Tricky... >>>>>> Just an experiment, but try the following after filing in attached >>>>>> change set. >>>>>> Can make the re-proportioning explicit and maybe fix things to >>>>>> constrain to >>>>>> the owner morph if interested... >>>>>> >>>>>> >>>>>> | container morph1 morph2 morph3 ex1 ex2 ex3 sp1 sp2| >>>>>> morph1 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>> red)) >>>>>> hResizing: #spaceFill; >>>>>> vResizing: #spaceFill. >>>>>> morph2 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>> blue)) >>>>>> hResizing: #spaceFill; >>>>>> vResizing: #spaceFill. >>>>>> morph3 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>> yellow)) >>>>>> hResizing: #spaceFill; >>>>>> vResizing: #spaceFill. >>>>>> ex1 := (UITheme builder newExpander: 'Red' for: morph1) >>>>>> expanded: true. >>>>>> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) >>>>>> expanded: true. >>>>>> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) >>>>>> expanded: true. >>>>>> sp1 := EdgeGripMorph new >>>>>> target: ex1; >>>>>> edgeName: #bottom; >>>>>> vResizing: #rigid; >>>>>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>>>>> on: #mouseDown send: #expandedSizingRigid to: ex1. >>>>>> sp2 := EdgeGripMorph new >>>>>> target: ex2; >>>>>> edgeName: #bottom; >>>>>> vResizing: #rigid; >>>>>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>>>>> on: #mouseDown send: #expandedSizingRigid to: ex2. >>>>>> container := UITheme builder newColumn: { >>>>>> ex1. >>>>>> sp1. >>>>>> ex2. >>>>>> sp2. >>>>>> ex3}. >>>>>> container cellInset: 0. >>>>>> container extent: 400@400. >>>>>> container openInWindow. >>>>>> >>>>>> >>>>>> >>>>>> Have a play/fun. >>>>>> >>>>>> Regards, Gary >>>>>> >>>>>> ----- Original Message ----- From: "Tudor Girba" >>>>>> <tudor.girba(a)gmail.com> >>>>>> To: "Pharo-project(a)lists.gforge.inria.fr Development" >>>>>> <pharo-project(a)lists.gforge.inria.fr> >>>>>> Sent: Friday, January 21, 2011 11:18 PM >>>>>> Subject: [Pharo-project] collapsing panes >>>>>> >>>>>> >>>>>> Hi, >>>>>> >>>>>> I have a question about how to obtain an effect similar to minimizing >>>>>> a pane in Eclipse. Let's consider the example from below. I have a >>>>>> ProportionalLayout because I want to fill the entire space and be >>>>>> able to resize the inside panes. Now, I would also like to have some >>>>>> way of collapsing one of the panes and have the rest resize to fill >>>>>> the rest of the space. It's a bit like I would need some part of a >>>>>> behavior from the TableLayout. >>>>>> >>>>>> Can anyone provide me with some hints in this direction? Do I need to >>>>>> create a new Layout? >>>>>> >>>>>> | container morph1 morph2 morph3 window | >>>>>> container := PanelMorph new. >>>>>> morph1 := PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>> red). >>>>>> morph2 := PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>> blue). >>>>>> morph3 := PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>>> yellow). >>>>>> container changeProportionalLayout. >>>>>> container addMorph: morph1 fullFrame: (LayoutFrame fractions: (0 @ 0 >>>>>> corner: 1 @ 0.33)). >>>>>> container addMorph: morph2 fullFrame: (LayoutFrame fractions: (0 @ >>>>>> 0.33 corner: 1 @ 0.66)). >>>>>> container addMorph: morph3 fullFrame: (LayoutFrame fractions: (0 @ >>>>>> 0.66 corner: 1 @ 1)). >>>>>> container addPaneSplitters. >>>>>> container fillStyle: (SolidFillStyle color: Color yellow). >>>>>> container extent: 400@400. >>>>>> container openInWindow. >>>>>> >>>>>> Cheers, >>>>>> Doru >>>>>> >>>>>> >>>>>> -- >>>>>> www.tudorgirba.com >>>>>> >>>>>> "Be rather willing to give than demanding to get." >>>>>> >>>>>> >>>>>> >>>>>> <ExpanderTweak.1.cs> >>>>> >>>>> >>>> >>>> -- >>>> www.tudorgirba.com >>>> >>>> "Every now and then stop and ask yourself if the war you're fighting is >>>> the right one." >>>> >>>> >>>> >>>> >>>> >>> >>> -- >>> www.tudorgirba.com >>> >>> "Problem solving efficiency grows with the abstractness level of problem >>> understanding." >>> >>> >>> >>> >>> >> >> -- >> www.tudorgirba.com >> >> "There are no old things, there are only old ways of looking at them." >> >> >> >> > <ExpanderTweak.2.cs> -- www.tudorgirba.com "One cannot do more than one can do."

Jan. 25, 2011

Re: [Pharo-project] collapsing panes

by Tudor Girba

Hi Gary, I tried it but there does not seem to be any difference. Resizing the red morph leads to resizing all other panes. Resizing the yellow pane, affects only yellow and green. Am I looking at the wrong thing? In any case, going towards Announcements in Morphic is really cool. Cheers, Doru On 25 Jan 2011, at 16:31, Gary Chambers wrote: > OK, try the following, after filing in attached change set, > I've had a dabble with announcements too ;-) ... > > > | container morph1 morph2 morph3 morph4 ex1 ex2 ex3 ex4 sp1 sp2 sp3| > morph1 := (PanelMorph new fillStyle: (SolidFillStyle color: Color red)) hResizing: #spaceFill; vResizing: #spaceFill. > morph2 := (PanelMorph new fillStyle: (SolidFillStyle color: Color blue)) hResizing: #spaceFill; vResizing: #spaceFill. > morph3 := (PanelMorph new fillStyle: (SolidFillStyle color: Color yellow)) hResizing: #spaceFill; vResizing: #spaceFill. > morph4 := (PanelMorph new fillStyle: (SolidFillStyle color: Color green)) hResizing: #spaceFill; vResizing: #spaceFill. > ex1 := (UITheme builder newExpander: 'Red' for: morph1) spaceFillWeight: 1; expanded: true. > ex2 := (UITheme builder newExpander: 'Blue' for: morph2) spaceFillWeight: 2; expanded: true. > ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) spaceFillWeight: 3; expanded: true. > ex4 := (UITheme builder newExpander: 'Green' for: morph4) spaceFillWeight: 4; expanded: true. > sp1 := EdgeGripMorph new > target: ex1; > edgeName: #bottom; > fitTargetOwner: true; > on: #mouseDown send: #expandedSizingRigid to: ex1. > sp2 := EdgeGripMorph new > target: ex2; > edgeName: #bottom; > fitTargetOwner: true; > on: #mouseDown send: #expandedSizingRigid to: ex2. > sp3 := EdgeGripMorph new > target: ex3; > edgeName: #bottom; > fitTargetOwner: true; > on: #mouseDown send: #expandedSizingRigid to: ex3. > ex1 announcer on: ExpanderMorphAnnouncement do: [:ann | > sp1 > visible: ann expanderMorph expanded; > disableTableLayout: ann expanderMorph expanded not]. > ex2 announcer on: ExpanderMorphAnnouncement do: [:ann | > sp2 > visible: ann expanderMorph expanded; > disableTableLayout: ann expanderMorph expanded not]. > ex3 announcer on: ExpanderMorphAnnouncement do: [:ann | > sp3 > visible: ann expanderMorph expanded; > disableTableLayout: ann expanderMorph expanded not]. > container := UITheme builder newColumn: { > ex1. > sp1. > ex2. > sp2. > ex3. > sp3. > ex4}. > container cellInset: 0. > container extent: 400@400. > container openInWindow. > > > > > Once people are happy with it I'll wrap thing up into a new morph that > takes the burdensome details away (ExpanderGroupMorph or something like that). > Later, like tabs, ability to add/remove sections dynamically etc. > > Regards, Gary > > ----- Original Message ----- From: "Gary Chambers" <gazzaguru2(a)btinternet.com> > To: <Pharo-project(a)lists.gforge.inria.fr> > Sent: Tuesday, January 25, 2011 3:07 PM > Subject: Re: [Pharo-project] collapsing panes > > >> I'm working on it... changeset soon... >> >> Regards, Gary >> >> ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> >> To: <Pharo-project(a)lists.gforge.inria.fr> >> Sent: Tuesday, January 25, 2011 2:15 PM >> Subject: Re: [Pharo-project] collapsing panes >> >> >> Ahh, indeed! My bad. Thanks Gary. >> >> The main issue that seems to be left is the resizing. Currently, resizing propagates the changes to all the following morphs. This is great when the table layout is inside a GeneralScrollPane, but it leads to a bit of an odd behavior when stretching inside a bounded morph. Is there an easy option to change the behavior of the resizer? >> >> Cheers, >> Doru >> >> >> >> On 25 Jan 2011, at 12:07, Gary Chambers wrote: >> >>> Hi Doru, >>> >>> The weight should be applied to the expanders themselves... >>> >>> >>> ex1 := (UITheme builder newExpander: 'Red' for: morph1) >>> spaceFillWeight: 1; >>> expanded: true. >>> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) >>> spaceFillWeight: 2; >>> expanded: true. >>> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) >>> spaceFillWeight: 3; >>> expanded: true. >>> >>> Regards, Gary >>> >>> ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> >>> To: <Pharo-project(a)lists.gforge.inria.fr> >>> Sent: Monday, January 24, 2011 9:14 PM >>> Subject: Re: [Pharo-project] collapsing panes >>> >>> >>> Hi Gary, >>> >>> On 24 Jan 2011, at 16:16, Gary Chambers wrote: >>> >>>> Hi, >>>> I don't think the layouts can be merged, as such, as they have very different >>>> approaches. >>>> >>>> With the TableLayout, it is possible to assign "weights" to each spaceFill >>>> section to get what you want, I think. (see #spaceFillWeight:) >>> >>> I tried to use it, but I get no effect when I use it in your example. >>> >>> Below is one of my trouts (added spaceFillWeight: 10 to morph2). What am I doing wrong? >>> >>> | container morph1 morph2 morph3 ex1 ex2 ex3 sp1 sp2| >>> morph1 := (PanelMorph new fillStyle: (SolidFillStyle color: Color red)) >>> hResizing: #spaceFill; >>> vResizing: #spaceFill. >>> morph2 := (PanelMorph new fillStyle: (SolidFillStyle color: Color blue)) >>> hResizing: #spaceFill; >>> vResizing: #spaceFill; >>> spaceFillWeight: 10. >>> morph3 := (PanelMorph new fillStyle: (SolidFillStyle color: Color yellow)) >>> hResizing: #spaceFill; >>> vResizing: #spaceFill. >>> ex1 := (UITheme builder newExpander: 'Red' for: morph1) expanded: true. >>> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) expanded: true. >>> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) expanded: true. >>> sp1 := EdgeGripMorph new >>> target: ex1; >>> edgeName: #bottom; >>> vResizing: #rigid; >>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>> on: #mouseDown send: #expandedSizingRigid to: ex1. >>> sp2 := EdgeGripMorph new >>> target: ex2; >>> edgeName: #bottom; >>> vResizing: #rigid; >>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>> on: #mouseDown send: #expandedSizingRigid to: ex2. >>> container := UITheme builder newColumn: { ex1. sp1. ex2. sp2. ex3}. >>> container cellInset: 0. >>> container extent: 400@400. >>> container openInWindow. >>> >>> Cheers, >>> Doru >>> >>> >>> >>>> Regards, Gary >>>> >>>> ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> >>>> To: <Pharo-project(a)lists.gforge.inria.fr> >>>> Sent: Monday, January 24, 2011 2:32 PM >>>> Subject: Re: [Pharo-project] collapsing panes >>>> >>>> >>>> Thanks a lot, Gary! I gave it a try and it does go in the wanted direction. >>>> >>>> Now, the next question. I see that you are using a TableLayout. Is there a way to specify a proportion (like in the proportional layout?) for the initial extent of the inner panes? >>>> >>>> If yes, then I suppose we could merge the two layouts into one. >>>> >>>> Cheers, >>>> Doru >>>> >>>> >>>> On 24 Jan 2011, at 14:51, Benjamin wrote: >>>> >>>>> I love that :) >>>>> It could be very useful ^^ >>>>> >>>>> >>>>> Ben >>>>> >>>>> On Jan 24, 2011, at 2:36 PM, Gary Chambers wrote: >>>>> >>>>>> Tricky... >>>>>> Just an experiment, but try the following after filing in attached change set. >>>>>> Can make the re-proportioning explicit and maybe fix things to constrain to >>>>>> the owner morph if interested... >>>>>> >>>>>> >>>>>> | container morph1 morph2 morph3 ex1 ex2 ex3 sp1 sp2| >>>>>> morph1 := (PanelMorph new fillStyle: (SolidFillStyle color: Color red)) >>>>>> hResizing: #spaceFill; >>>>>> vResizing: #spaceFill. >>>>>> morph2 := (PanelMorph new fillStyle: (SolidFillStyle color: Color blue)) >>>>>> hResizing: #spaceFill; >>>>>> vResizing: #spaceFill. >>>>>> morph3 := (PanelMorph new fillStyle: (SolidFillStyle color: Color yellow)) >>>>>> hResizing: #spaceFill; >>>>>> vResizing: #spaceFill. >>>>>> ex1 := (UITheme builder newExpander: 'Red' for: morph1) >>>>>> expanded: true. >>>>>> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) >>>>>> expanded: true. >>>>>> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) >>>>>> expanded: true. >>>>>> sp1 := EdgeGripMorph new >>>>>> target: ex1; >>>>>> edgeName: #bottom; >>>>>> vResizing: #rigid; >>>>>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>>>>> on: #mouseDown send: #expandedSizingRigid to: ex1. >>>>>> sp2 := EdgeGripMorph new >>>>>> target: ex2; >>>>>> edgeName: #bottom; >>>>>> vResizing: #rigid; >>>>>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>>>>> on: #mouseDown send: #expandedSizingRigid to: ex2. >>>>>> container := UITheme builder newColumn: { >>>>>> ex1. >>>>>> sp1. >>>>>> ex2. >>>>>> sp2. >>>>>> ex3}. >>>>>> container cellInset: 0. >>>>>> container extent: 400@400. >>>>>> container openInWindow. >>>>>> >>>>>> >>>>>> >>>>>> Have a play/fun. >>>>>> >>>>>> Regards, Gary >>>>>> >>>>>> ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> >>>>>> To: "Pharo-project(a)lists.gforge.inria.fr Development" <pharo-project(a)lists.gforge.inria.fr> >>>>>> Sent: Friday, January 21, 2011 11:18 PM >>>>>> Subject: [Pharo-project] collapsing panes >>>>>> >>>>>> >>>>>> Hi, >>>>>> >>>>>> I have a question about how to obtain an effect similar to minimizing a pane in Eclipse. Let's consider the example from below. I have a ProportionalLayout because I want to fill the entire space and be able to resize the inside panes. Now, I would also like to have some way of collapsing one of the panes and have the rest resize to fill the rest of the space. It's a bit like I would need some part of a behavior from the TableLayout. >>>>>> >>>>>> Can anyone provide me with some hints in this direction? Do I need to create a new Layout? >>>>>> >>>>>> | container morph1 morph2 morph3 window | >>>>>> container := PanelMorph new. >>>>>> morph1 := PanelMorph new fillStyle: (SolidFillStyle color: Color red). >>>>>> morph2 := PanelMorph new fillStyle: (SolidFillStyle color: Color blue). >>>>>> morph3 := PanelMorph new fillStyle: (SolidFillStyle color: Color yellow). >>>>>> container changeProportionalLayout. >>>>>> container addMorph: morph1 fullFrame: (LayoutFrame fractions: (0 @ 0 corner: 1 @ 0.33)). >>>>>> container addMorph: morph2 fullFrame: (LayoutFrame fractions: (0 @ 0.33 corner: 1 @ 0.66)). >>>>>> container addMorph: morph3 fullFrame: (LayoutFrame fractions: (0 @ 0.66 corner: 1 @ 1)). >>>>>> container addPaneSplitters. >>>>>> container fillStyle: (SolidFillStyle color: Color yellow). >>>>>> container extent: 400@400. >>>>>> container openInWindow. >>>>>> >>>>>> Cheers, >>>>>> Doru >>>>>> >>>>>> >>>>>> -- >>>>>> www.tudorgirba.com >>>>>> >>>>>> "Be rather willing to give than demanding to get." >>>>>> >>>>>> >>>>>> >>>>>> <ExpanderTweak.1.cs> >>>>> >>>>> >>>> >>>> -- >>>> www.tudorgirba.com >>>> >>>> "Every now and then stop and ask yourself if the war you're fighting is the right one." >>>> >>>> >>>> >>>> >>>> >>> >>> -- >>> www.tudorgirba.com >>> >>> "Problem solving efficiency grows with the abstractness level of problem understanding." >>> >>> >>> >>> >>> >> >> -- >> www.tudorgirba.com >> >> "There are no old things, there are only old ways of looking at them." >> >> >> >> > <ExpanderTweak.2.cs> -- www.tudorgirba.com "One cannot do more than one can do."

Jan. 25, 2011

Re: [Pharo-project] collapsing panes

by Gary Chambers

Ta, no problem! Not quite perfect though... expanding after manual resize of an upper one won't fill properly. Unfortunately that's the limit with Morphic as it stands. There's no concept of "desired extent" (which would normally be like extent when rigid but slightly flexible)... It would be nice to have layout etc. totally redone, perhaps based on the Xwindows model... a big job though that would probably benefit from a new (lowish level) UI framework... along with Cairo/Rome etc. Regards, Gary ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> To: <Pharo-project(a)lists.gforge.inria.fr> Sent: Tuesday, January 25, 2011 3:33 PM Subject: Re: [Pharo-project] collapsing panes It's really great working with you :) Cheers, Doru On 25 Jan 2011, at 16:07, Gary Chambers wrote: > I'm working on it... changeset soon... > > Regards, Gary > > ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> > To: <Pharo-project(a)lists.gforge.inria.fr> > Sent: Tuesday, January 25, 2011 2:15 PM > Subject: Re: [Pharo-project] collapsing panes > > > Ahh, indeed! My bad. Thanks Gary. > > The main issue that seems to be left is the resizing. Currently, resizing > propagates the changes to all the following morphs. This is great when the > table layout is inside a GeneralScrollPane, but it leads to a bit of an > odd behavior when stretching inside a bounded morph. Is there an easy > option to change the behavior of the resizer? > > Cheers, > Doru > > > > On 25 Jan 2011, at 12:07, Gary Chambers wrote: > >> Hi Doru, >> >> The weight should be applied to the expanders themselves... >> >> >> ex1 := (UITheme builder newExpander: 'Red' for: morph1) >> spaceFillWeight: 1; >> expanded: true. >> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) >> spaceFillWeight: 2; >> expanded: true. >> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) >> spaceFillWeight: 3; >> expanded: true. >> >> Regards, Gary >> >> ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> >> To: <Pharo-project(a)lists.gforge.inria.fr> >> Sent: Monday, January 24, 2011 9:14 PM >> Subject: Re: [Pharo-project] collapsing panes >> >> >> Hi Gary, >> >> On 24 Jan 2011, at 16:16, Gary Chambers wrote: >> >>> Hi, >>> I don't think the layouts can be merged, as such, as they have very >>> different >>> approaches. >>> >>> With the TableLayout, it is possible to assign "weights" to each >>> spaceFill >>> section to get what you want, I think. (see #spaceFillWeight:) >> >> I tried to use it, but I get no effect when I use it in your example. >> >> Below is one of my trouts (added spaceFillWeight: 10 to morph2). What am >> I doing wrong? >> >> | container morph1 morph2 morph3 ex1 ex2 ex3 sp1 sp2| >> morph1 := (PanelMorph new fillStyle: (SolidFillStyle color: Color red)) >> hResizing: #spaceFill; >> vResizing: #spaceFill. >> morph2 := (PanelMorph new fillStyle: (SolidFillStyle color: Color blue)) >> hResizing: #spaceFill; >> vResizing: #spaceFill; >> spaceFillWeight: 10. >> morph3 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >> yellow)) >> hResizing: #spaceFill; >> vResizing: #spaceFill. >> ex1 := (UITheme builder newExpander: 'Red' for: morph1) expanded: true. >> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) expanded: true. >> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) expanded: >> true. >> sp1 := EdgeGripMorph new >> target: ex1; >> edgeName: #bottom; >> vResizing: #rigid; >> extent: 24 @ ProportionalSplitterMorph splitterWidth; >> on: #mouseDown send: #expandedSizingRigid to: ex1. >> sp2 := EdgeGripMorph new >> target: ex2; >> edgeName: #bottom; >> vResizing: #rigid; >> extent: 24 @ ProportionalSplitterMorph splitterWidth; >> on: #mouseDown send: #expandedSizingRigid to: ex2. >> container := UITheme builder newColumn: { ex1. sp1. ex2. sp2. ex3}. >> container cellInset: 0. >> container extent: 400@400. >> container openInWindow. >> >> Cheers, >> Doru >> >> >> >>> Regards, Gary >>> >>> ----- Original Message ----- From: "Tudor Girba" <tudor.girba(a)gmail.com> >>> To: <Pharo-project(a)lists.gforge.inria.fr> >>> Sent: Monday, January 24, 2011 2:32 PM >>> Subject: Re: [Pharo-project] collapsing panes >>> >>> >>> Thanks a lot, Gary! I gave it a try and it does go in the wanted >>> direction. >>> >>> Now, the next question. I see that you are using a TableLayout. Is there >>> a way to specify a proportion (like in the proportional layout?) for the >>> initial extent of the inner panes? >>> >>> If yes, then I suppose we could merge the two layouts into one. >>> >>> Cheers, >>> Doru >>> >>> >>> On 24 Jan 2011, at 14:51, Benjamin wrote: >>> >>>> I love that :) >>>> It could be very useful ^^ >>>> >>>> >>>> Ben >>>> >>>> On Jan 24, 2011, at 2:36 PM, Gary Chambers wrote: >>>> >>>>> Tricky... >>>>> Just an experiment, but try the following after filing in attached >>>>> change set. >>>>> Can make the re-proportioning explicit and maybe fix things to >>>>> constrain to >>>>> the owner morph if interested... >>>>> >>>>> >>>>> | container morph1 morph2 morph3 ex1 ex2 ex3 sp1 sp2| >>>>> morph1 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>> red)) >>>>> hResizing: #spaceFill; >>>>> vResizing: #spaceFill. >>>>> morph2 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>> blue)) >>>>> hResizing: #spaceFill; >>>>> vResizing: #spaceFill. >>>>> morph3 := (PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>> yellow)) >>>>> hResizing: #spaceFill; >>>>> vResizing: #spaceFill. >>>>> ex1 := (UITheme builder newExpander: 'Red' for: morph1) >>>>> expanded: true. >>>>> ex2 := (UITheme builder newExpander: 'Blue' for: morph2) >>>>> expanded: true. >>>>> ex3 := (UITheme builder newExpander: 'Yellow' for: morph3) >>>>> expanded: true. >>>>> sp1 := EdgeGripMorph new >>>>> target: ex1; >>>>> edgeName: #bottom; >>>>> vResizing: #rigid; >>>>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>>>> on: #mouseDown send: #expandedSizingRigid to: ex1. >>>>> sp2 := EdgeGripMorph new >>>>> target: ex2; >>>>> edgeName: #bottom; >>>>> vResizing: #rigid; >>>>> extent: 24 @ ProportionalSplitterMorph splitterWidth; >>>>> on: #mouseDown send: #expandedSizingRigid to: ex2. >>>>> container := UITheme builder newColumn: { >>>>> ex1. >>>>> sp1. >>>>> ex2. >>>>> sp2. >>>>> ex3}. >>>>> container cellInset: 0. >>>>> container extent: 400@400. >>>>> container openInWindow. >>>>> >>>>> >>>>> >>>>> Have a play/fun. >>>>> >>>>> Regards, Gary >>>>> >>>>> ----- Original Message ----- From: "Tudor Girba" >>>>> <tudor.girba(a)gmail.com> >>>>> To: "Pharo-project(a)lists.gforge.inria.fr Development" >>>>> <pharo-project(a)lists.gforge.inria.fr> >>>>> Sent: Friday, January 21, 2011 11:18 PM >>>>> Subject: [Pharo-project] collapsing panes >>>>> >>>>> >>>>> Hi, >>>>> >>>>> I have a question about how to obtain an effect similar to minimizing >>>>> a pane in Eclipse. Let's consider the example from below. I have a >>>>> ProportionalLayout because I want to fill the entire space and be able >>>>> to resize the inside panes. Now, I would also like to have some way of >>>>> collapsing one of the panes and have the rest resize to fill the rest >>>>> of the space. It's a bit like I would need some part of a behavior >>>>> from the TableLayout. >>>>> >>>>> Can anyone provide me with some hints in this direction? Do I need to >>>>> create a new Layout? >>>>> >>>>> | container morph1 morph2 morph3 window | >>>>> container := PanelMorph new. >>>>> morph1 := PanelMorph new fillStyle: (SolidFillStyle color: Color red). >>>>> morph2 := PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>> blue). >>>>> morph3 := PanelMorph new fillStyle: (SolidFillStyle color: Color >>>>> yellow). >>>>> container changeProportionalLayout. >>>>> container addMorph: morph1 fullFrame: (LayoutFrame fractions: (0 @ 0 >>>>> corner: 1 @ 0.33)). >>>>> container addMorph: morph2 fullFrame: (LayoutFrame fractions: (0 @ >>>>> 0.33 corner: 1 @ 0.66)). >>>>> container addMorph: morph3 fullFrame: (LayoutFrame fractions: (0 @ >>>>> 0.66 corner: 1 @ 1)). >>>>> container addPaneSplitters. >>>>> container fillStyle: (SolidFillStyle color: Color yellow). >>>>> container extent: 400@400. >>>>> container openInWindow. >>>>> >>>>> Cheers, >>>>> Doru >>>>> >>>>> >>>>> -- >>>>> www.tudorgirba.com >>>>> >>>>> "Be rather willing to give than demanding to get." >>>>> >>>>> >>>>> >>>>> <ExpanderTweak.1.cs> >>>> >>>> >>> >>> -- >>> www.tudorgirba.com >>> >>> "Every now and then stop and ask yourself if the war you're fighting is >>> the right one." >>> >>> >>> >>> >>> >> >> -- >> www.tudorgirba.com >> >> "Problem solving efficiency grows with the abstractness level of problem >> understanding." >> >> >> >> >> > > -- > www.tudorgirba.com > > "There are no old things, there are only old ways of looking at them." > > > > > -- www.tudorgirba.com "Sometimes the best solution is not the best solution."

Jan. 25, 2011