FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Fonts en TWord
Posts: 104
Joined: Wed Mar 08, 2006 02:24 PM
Fonts en TWord
Posted: Fri Dec 14, 2007 08:50 PM

Hola Foro:
Estoy probando la clase TWord y cuando creo un documento no me respeta los fonts que le envio por el programa.
Por ejemplo le asigno Times New Roman de 8 y en el documento me aparece con Times New Roman de 12.
Cual puede ser el problema?

Saludos
Carlos A. Ducca

Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM
Re: Fonts en TWord
Posted: Sat Feb 16, 2008 11:08 AM

Yo lo asigno de esta forma y notengo problemas

David

[DEFINE FONT oFuente NAME 'Arial' SIZE 1,8 OF oWord //9
DEFINE FONT oFuente2 NAME 'Arial' SIZE 1,8 OF oWord //8
DEFINE FONT oFuente3 NAME 'Arial' SIZE 1,8 OF oWord BOLD //9
DEFINE FONT oFuente4 NAME 'Arial' SIZE 1,10 OF oWord BOLD //10
DEFINE FONT oFuente5 NAME 'Arial' SIZE 1,6 OF oWord //6
DEFINE FONT oFuente6 NAME 'Arial' SIZE 1,7 OF oWord //7
DEFINE FONT oFuente7 NAME 'Arial' SIZE 1,11 OF oWord //11
DEFINE FONT oFuente8 NAME 'Arial' SIZE 1,13 OF oWord //13

oWord:=Tword():New()

oWord:NewDoc( cOutFile )

oWord:startpage()

oWord:SetCm()

Continue the discussion