Antonio, busca en la carpeta de sources/function el prg MSGGET.PRG
Puedes usar esa function, poniéndole como parámetro oFont y quitándole los parámetros relativos a los gets: lMemo, lPassword
Elimina el código de los GETS y prácticamente lo tienes hecho