Clipper/FiveWin - Tamaño de letra en Impresion FW

Quiero cambiar el tamaño de letra en un programa y no lo consigo.
En size del comando DEFINE FONT, ponga lo que ponga, no tiene efecto en el resultado. Quiero letra mas pequeña
Este es el programa... cual es mi error?
Gracias!!
Javicho

#include "FiveWin.ch"
static oWnd
function Main()
local oPrn, oFont
PRINT oPrn NAME "Gestion de Impresiones" PREVIEW
DEFINE FONT oFont NAME "Ms Sans Serif" SIZE 10,0 OF oPrn
PAGE
oPrn:Say( 10,30,"hola" )
oPrn:Say( 55,60,"PRUEBA" )
ENDPAGE
ENDPRINT
oFont:End()
return nil

Javicho:

Intentalo así:

oPrn:Say( 55,60,"PRUEBA" ,oFont)

y dale una mira a la sintáxis de oPrn:Say() y oPrn:CmSay()

El Duro

Javicho:

Tambien mira la sintaxis de la clase FONT

Si no recuerdo mal el segundo valor debe ser negativo, voy de salida
y no he podido revisarlo, el segundo valor es el que te determina el
tamaño de la font.

DEFINE FONT oFont NAME "Ms Sans Serif" SIZE 0,-14 OF oPrn

El Duro

Muchas gracias...!!! .
Lo intenté todo y nada.
Ahora ya está GRACIAS !!!! , les debo 1.

Javicho