<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 10pt;
font-family:Tahoma
}
--></style>
</head>
<body class='hmmessage'>
Browse WAChoiceDialog.<div><br></div><div>You can make it as simple as:</div><div><br></div><div>renderContentOn: html</div><div><br></div><div> html form: [ html select list: (Array with: 'a' with: 'b'); callback: [:v | self selected: v ] ].</div><div> html text: self selected.</div><div><br></div><div>selected</div><div> ^selected ifNil: [ selected := 'Choose a value to print.' ].</div><div><br></div><div>selected: aRenderable</div><div> selected := aRenderable.</div><div><div><br></div><div>(Doing this from memory)</div><div>RS<br><br><hr id="stopSpelling">From: abalonpe@ulb.ac.be<br>To: seaside@lists.squeakfoundation.org<br>Date: Tue, 26 Oct 2010 16:20:16 +0000<br>Subject: [Seaside] Problem smalltalk code<br><br>
<meta http-equiv="Content-Type" content="text/html; charset=unicode">
<meta name="Generator" content="Microsoft SafeHTML">
<style>
.ExternalClass .ecxhmmessage P
{padding:0px;}
.ExternalClass body.ecxhmmessage
{font-size:10pt;font-family:Tahoma;}
</style>
<font class="ecxApple-style-span" face="Tahoma" size="4"><span class="ecxApple-style-span" style="font-size:10pt">Hi,</span></font><div style="font-family:Tahoma;font-size:10pt"><br></div><div style="font-family:Tahoma;font-size:10pt">I'm stuck on a problem with smalltalk.</div><div style="font-family:Tahoma;font-size:10pt">Here is my code:</div><div style="font-family:Tahoma;font-size:10pt"><br></div><div><span class="ecxApple-tab-span" style="white-space:pre;font-family:Tahoma;font-size:10pt"> </span><font class="ecxApple-style-span" face="Tahoma" size="4"><span class="ecxApple-style-span" style="font-size:10pt"> </span></font><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">renderBibTypeOn: canvas </span></font></div><div><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"><br></span></font></div><div><span class="ecxApple-tab-span" style="white-space:pre"><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"> </span></font></span><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">| tagID | </span></font></div><div><span class="ecxApple-tab-span" style="white-space:pre"><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"> </span></font></span><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">canvas div: [ </span></font></div><div><span class="ecxApple-tab-span" style="white-space:pre"><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"> </span></font></span><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">canvas label </span></font></div><div><span class="ecxApple-tab-span" style="white-space:pre"><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"> </span></font></span><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">for: (tagID := canvas nextId); </span></font></div><div><span class="ecxApple-tab-span" style="white-space:pre"><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"> </span></font></span><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">with: 'BibteX Type:'. </span></font></div><div><span class="ecxApple-tab-span" style="white-space:pre"><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"> </span></font></span><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">canvas select </span></font></div><div><span class="ecxApple-tab-span" style="white-space:pre"><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"> </span></font></span><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">id: tagID; </span></font></div><div><span class="ecxApple-tab-span" style="white-space:pre"><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"> </span></font></span><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">selected: bibEntry bibType ; </span></font></div><div><span class="ecxApple-tab-span" style="white-space:pre"><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"> </span></font></span><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">list: bibEntry bibTypeList; </span></font></div><div><span class="ecxApple-tab-span" style="white-space:pre"><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"> </span></font></span><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">callback: [:value | bibEntry bibType: value].</span></font></div><div><span class="ecxApple-tab-span" style="white-space:pre"><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"> </span></font></span><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"> ].</span></font></div><div><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"><br></span></font></div><div><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">I'd like to change what is displayed on my webpage according to what the user choose from the scroll list.</span></font></div><div><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">I saw that there was an exemple of this on localhost-->browse-->examples-->examplebrowser </span></font></div><div><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">but the code of this exemple is not online on the contraty of the other examples.</span></font></div><div><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">Could you help me with this code or post the code of the examplebrowser?</span></font></div><div><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px"><br></span></font></div><div><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">Thank you very much</span></font></div><div><font class="ecxApple-style-span" face="Tahoma" size="3"><span class="ecxApple-style-span" style="font-size:13px">alex</span></font></div>
<br>_______________________________________________
seaside mailing list
seaside@lists.squeakfoundation.org
http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside</div></div> </body>
</html>