Full justification of text (VL-Web)

[PolyTimS]

Is there a way to have a paragraph of text within a text component use full justification? We have the text defined as the caption but only see Caption Alignment options for left, right, or center.
For clarity, full justification has both the left and right sides aligned, and it pads the spacing between the words to make that alignment work.

[Dino]

While the best solution is to request LANSA for an enhancement request to the existing control, a solution like this will work in the meantime:

Code: Select all

Begin_Com Role(*EXTENDS #PRIM_WEB) Theme(#SYS_THEME<MaterialDesignBlue>)

Define_Com Class(#PRIM_WEB.HtmlContainer) Name(#Html1) Description('Html Container') Displayposition(1) Height(200) Left(72) Parent(#COM_OWNER) Tabposition(1) Tabstop(False) Top(40) Width(150) Html('<p align="justify">To justify text in a word processor like Microsoft Word, select the text you want to justify, go to the "Home" tab, and click on the "Justify" option in the Paragraph group. In web design, you can use CSS by setting text-align: justify; in your style rules.</p>')

Evtroutine Handling(#Com_owner.Initialize)

Endroutine

End_Com

justify.png (32.36 KiB) Viewed 2018 times