Bug in TGet

[Enrico Maria Giordano]

In this sample, the size of the GET is very small:

Code: Select all  Expand view  RUN

#include "Fivewin.ch"


FUNCTION MAIN()

    LOCAL oDlg

    LOCAL cVar := SPACE( 30 )

    FW_SETUNICODE( .T. )

    DEFINE DIALOG oDlg

    @ 1, 1 GET cVar

    ACTIVATE DIALOG oDlg;
             CENTER

    RETURN NIL

EMG

[Antonio Linares]

Enrico,

If you use:

LOCAL cVar := Replicate( "X", 30 )

would the shown width be correct ?

[Enrico Maria Giordano]

Yes, it is.

EMG