[Cuis-dev] Dialog molding tool

Hernán Wilkinson hernan.wilkinson at 10pines.com
Wed May 3 12:01:31 PDT 2023


Great!!! nice!

On Wed, May 3, 2023 at 3:39 PM Juan Vuletich via Cuis-dev <
cuis-dev at lists.cuis.st> wrote:

> Hi Hilaire,
>
> I'm sure this will be useful for many projects. Thanks for doing it!
>
> Cheers,
>
> On 4/29/2023 4:43 AM, Hilaire Fernandes via Cuis-dev wrote:
>
> Hi,
>
> I have finished the first round of the package for GUI dialog molding
> tool. It is a helper to build field Morph dialog and to validate user input
> data.
>
> In top of the UI-Mold package there a the test package UI-Mold-Test.
>
> Checkout at https://github.com/Cuis-Smalltalk/Cuis-Smalltalk-UI
>
> Example of field descriptions and inter-field validations:
> ...
>
> Smalltalk code to describe it:
>
>  | mold fullname email confirmEmail |
>     mold := Mold new.
>     fullname := mold stringField
>         on: #propertyValue of: ValueHolder new;
>         label: 'Your Name';
>         beRequired;
>         addCondition: [ :input | input includesSubString: ' ']
>             labeled:
>                 [ :wrong |
>                 'Please enter your first and last name. I couldn''t find a space in {1}' format:  {wrong} ].
>     email := mold emailField
>         on: #propertyValue of: ValueHolder new;
>         label: 'Email Address:'.
>     confirmEmail := mold emailField
>         on: #propertyValue of: ValueHolder new;
>         label: 'Confirm Email:'.
>     email
>         addCondition: [ :input | input = confirmEmail input ]
>         labeled: 'Email addresses did not match.'.
>     confirmEmail
>         addCondition: [ :input | input = email input ]
>         labeled: 'Email addresses did not match.'.
>     mold textField
>         on: #propertyValue of: ValueHolder new;
>         label: 'About yourself.';
>         beRequired.
>     mold checkboxField
>         on: #propertyValue of: (ValueHolder with: true);
>         label: 'Sign for the newsletter';
>         addCondition: [ :input | fullname isValid not or: [ input or: [ fullname value first = $K ] ] ]
>             labeled: 'Sorry, you may not opt out of our spam unless your name starts with K.'.
>     mold openDialog: 'Example Eight'
>
> --
> GNU Dr. Geohttp://drgeo.euhttp://blog.drgeo.eu
>
>
>
> --
> Juan Vuletichcuis.stgithub.com/jvuletichresearchgate.net/profile/Juan-Vuletichindependent.academia.edu/JuanVuletichpatents.justia.com/inventor/juan-manuel-vuletichlinkedin.com/in/juan-vuletich-75611b3twitter.com/JuanVuletich
>
> --
> Cuis-dev mailing list
> Cuis-dev at lists.cuis.st
> https://lists.cuis.st/mailman/listinfo/cuis-dev
>


-- 

*Hernán WilkinsonAgile Software Development, Teaching & Coaching*
*Phone: +54-011*-4893-2057
*Twitter: @HernanWilkinson*
*site: http://www.10Pines.com <http://www.10pines.com/>*
Address: Alem 896, Floor 6, Buenos Aires, Argentina
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.cuis.st/mailman/archives/cuis-dev/attachments/20230503/5c87c7c9/attachment.htm>


More information about the Cuis-dev mailing list