- Code: Select all Expand view
- #include "Fivewin.ch"
FUNCTION MAIN()
LOCAL oDlg
DEFINE DIALOG oDlg;
GRADIENT ACLRGRAD()
@ 1, 1 SAY "This is a test"
ACTIVATE DIALOG oDlg;
CENTER
RETURN NIL
STATIC FUNCTION ACLRGRAD()
RETURN { { 1, RGB( 216, 230, 238 ), RGB( 103, 154, 194 ) } }
EMG