create new tag
view all tags


This subroutine sets the radius of the corners of the "current" text box.


      PASS         <top_left_radius>          FIELD            SHARE? N
      PASS         <top_right_radius>         FIELD            SHARE? N
      PASS         <bottom_right_radius>      FIELD            SHARE? N
      PASS         <bottom_left_radius>       FIELD            SHARE? N
      *        Check for error
      IF       0CD .TEXT SET BX CNR R         NE


This subroutine sets or resets the radius of the corners on a rounded edge. You must also set the corner style to Rounded via .TEXT SET BX CNR STYLE for this subroutine to have any effect.

The parameters are optional. If specified, they must be an unsigned integer in the range 1-999. They represent the radius of the specified corner in pixels. Any parameter that is blank will be reset to the default value of 10 pixels. The first parameter is the top left corner, the second is the top right, the third is bottom right and the fourth is bottom left. If only one parameter is passed, then all corners will be set to that value. Otherwise, the individual values are set as received. Any value not received is cleared indicating that an appropriate default should be used to render the box.

You can also use .TEXT SET BX CNR R:TL, .TEXT SET BX CNR R:TR, .TEXT SET BX CNR R:BL and .TEXT SET BX CNR R:BR to set an individual corner radius.


Read what other users have said about this page or add your own comments.

-- JeanNeron - 2011-11-18

Edit | Attach | Watch | Print version | History: r2 < r1 | Backlinks | Raw View | Raw edit | More topic actions
Topic revision: r2 - 2012-02-22 - JeanNeron
This site is powered by the TWiki collaboration platform Powered by PerlCopyright © 2008-2024 by the contributing authors. All material on this collaboration platform is the property of the contributing authors.
Ideas, requests, problems regarding TWiki? Send feedback