GET a Memo Field
──────────────────────────────────────────────────────────────────────────────

 Syntax

        GT_MemoRead( oGet )
            @ <row>, <col> GET <memo> MEMO COORD <coords> ;
         BOXCOLOR <bcolor> TITLE <title>

 Arguments:

      Standard Get parameters +
                coords  - array of 4 elements Top,left,bottom,right of MemoEdit Box
                bcolor  - color of MemoEdit Box (optional)
                title   - title of Memoedit Box (optional)

 Returns:

      Updated Get:buffer

 Description:

      To allow a standard GET/Read on a Memo field.
      Displays MEMO/memo at the <row>, <col> position depending
                if the memo field has anything in it.
                Control_Page_Down to enter the Memo reader
                Allows all standard features of get system eg WHEN,VALID
                if get COLOR is used this will be used for the MEMO/memo

                REQUIRES GT_Cent() if the TITLE option is used

 Examples:

      PROCEDURE TestMemo()
          LOCAL GetList := {}
          LOCAL mNotes

          CLS
          mNotes := "This is the default memo string at entry to the GET."

          @ 4,0 SAY "Notes:"
          @ 4,10 GET mNotes MEMO COORD {5, 10, 15, 50} ;
                                                                BOXCOLOR "W+/B,GR+/B" TITLE 'Test'
          READ

          ? mNotes
      RETURN

 Header File: GT_Memo.ch

 Source: GT_RMEMO.PRG

 Author:  Niall Scott