This subroutine sets the right margin for the text in the "current" Text Object .
PASS <right_margin> FIELD SHARE? N GOSUB 0CD .TEXT SET TXT MARGIN:R * Check for error IF 0CD .TEXT SET TXT MARGIN:R NE
This subroutine sets the right margin for the text in the "current" Text Object.
The parameter is optional. If specified, it must be an unsigned integer in the range 1-99999. It represents the margin in pixels. A blank will be reset to the default. By default, the left and right margins are approximately half the font width, and the top and bottom margins are approximately 1/4 of the font height.
You can also use .TEXT SET TXT MARGIN:L, .TEXT SET TXT MARGIN:T and .TEXT SET TXT MARGIN:B to set each margin or .TEXT SET TXT MARGIN to set all the margins at once.
Read what other users have said about this page or add your own comments.
-- JeanNeron - 2011-11-18