{value
    let count:int=1
    let tfb:TextFlowBox =
        {TextFlowBox
            font-size=10pt,
            {paragraph
                There are {tiny a few words} in this paragraph, whose size is 60%
                of the size when {monospace tiny} is not in use.
                The ratio between the sizes remain the same when you change the
                font size of the entire paragraph. Click
                {CommandButton
                    label="this button",
                    {on Action do
                        {if count > 0 then
                            {value
                                set tfb.font-size = 20pt
                                set count = 0
                            }
                         else
                            {value
                                set tfb.font-size = 10pt
                                set count = 1
                            }
                        }
                    }
                }
                to see the effect.
            }
        }
    tfb
}