<html><head><style type='text/css'>p { margin: 0; }</style></head><body><div style='font-family: arial,helvetica,sans-serif; font-size: 12pt; color: #000000'><div>Hi Juan,</div><div><br></div><div></div><div>Checkout the latest ButtonMorph .cs file I sent. I also need an optional actionArgument to use with the actionSelector. I have some use case in the DrGeo Script builder dialog.</div><div><br></div><div>Thanks</div><div><br></div><div>Hilaire<br></div><br><div><span name="x"></span>Dr. Geo -- http://drgeo.eu<span name="x"></span><br></div><br><hr id="zwchr"><blockquote style="border-left:2px solid rgb(16, 16, 255);margin-left:5px;padding-left:5px;color:#000;font-weight:normal;font-style:normal;text-decoration:none;font-family:Helvetica,Arial,sans-serif;font-size:12pt;">
On 4/2/2022 4:15 AM, Hilaire Fernandes via Cuis-dev wrote:
<blockquote cite="mid:f285f5dc-bbc7-7029-7339-41ce7142476b@drgeo.eu">
<p><font size="4">I contributed the ButtonMorph in
Cuis-Smalltalk-UI, in the UI-Widgets package. It adds the
behaviors I need for DrGeo.<br>
</font></p>
<p><font size="4">you can check it out</font></p>
<p><font size="4">Hilaire<br>
</font></p>
<p><br>
</p>
<div class="moz-cite-prefix">Le 01/04/2022 à 20:23, Juan Vuletich
a écrit :<br>
</div>
<blockquote cite="mid:62474304.1010600@zoho.com">I
think it is best to avoid another button class. Please hack
PluggableButton as much as needed to get the color / border and
hover behavior as you need, and email me the change set. I'll
review it, and maybe I'll make the option a flag in Theme, or
maybe a preference, to include it in base Cuis.<br>
</blockquote>
<pre class="moz-signature">--
GNU Dr. Geo
<a class="moz-txt-link-freetext" href="http://drgeo.eu" target="_blank">http://drgeo.eu</a>
<a class="moz-txt-link-freetext" href="http://blog.drgeo.eu" target="_blank">http://blog.drgeo.eu</a></pre>
</blockquote>
<br>
Please try #5097 attached. This cs breaks your ButtonMorph, for it
to work again, use attached unsavedChanges...<br>
<br>
I slightly changed some of your selectors. I tried like this.<br>
<br>
-----Workspace1---- ButtonMorph<br>
b := ButtonMorph new.<br>
b openInWorld.<br>
b morphPosition: 100@100 extent: 200@100.<br>
b color: Color yellow darker.<br>
b borderWidth: 5; borderColor: Color green.<br>
<br>
b icon: Theme current closeIcon.<br>
b selectedColor: Color tan.<br>
b argument: false.<br>
b model: [ :b | b print. b ] stateGetter: #value: action: #print
label: nil.<br>
<br>
b argument: true. b redrawNeeded.<br>
b argument: false. b redrawNeeded.<br>
b disable.<br>
b enable.<br>
b adoptWidgetsColor: Color pink.<br>
-------------------------<br>
<br>
---- Workspace 2 ---- PluggableButtonMorph<br>
b := PluggableButtonMorph new.<br>
b openInWorld.<br>
b morphPosition: 400@100 extent: 200@100.<br>
b color: Color yellow darker.<br>
b borderWidth: 5; borderColor: Color green.<br>
<br>
b roundButtonStyle: false.<br>
b magnifiedIcon: Theme current closeIcon.<br>
b mouseOverColor: Color tan.<br>
b model: [ :b | b print. b ] stateGetter: #value:
stateGetterArgument: false action: #print label: nil.<br>
<br>
b stateGetterArgument: true. b redrawNeeded.<br>
b stateGetterArgument: false. b redrawNeeded.<br>
b disable.<br>
b enable.<br>
b adoptWidgetsColor: Color pink.<br>
-------------------<br>
<br>
If you think this is ok, I'll integrate it.<br>
<br>
Cheers,<br>
<pre class="moz-signature">--
Juan Vuletich
<a class="moz-txt-link-abbreviated" href="http://www.cuis-smalltalk.org" target="_blank">www.cuis-smalltalk.org</a>
<a class="moz-txt-link-freetext" href="https://github.com/Cuis-Smalltalk/Cuis-Smalltalk-Dev" target="_blank">https://github.com/Cuis-Smalltalk/Cuis-Smalltalk-Dev</a>
<a class="moz-txt-link-freetext" href="https://github.com/jvuletich" target="_blank">https://github.com/jvuletich</a>
<a class="moz-txt-link-freetext" href="https://www.linkedin.com/in/juan-vuletich-75611b3" target="_blank">https://www.linkedin.com/in/juan-vuletich-75611b3</a>
<a class="moz-txt-link-freetext" href="https://independent.academia.edu/JuanVuletich" target="_blank">https://independent.academia.edu/JuanVuletich</a>
<a class="moz-txt-link-freetext" href="https://www.researchgate.net/profile/Juan-Vuletich" target="_blank">https://www.researchgate.net/profile/Juan-Vuletich</a>
<a class="moz-txt-link-freetext" href="https://patents.justia.com/inventor/juan-manuel-vuletich" target="_blank">https://patents.justia.com/inventor/juan-manuel-vuletich</a>
<a class="moz-txt-link-freetext" href="https://twitter.com/JuanVuletich" target="_blank">https://twitter.com/JuanVuletich</a></pre>
</blockquote><br></div></body></html>