1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

Displaying Editor With Vertical Scrollbar Enabled

Discussion in 'Development' started by KMoody, Oct 24, 2017.

  1. KMoody

    KMoody Member

    Code (progress):
    1.  
    2. DEFINE VARIABLE y AS CHARACTER FORMAT "X(1)".
    3. FORM
    4.      y VIEW-AS EDITOR size 60 by 11 SCROLLBAR-VERTICAL AT 10 SKIP(1)
    5.      HEADER "Title" AT 25 SKIP(1)
    6.      WITH NO-LABELS NO-UNDERLINE NO-BOX DOWN FRAME work2.
    7.  
    8. y = "This is a lot of text~n~n~n~n~n~n This is a lot of text.".
    9. DISPLAY y WITH FRAME work2.
    I want to allow the user to scroll through the contents of y without allowing them to type in the editor box. Is that possible? Do I need to use a dynamic editor object instead?
     
  2.  
  3. Osborne

    Osborne Active Member

    Set the editor to read only and enable it:
    Code (progress):
    1. ...
    2.  
    3. ASSIGN y:READ-ONLY = TRUE.
    4. DISPLAY y WITH FRAME work2.
    5. ENABLE y WITH FRAME work2.
     

Share This Page