Usando Window(Janela)
#include "FiveWin.ch"
FUNCTION Main()
LOCAL oWnd, oSay[3], oFont[2]
DEFINE FONT oFont[1] NAME "ARIAL" SIZE 0,20 BOLD NESCAPEMENT 900
DEFINE WINDOW oWnd ;//FROM 1,5 TO 20,65 ;
TITLE "Testing SAY With Design"
@ 180, 30 say osay[2] prompt "" of ownd color 0 size 80,200 font oFont[1] design update pixel
ACTIVATE WINDOW oWnd MAXIMIZED ;
ON INIT oSay[2]:SAY(180,30,"THIS DONT SHOW",CLR_BLACK,CLR_YELLOW,oFont[1],.t.,) ;
ON PAINT osay[2]:SAY(180,30,"THIS DONT SHOW",CLR_BLACK,CLR_YELLOW,oFont[1],.t.,)
RETURN NIL