Só uma tela com say/get e nada mais.
Compila mas na hora de executar não faz nada.
Uma vez que o get tem a pausa, acho que deveria pelo menos parar na tela até teclar ENTER.
Será que entendi errado o uso da GTWVG?
pra compilar estou usando hbmk2 teste -lgtwvg
o fonte que usei foi este, retirando partes do demowvg.
#include "inkey.ch"
#include "common.ch"
#include "wvtwin.ch"
#include "hbgtinfo.ch"
#include "hbgtwvg.ch"
#include "wvgparts.ch"
Procedure Main
Local GetList := {}
Local mVar := Space(10)
@ 1, 0 Say "xxx" Get mVar
Read
Function HB_GTSYS()
REQUEST HB_GT_WVG_DEFAULT
REQUEST HB_GT_WVT
REQUEST HB_GT_WGU
Return NIL