<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta content="text/html; charset=UTF-8" http-equiv="Content-Type">
</head>
<body bgcolor="#ffffff" text="#000000">
On 1/27/2022 7:44 AM, Hilaire Fernandes via Cuis-dev wrote:
<blockquote cite="mid:18c57d33-9cad-73a9-a996-5a5f1758568f@drgeo.eu"
type="cite">
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<p><font size="4">Hi Ken, <br>
</font></p>
<p><font size="4">I have noted this lack of accuracy in alignment
with RadioGroup:</font></p>
<img moz-do-not-send="false"
src="cid:part1.01020903.02070002@zoho.com" alt="" height="201"
width="220">
<p><br>
</p>
<p>Both the button and label are centered but the label is not
correctly centered. I suspect something related to font height
or related.<br>
</p>
<p>In the meantime, I will make a CheckGroup based on your
RadioGroup, or may be the reverse. I will see.</p>
<p>Best<br>
</p>
<p>Hilaire<br>
</p>
<pre class="moz-signature" cols="72">--
GNU Dr. Geo
<a moz-do-not-send="true" class="moz-txt-link-freetext" href="http://drgeo.eu">http://drgeo.eu</a>
<a moz-do-not-send="true" class="moz-txt-link-freetext" href="http://blog.drgeo.eu">http://blog.drgeo.eu</a></pre>
</blockquote>
<br>
Hi Folks,<br>
<br>
The alignment of labels is due to CheckGroup>>list: adding 2
to `self font lineSpacing`. Additionally, there is the effect of
having text with ascenders but no descenders. If you do<br>
<br>
example1<br>
"<br>
self example1 openInWorld<br>
"<br>
| group |<br>
group _ self fromList: #('gyjYes' 'gyjNo').<br>
group buttons do: [:each | <br>
each when: #radioSelection send: #show: to: Transcript].<br>
^ group<br>
<br>
it will look more centered.<br>
<br>
To see better, install a true type font, and zoom the morph :)<br>
<br>
Cheers,<br>
<pre class="moz-signature" cols="72">--
Juan Vuletich
<a class="moz-txt-link-abbreviated" href="http://www.cuis-smalltalk.org">www.cuis-smalltalk.org</a>
<a class="moz-txt-link-freetext" href="https://github.com/Cuis-Smalltalk/Cuis-Smalltalk-Dev">https://github.com/Cuis-Smalltalk/Cuis-Smalltalk-Dev</a>
<a class="moz-txt-link-freetext" href="https://github.com/jvuletich">https://github.com/jvuletich</a>
<a class="moz-txt-link-freetext" href="https://www.linkedin.com/in/juan-vuletich-75611b3">https://www.linkedin.com/in/juan-vuletich-75611b3</a>
<a class="moz-txt-link-freetext" href="https://independent.academia.edu/JuanVuletich">https://independent.academia.edu/JuanVuletich</a>
<a class="moz-txt-link-freetext" href="https://www.researchgate.net/profile/Juan-Vuletich">https://www.researchgate.net/profile/Juan-Vuletich</a>
<a class="moz-txt-link-freetext" href="https://patents.justia.com/inventor/juan-manuel-vuletich">https://patents.justia.com/inventor/juan-manuel-vuletich</a>
@JuanVuletich</pre>
</body>
</html>