General information
Category:
COM/DCOM and OLE Automation
Title:
How can i change left and right margins
I need to change the left and right margins in word from VFP5. Anybody know how can i do this? . The next segment is taked from vfp examples and work, but i can't change the margins.
Any help will be appreciated. thanks in advance.
#DEFINE APPSHOW_WORDUS_LOC "appshow"
#DEFINE FILENEW_WORDUS_LOC "filenewdefault"
#DEFINE INSERT_WORDUS_LOC 'insert( getmemo() )'
#DEFINE OBJECT_TYPE "OBJECT"
#DEFINE crlf CHR(13) + CHR(10)
#DEFINE guiones REPLICATE('_', 90)
#DEFINE cf "Courier New"
#DEFINE cs 9
APPSHOW_WORDUS =APPSHOW_WORDUS_LOC
FILENEW_WORDUS =FILENEW_WORDUS_LOC
INSERT_WORDUS =INSERT_WORDUS_LOC
LOCAL cRefAnt, lnTot
PUBLIC ObjWDdoc
nlLocaleId=sys(3004)
=sys(3006,1033)
objWDdoc=crea("word.basic")
objwddoc.&APPSHOW_WORDUS
objwddoc.&FILENEW_WORDUS
objwddoc.FONT(cf,18)
objwddoc.bold
objwddoc.CharColor(6)
objwddoc.CenterPara
objwddoc.Insert( nomprov + crlf)
objwddoc.FONT("Arial",10)
objwddoc.bold
.
.
.
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only