Changing number of columns

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   We use 80x24 screens on most applications (sometimes 132x24). I'd like to change to different font sizes within my Pick programs.  For example, I need about 90 columns, so I can EXECUTE TERM 132, but now my font is fairly small.  I'd like to EXECUTE TERM 132, then change the font size so 90 columns fill the screen nicely. When done, I'd like to go back to 80 column mode.

I know I can set the font size to 90 in the logon script, but I'd like to be able to change the font size on the fly from Pick programs.

Can I execute a macro or script or something?

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
anonymous Members Profile Find Members Posts Groupie Joined: January 15 2004 Location: United States Status: Offline Points: 46	Post Options Post Reply Quote anonymous Report Post Thanks(0) Quote Reply Topic: Changing number of columns Posted: January 23 2004 at 3:21am
	We use 80x24 screens on most applications (sometimes 132x24). I'd like to change to different font sizes within my Pick programs. For example, I need about 90 columns, so I can EXECUTE TERM 132, but now my font is fairly small. I'd like to EXECUTE TERM 132, then change the font size so 90 columns fill the screen nicely. When done, I'd like to go back to 80 column mode. I know I can set the font size to 90 in the logon script, but I'd like to be able to change the font size on the fly from Pick programs. Can I execute a macro or script or something?

PSchellenbach Members Profile Find Members Posts Admin Group Moderator Joined: December 15 2003 Location: United States Status: Offline Points: 2150	Post Options Post Reply Quote PSchellenbach Report Post Thanks(0) Quote Reply Posted: January 23 2004 at 3:22am
	You can change the number of columns on the fly using a script. Try: COLS=90 PRINT CHAR(27) : CHAR(2) : 'P InitSession.NormCols=' : COLS : CHAR(13) : Change back to 80 using the same logic.