Code: Select all | Expand
#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
Code: Select all | Expand
#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