已利用myfll在系统中创建一个自定义纸张并获取到ID，代码如下：
Set Library To myfll
nPaperId1=PaperAdd("自定A",990,1800) &&添加一个自定义纸，默认边距为0
idqw=PaperInfo("自定A",1) &&比如获取的ID是 136
以下代码是创建word文档代码
Word=CREATEOBJECT('Word.Application')
Word.Documents.add()
但这样创建出来的是A4纸张的文档，只能通过修改页面大小来调整，太麻烦了。
问题是：如何利用这个已知的自定义纸张创建一个新的word文档，请众高手不吝赐教！
------解决方案--------------------------------------------------------
Word=CREATEOBJECT('Word.Application')
Word.Documents.add()
这样创建后，再设置纸张，如：
Word.Documents(1).PageSetup.PaperSize=idqw
------解决方案--------------------------------------------------------
去掉添加自定义纸张部分，直接：
oWord=Createobject('Word.Application')
oWord.Documents.Add()
oWord.Documents(1).PageSetup.PageHeight=18*28.35 && 单位是磅，1厘米约等于28.35磅，1800为18厘米。
oWord.Documents(1).PageSetup.PageWidth=9.9*28.35 && 同上
oWord.Visible=.T.
------解决方案--------------------------------------------------------
好像只能这样：
oWord=Createobject('Word.Application')
oWord.Documents.Add()
oWord.Documents(1).PageSetup.PaperSize= 41 && wdPaperCustom 自定义纸张
oWord.Documents(1).PageSetup.PageHeight=18*28.35 && 单位是磅，1厘米约等于28.35磅，1800为18厘米。
oWord.Documents(1).PageSetup.PageWidth=9.9*28.35 && 同上
oWord.Visible=.T.