Bug in TMultiGet:Append() method

[Enrico Maria Giordano]

The following sample shows that TMultiGet:Append() method doesn't seem to work:

Code: Select all  Expand view  RUN

#include "Fwce.ch"


FUNCTION MAIN()

    LOCAL oWnd

    LOCAL oGet, cVar := ""

    DEFINE WINDOW oWnd

    @ 1, 1 GET oGet VAR cVar MEMO;
           SIZE 200, 100

    @ 10, 1 BUTTON "Append";
            SIZE 100, 20;
            ACTION oGet:Append( "This is a test" + CRLF )

    ACTIVATE WINDOW oWnd

    RETURN NIL

EMG

[Enrico Maria Giordano]

Any news?

EMG