February 2010 - Pharo-dev - lists.pharo.org

Re: [Pharo-project] simulating Mousewheel

by StÃ©phane Ducasse

Thanks chris. I never got the time to sit and read all the changes mike did for the inputEvent logic so my knowledge is bad in that area. Now I was wondering when your mouse wheel turns to get button down events? in any case this is great to share that with us because once we will have fixed the obvious and ugly we will have to fix the non-obvious and ugly to finally get started building beauty :) BTW "mouse event" ((eventBuffer at: 5) anyMask: 1) do you know if it would be possible to have eventBuffer isMouseEvent instead of the above? Stef > Running Pharo on an IBM Thinkpad with a trackpoint input device, I was a bit > disappointed, that the autoscroll feature does not work in Pharo (pressing > Button-2 and moving the mouse pointer should scroll the window below the mouse > pointer). > I took it as an exercise and the attached code does what I want, but it does not > feel right (like not at the the right 'level'): Is there a place in the Morph hierarchy where such behavior changes could be plugged in? > Or did I overlook a preference setting ;) ? :) > > Cheers, Chris > > > Object subclass: #InputEventFetcher > instanceVariableNames: 'eventHandlers fetcherProcess inputSemaphore mousewheel ycoord' > classVariableNames: 'Default' > poolDictionaries: 'EventSensorConstants' > category: 'Kernel-Processes' > > InputEventFetcher>> signalEvent: eventBuffer > "Signal the event buffer to all registered event handlers. > Handlers need make sure to copy the buffer or extract the data otherwise, as the buffer will be reused." > > self simulateMousewheel: eventBuffer. > > self eventHandlers do: [:handler | > handler handleEvent: eventBuffer] > > InputEventFetcher>> simulateMousewheel: eventBuffer > "MOusewheel up: 2 time 30 0 2 0 0 1 > MOusewheel down: 2 time 31 0 2 0 0 1 > " > > | ycur keysym up down | > keysym := nil. > up := 30. > down := 31. > (eventBuffer at: 1) = 1 > ifTrue: > [ "mouse event" > ((eventBuffer at: 5) anyMask: 1) > ifTrue: > [ "yellow button down" > mousewheel > ifFalse: > [ "first time: do nothing" > mousewheel := true. > ycoord := eventBuffer at: 4 ] > ifTrue: > [ "handle movement" > ycur := eventBuffer at: 4. > ycur - ycoord > 1 > ifTrue: > [ keysym := down. > ycoord := ycur ]. > ycur - ycoord < -1 > ifTrue: > [ keysym := up. > ycoord := ycur ]. > keysym isNil > ifTrue: > [ "make it a Null event" > eventBuffer at: 1 put: 0 ] > ifFalse: > [ eventBuffer at: 1 put: 2. > eventBuffer at: 3 put: keysym. > eventBuffer > replaceFrom: 4 > to: 8 > with: #(0 2 0 0 1) ] ] ] > ifFalse: > [ "yellowbutton up" > mousewheel := false ] ]. > ^ eventBuffer_______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Feb. 20, 2010

Re: [Pharo-project] [update 1.1] #11220

by StÃ©phane Ducasse

Again a simple line but a cool effect. Thanks JB to decide to team this beast. Now it means that Utilities nearly contain exclusively Update logic so we will be able to rename it Updater.... Amazing. When I think that I started to clean it in 3.7 or something like that Stef On Feb 19, 2010, at 6:59 PM, Marcus Denker wrote: > 11220 > ----- > > Issue 2006: Cleaning RecentSubmission From Utilities > > > -- > Marcus Denker -- http://www.marcusdenker.de > INRIA Lille -- Nord Europe. Team RMoD. > > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Feb. 20, 2010

Re: [Pharo-project] [update 1.1] #11219

by StÃ©phane Ducasse

Hi guys This single line may seems simple but after a lot of thoughts and analysis we decided to remove SketchMorph (there is imageMorph), SketchMorphEditor, PaintBoxMorph, PaintBoxColorPickerMorph (was just the third one in the image). CUIS also removed such classes and it makes the system way cleaner (Yes I know we are always saying the same) Stef On Feb 19, 2010, at 7:09 PM, Marcus Denker wrote: > Issue 2007: SketchMorph, PaintBoxMorph and friends removal > -- > Marcus Denker -- http://www.marcusdenker.de > INRIA Lille -- Nord Europe. Team RMoD. > > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Feb. 20, 2010

Re: [Pharo-project] [update 1.1] #11221

by StÃ©phane Ducasse

Thanks alain Your work is really making the system more tangled. We are going in the right direction - no preferences bad class anymore - declarative menu world building Excellent On Feb 20, 2010, at 7:57 AM, Alain Plantec wrote: > Torsten Bergmann a Ã©crit : >> Issue 2014: delete class TheWorldMenu >> >> >> OK - but how to register a tool for the menu now? Many class >> side initializers will call "TheWorldMenu register..." to >> register for the menu. They wont load in 1.1 and have to be reworked. >> >> Bye >> T. >> >> > you just have to write a method like the following: > > RecentMessageSet class>>menuCommandOn: aBuilder > <worldMenu> > (aBuilder item: #'Recent Submissions') > action: [Utilities browseRecentSubmissions]; > parent: #CodeRecoveringTools; > help: 'Browse your last methods submissions'; > icon: self taskbarIcon > > See MenuRegistration comments for more informations about how to record > your own menus. > > Cheers > Alain > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Feb. 20, 2010

Re: [Pharo-project] [update 1.1] #11221

by Alain Plantec

Torsten Bergmann a Ã©crit : > Issue 2014: delete class TheWorldMenu > > > OK - but how to register a tool for the menu now? Many class > side initializers will call "TheWorldMenu register..." to > register for the menu. They wont load in 1.1 and have to be reworked. > > Bye > T. > > you just have to write a method like the following: RecentMessageSet class>>menuCommandOn: aBuilder <worldMenu> (aBuilder item: #'Recent Submissions') action: [Utilities browseRecentSubmissions]; parent: #CodeRecoveringTools; help: 'Browse your last methods submissions'; icon: self taskbarIcon See MenuRegistration comments for more informations about how to record your own menus. Cheers Alain

Feb. 20, 2010

Re: [Pharo-project] Class Browser

by csrabak＠bol.com.br

Anthony, I'm not sure if I understood correctly your question, but I think a good start to search about the icons is http://scg.unibe.ch/research/hermion/icons HTH -- Cesar Rabak Em 19/02/2010 05:01, Anthony G. Anton III < agantoniii(a)earthlink.net > escreveu: Correction (sorry for the confusion)... My apologies if I have overlooked obvious sources which provide the answer to the question... Where is there documentation to be found describing the meaning of list entry icons (on left side of lists) in the Class Browser? I am poking around in the "Pharo1.0-10508-rc2dev10.01.2" image and am not coming up with answers. I've been able to guess at the meaning of some but others escape me. -- ---------------------------------------------------------------------- Anthony Anton 3800 243rd Place SE Phone: 425-313-1024 Issaquah, WA 98029 Cell: 425-444-3084 Concept Systems agantoniii(a)earthlink.net FAX: 425-313-1024 _______________________________________________ Pharo-project mailing list Pharo-project(a)lists.gforge.inria.fr http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Feb. 20, 2010

Re: [Pharo-project] Substrings for strings?

by Nathan Tuttle

but it worked! and it helped me I didn't have to override strings! 2010/2/19 Peter Hugosson-Miller <oldmanlink(a)gmail.com> > On 20 feb 2010, at 02.44, Nathan Tuttle <nathan.tuttle(a)gmail.com> wrote: > > Thank you very much! > > > ...says he, generously ignoring my copy/paste error. > > Seriously, when will I learn not to post untested code in an email, no > matter how trivial it seems at the time? Still, at least I spelled the > method name correctly :-p. > > -- > Cheers, > Peter > > 2010/2/19 Peter Hugosson-Miller < <oldmanlink(a)gmail.com> > oldmanlink(a)gmail.com> > >> location := 5. >> length := 3. >> result := 'Foo Bar Baz' copyFrom: location to: position + length - 1 >> >> >> >> 2010/2/20 Nathan Tuttle < <nathan.tuttle(a)gmail.com> >> nathan.tuttle(a)gmail.com> >> >>> I can't find any method that allows me to take a substring out of a >>> string my location and length. >>> >>> Anyone know? >>> >>> _______________________________________________ >>> Pharo-project mailing list >>> <Pharo-project(a)lists.gforge.inria.fr> >>> Pharo-project(a)lists.gforge.inria.fr >>> <http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project> >>> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project >>> >> >> >> >> -- >> Cheers, >> Peter >> >> _______________________________________________ >> Pharo-project mailing list >> <Pharo-project(a)lists.gforge.inria.fr>Pharo-project(a)lists.gforge.inria.fr >> <http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project> >> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project >> > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project > > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project >

Feb. 20, 2010

Re: [Pharo-project] Substrings for strings?

by Peter Hugosson-Miller

On 20 feb 2010, at 02.44, Nathan Tuttle <nathan.tuttle(a)gmail.com> wrote: > Thank you very much! ...says he, generously ignoring my copy/paste error. Seriously, when will I learn not to post untested code in an email, no matter how trivial it seems at the time? Still, at least I spelled the method name correctly :-p. -- Cheers, Peter > 2010/2/19 Peter Hugosson-Miller <oldmanlink(a)gmail.com> > location := 5. > length := 3. > result := 'Foo Bar Baz' copyFrom: location to: position + length - 1 > > > > 2010/2/20 Nathan Tuttle <nathan.tuttle(a)gmail.com> > I can't find any method that allows me to take a substring out of a > string my location and length. > > Anyone know? > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project > > > > -- > Cheers, > Peter > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Feb. 20, 2010

Re: [Pharo-project] Substrings for strings?

by Nathan Tuttle

Thank you very much! 2010/2/19 Peter Hugosson-Miller <oldmanlink(a)gmail.com> > location := 5. > length := 3. > result := 'Foo Bar Baz' copyFrom: location to: position + length - 1 > > > > 2010/2/20 Nathan Tuttle <nathan.tuttle(a)gmail.com> > >> I can't find any method that allows me to take a substring out of a string >> my location and length. >> >> Anyone know? >> >> _______________________________________________ >> Pharo-project mailing list >> Pharo-project(a)lists.gforge.inria.fr >> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project >> > > > > -- > Cheers, > Peter > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project >

Feb. 20, 2010

[Pharo-project] simulating Mousewheel

by Ch Lamprecht

Running Pharo on an IBM Thinkpad with a trackpoint input device, I was a bit disappointed, that the autoscroll feature does not work in Pharo (pressing Button-2 and moving the mouse pointer should scroll the window below the mouse pointer). I took it as an exercise and the attached code does what I want, but it does not feel right (like not at the the right 'level'): Is there a place in the Morph hierarchy where such behavior changes could be plugged in? Or did I overlook a preference setting ;) ? Cheers, Chris Object subclass: #InputEventFetcher instanceVariableNames: 'eventHandlers fetcherProcess inputSemaphore mousewheel ycoord' classVariableNames: 'Default' poolDictionaries: 'EventSensorConstants' category: 'Kernel-Processes' InputEventFetcher>> signalEvent: eventBuffer "Signal the event buffer to all registered event handlers. Handlers need make sure to copy the buffer or extract the data otherwise, as the buffer will be reused." self simulateMousewheel: eventBuffer. self eventHandlers do: [:handler | handler handleEvent: eventBuffer] InputEventFetcher>> simulateMousewheel: eventBuffer "MOusewheel up: 2 time 30 0 2 0 0 1 MOusewheel down: 2 time 31 0 2 0 0 1 " | ycur keysym up down | keysym := nil. up := 30. down := 31. (eventBuffer at: 1) = 1 ifTrue: [ "mouse event" ((eventBuffer at: 5) anyMask: 1) ifTrue: [ "yellow button down" mousewheel ifFalse: [ "first time: do nothing" mousewheel := true. ycoord := eventBuffer at: 4 ] ifTrue: [ "handle movement" ycur := eventBuffer at: 4. ycur - ycoord > 1 ifTrue: [ keysym := down. ycoord := ycur ]. ycur - ycoord < -1 ifTrue: [ keysym := up. ycoord := ycur ]. keysym isNil ifTrue: [ "make it a Null event" eventBuffer at: 1 put: 0 ] ifFalse: [ eventBuffer at: 1 put: 2. eventBuffer at: 3 put: keysym. eventBuffer replaceFrom: 4 to: 8 with: #(0 2 0 0 1) ] ] ] ifFalse: [ "yellowbutton up" mousewheel := false ] ]. ^ eventBuffer

Feb. 20, 2010