<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 10pt;
font-family:Tahoma
}
--></style>
</head>
<body class='hmmessage'><div dir='ltr'>
<font class="Apple-style-span" face="Tahoma" size="2"><div><font class="Apple-style-span" face="Tahoma" size="2">This is the method I use, although there are plenty of uses:</font></div><div><font class="Apple-style-span" face="Tahoma" size="2"><br></font></div>WASession#initialize</font><div><div style="font-family: Tahoma; font-size: 10pt; "><span class="Apple-tab-span" style="white-space:pre"> </span>super initialize.</div><div style="font-family: Tahoma; font-size: 10pt; "><span class="Apple-tab-span" style="white-space:pre"> </span>announcer := Announcer new.</div><div style="font-family: Tahoma; font-size: 10pt; "><br></div><div style="font-family: Tahoma; font-size: 10pt; "><div>WASession#on: announcement send: method to: object</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>announcer </div><div><span class="Apple-tab-span" style="white-space:pre"> </span>on: announcement </div><div><span class="Apple-tab-span" style="white-space:pre"> </span>send: method</div><div><span class="Apple-tab-span" style="white-space:pre"> </span>to: object</div></div><div style="font-family: Tahoma; font-size: 10pt; "><br></div><div style="font-family: Tahoma; font-size: 10pt; ">AnAnnouncementSubclass class #on: payLoad</div><div style="font-family: Tahoma; font-size: 10pt; "><span class="Apple-tab-span" style="white-space:pre"> </span>^(self new) payload: payLoad; yourself.</div><div style="font-family: Tahoma; font-size: 10pt; "><br></div><div style="font-family: Tahoma; font-size: 10pt; ">AComponent#initialize</div><div style="font-family: Tahoma; font-size: 10pt; "><span class="Apple-tab-span" style="white-space:pre"> </span>super initialize.</div><div style="font-family: Tahoma; font-size: 10pt; "><span class="Apple-tab-span" style="white-space:pre"> </span>self session on: AnAnnouncementSubclass send: #onChangeContent: to: self.</div><div style="font-family: Tahoma; font-size: 10pt; "><br></div><div><div><font class="Apple-style-span" face="Tahoma" size="2">AComponent#children</font></div><div><font class="Apple-style-span" face="Tahoma" size="2"><span class="Apple-tab-span" style="white-space: pre; "> </span>^Array with: self content.</font></div></div><div style="font-family: Tahoma; font-size: 10pt; "><br></div><div><font class="Apple-style-span" face="Tahoma" size="2">AComponent#onChangeContent: anAnnouncement</font></div><div><font class="Apple-style-span" face="Tahoma" size="2"><span class="Apple-tab-span" style="white-space: pre; "> </span>self content: anAnnouncement payload.</font></div><div><font class="Apple-style-span" face="Tahoma" size="2"><br></font></div><div><font class="Apple-style-span" face="Tahoma" size="2">Then call it this way:</font></div><div><font class="Apple-style-span" face="Tahoma" size="2"><br></font></div><div><font class="Apple-style-span" face="Tahoma" size="2">self session announce: (AnAnnouncementSubclass on: WACounter new).</font></div><div><font class="Apple-style-span" face="Tahoma" size="2"><br></font></div><div><font class="Apple-style-span" face="Tahoma" size="2">RS</font></div><br><div style="font-family: Tahoma; font-size: 10pt; ">> Date: Tue, 30 Aug 2011 16:26:17 +0200<br>> From: tulipe.moutarde@gmail.com<br>> To: seaside@lists.squeakfoundation.org<br>> Subject: Re: [Seaside] Component navigation<br>> <br>> > I'll focus on James and Robert approaches, although I'm not sure what<br>> > Announcements are. I'll search some info on that =)<br>> <br>> This should help:<br>> http://book.seaside.st/book/components/embedding/coupling<br>> _______________________________________________<br>> seaside mailing list<br>> seaside@lists.squeakfoundation.org<br>> http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside<br></div></div> </div></body>
</html>