Where is the code for this ?Scott Wallace squeak-dev at lists.squeakfoundation.orgThu Sep 19 23:24:10 UTC 2002
--Boundary_(ID_oFMPrt8nv3hB93PcwtXO3g)
Content-type: text/plain; charset=us-ascii; format=flowed
Content-transfer-encoding: 7BIT
Hi, Albert,
I believe the code that defined the the standard halo icons is not in
the image, but rather the icons in the FormDictionary were created by
the postscript to an update a long time ago, back in late 1999 or
early 2000, and have simply lived in the image ever since.
I dug up the following, from an email from Bert Freudenberg to the
Squeak list, in October 1999, from whence IIRC the existing halo
icons were derived. By mimicking this code but using your own
form-creation data you could supplant any of these items, or add new
ones.
Hope this helps,
-- Scott
-----
Initialize halo icons in the standard form dictionary"
ScriptingSystem mergeGraphicsFrom: ((Dictionary new) add: ('Halo-Debug'->(Form
extent: 16 at 16
depth: 1
fromArray: #( 0 0 0 0 0 266338304 103809024 103809024
103809024 103809024 266338304 0 0 0 0 0)
offset: 0 at 0)); add: ('Halo-Tile'->(Form
extent: 16 at 16
depth: 1
fromArray: #( 0 0 0 0 0 536346624 536346624 404226048
404226048 536346624 536346624 0 0 0 0 0)
offset: 0 at 0)); add: ('Halo-Scale'->(Form
extent: 16 at 16
depth: 1
fromArray: #( 0 0 0 0 265289728 139460608 139460608 139460608
139460608 265289728 1048576 267386880 0 0 0 0)
offset: 0 at 0)); add: ('Halo-Menu'->(Form
extent: 16 at 16
depth: 1
fromArray: #( 0 0 0 267386880 267386880 267386880 135266304
267386880 135266304 267386880 135266304 267386880 0 0 0 0)
offset: 0 at 0)); add: ('Halo-Grab'->(Form
extent: 16 at 16
depth: 1
fromArray: #( 0 25165824 25165824 37748736 69206016 135266304
268959744 669253632 338165760 204472320 69206016 69206016 132120576 0
0 0)
offset: 0 at 0)); add: ('Halo-Drag'->(Form
extent: 16 at 16
depth: 1
fromArray: #( 0 0 0 473432064 268959744 401080320 69206016
69206016 69206016 69206016 401080320 268959744 473432064 0 0 0)
offset: 0 at 0)); add: ('Halo-Rot'->(Form
extent: 16 at 16
depth: 1
fromArray: #( 0 0 25165824 33554432 0 132120576 69730304
606339072 606339072 337641472 132120576 0 4194304 25165824 0 0)
offset: 0 at 0)); add: ('Halo-View'->(Form
extent: 16 at 16
depth: 1
fromArray: #( 0 0 0 0 132120576 486014976 770965504
1341259776 669253632 467140608 132120576 0 0 0 0 0)
offset: 0 at 0)); add: ('Halo-Dup'->(Form
extent: 16 at 16
depth: 1
fromArray: #( 0 0 0 0 528482304 276824064 284688384 277348352
285736960 520617984 17301504 33030144 0 0 0 0)
offset: 0 at 0)); add: ('Halo-Dismiss'->(Form
extent: 16 at 16
depth: 1
fromArray: #( 0 0 0 0 204472320 242221056 132120576 62914560
62914560 132120576 242221056 204472320 0 0 0 0)
offset: 0 at 0)); yourself)!
--------
At 6:32 AM -0700 9/19/02, Albert wrote:
>Hi all,
>
> I am seeking your help on finding some code. I am doing
>a project that will add a handle to the halo. In doing so I have
>been browsing the code for the "dismiss" handle.
>
> I need help in finding the code where the forms that "make up" the
>handles are drawn. I have found where they are located with the
>following code that I derived from looking at the
>--------------addHandle: handleSpec on: eventName send: selector to:
>recipient method in class HaloMorph.
>
> The code I used within a workspace just to see how the handle looks is:
>
>formDict _ ScriptingSystem formDictionary.
>
>form _ formDict at: #'Halo-Dismiss'.
>
>form displayOn: Display.
>
>
>The above "finds" the form for the dismiss handle, However can
>anyone tell me where the code is that actually creates/draws this
>form?
--Boundary_(ID_oFMPrt8nv3hB93PcwtXO3g)
Content-type: text/html; charset=us-ascii
Content-transfer-encoding: 7BIT
<!doctype html public "-//W3C//DTD W3 HTML//EN">
<html><head><style type="text/css"><!--
blockquote, dl, ul, ol, li { padding-top: 0 ; padding-bottom: 0 }
--></style><title>Re: Where is the code for this
?</title></head><body>
<div>Hi, Albert,</div>
<div><br></div>
<div>I believe the code that defined the the standard halo icons is
not in the image, but rather the icons in the FormDictionary were
created by the postscript to an update a long time ago, back in late
1999 or early 2000, and have simply lived in the image ever
since.</div>
<div><br></div>
<div>I dug up the following, from an email from Bert Freudenberg to
the Squeak list, in October 1999, from whence IIRC the existing halo
icons were derived. By mimicking this code but using your own
form-creation data you could supplant any of these items, or add new
ones.</div>
<div><br></div>
<div>Hope this helps,</div>
<div><br></div>
<div> -- Scott</div>
<div><br></div>
<div><br></div>
<div>-----</div>
<div><br></div>
<div>Initialize halo icons in the standard form dictionary"<br>
ScriptingSystem mergeGraphicsFrom: ((Dictionary new) add:
('Halo-Debug'->(Form<br>
<x-tab> </x-tab>extent: 16 at 16<br>
<x-tab> </x-tab>depth: 1</div>
<div><x-tab>
</x-tab>fromArray: #( 0 0 0 0 0 266338304 103809024 103809024
103809024 103809024 266338304 0 0 0 0 0)<br>
<x-tab> </x-tab>offset: 0 at 0)); add: ('Halo-Tile'->(Form<br>
<x-tab> </x-tab>extent: 16 at 16<br>
<x-tab> </x-tab>depth: 1<br>
<x-tab> </x-tab>fromArray:
#( 0 0 0 0 0 536346624 536346624 404226048 404226048 536346624
536346624 0 0 0 0 0)<br>
<x-tab> </x-tab>offset: 0 at 0)); add: ('Halo-Scale'->(Form<br>
<x-tab> </x-tab>extent:
16 at 16<br>
<x-tab> </x-tab>depth: 1<br>
<x-tab> </x-tab>fromArray:
#( 0 0 0 0 265289728 139460608 139460608 139460608 139460608 265289728
1048576 267386880 0 0 0 0)<br>
<x-tab> </x-tab>offset: 0 at 0)); add:
('Halo-Menu'->(Form</div>
<div><x-tab> </x-tab>extent:
16 at 16</div>
<div><x-tab> </x-tab>depth:
1<br>
<x-tab> </x-tab>fromArray:
#( 0 0 0 267386880 267386880 267386880 135266304 267386880 135266304
267386880 135266304 267386880 0 0 0 0)<br>
<x-tab> </x-tab>offset: 0 at 0)); add: ('Halo-Grab'->(Form<br>
<x-tab> </x-tab>extent: 16 at 16<br>
<x-tab> </x-tab>depth: 1<br>
<x-tab> </x-tab>fromArray:
#( 0 25165824 25165824 37748736 69206016 135266304 268959744 669253632
338165760 204472320 69206016 69206016 132120576 0 0 0)<br>
<x-tab> </x-tab>offset:
0 at 0)); add: ('Halo-Drag'->(Form<br>
<x-tab> </x-tab>extent: 16 at 16<br>
<x-tab> </x-tab>depth: 1<br>
<x-tab> </x-tab>fromArray:
#( 0 0 0 473432064 268959744 401080320 69206016 69206016 69206016
69206016 401080320 268959744 473432064 0 0 0)<br>
<x-tab> </x-tab>offset: 0 at 0)); add:
('Halo-Rot'->(Form<br>
<x-tab> </x-tab>extent: 16 at 16<br>
<x-tab> </x-tab>depth: 1<br>
<x-tab> </x-tab>fromArray:
#( 0 0 25165824 33554432 0 132120576 69730304 606339072 606339072
337641472 132120576 0 4194304 25165824 0 0)<br>
<x-tab> </x-tab>offset:
0 at 0)); add: ('Halo-View'->(Form<br>
<x-tab> </x-tab>extent: 16 at 16<br>
<x-tab> </x-tab>depth: 1<br>
<x-tab> </x-tab>fromArray:
#( 0 0 0 0 132120576 486014976 770965504 1341259776 669253632
467140608 132120576 0 0 0 0 0)<br>
<x-tab> </x-tab>offset: 0 at 0)); add: ('Halo-Dup'->(Form<br>
<x-tab> </x-tab>extent: 16 at 16<br>
<x-tab> </x-tab>depth: 1<br>
<x-tab> </x-tab>fromArray:
#( 0 0 0 0 528482304 276824064 284688384 277348352 285736960 520617984
17301504 33030144 0 0 0 0)<br>
<x-tab> </x-tab>offset: 0 at 0)); add:
('Halo-Dismiss'->(Form<br>
<x-tab> </x-tab>extent: 16 at 16<br>
<x-tab> </x-tab>depth: 1<br>
<x-tab> </x-tab>fromArray:
#( 0 0 0 0 204472320 242221056 132120576 62914560 62914560 132120576
242221056 204472320 0 0 0 0)</div>
<div><x-tab> </x-tab>offset:
0 at 0)); yourself)!</div>
<div><br></div>
<div>--------</div>
<div><br></div>
<div>At 6:32 AM -0700 9/19/02, Albert wrote:</div>
<blockquote type="cite" cite>Hi all,<br>
</blockquote>
<blockquote type="cite"
cite>
I am seeking your help on finding some code. I am doing a project that
will add a handle to the halo. In doing so I have been browsing the
code for the "dismiss" handle.<br>
</blockquote>
<blockquote type="cite" cite> I need help in finding the code
where the forms that "make up" the handles are drawn. I have found
where they are located with the following code that I derived from
looking at the --------------addHandle: handleSpec on: eventName send:
selector to: recipient method in class HaloMorph.<br>
</blockquote>
<blockquote type="cite" cite> The code I used within a workspace
just to see how the handle looks is:<br>
</blockquote>
<blockquote type="cite" cite>formDict _ ScriptingSystem
formDictionary.<br>
</blockquote>
<blockquote type="cite" cite>form _ formDict at: #'Halo-Dismiss'.<br>
</blockquote>
<blockquote type="cite" cite>form displayOn: Display.<br>
</blockquote>
<blockquote type="cite" cite><br></blockquote>
<blockquote type="cite" cite>The above "finds" the form for the
dismiss handle, However can anyone tell me where the code is that
actually creates/draws this form?</blockquote>
<div><font face="Helvetica"><br></font></div>
</body>
</html>
--Boundary_(ID_oFMPrt8nv3hB93PcwtXO3g)--
More information about the Squeak-dev mailing list |