GetPaperSizeIndex Method
Get paper size index from paper list.
Object.GetPaperSizeIndex(liPaperSize)
ParametersÂ
liPaperSizee
 The paper size.
Return value
Number.
Remarks
Applies To: XFRX#DEVMODE
Examples
m.lcPrinter = GETPRINTER() && select a printer m.lcTag2 = _xfPrinterProperties(m.lcPrinter, "", .F.) && do not show the dialog, return the default settings m.loDEVMODE=EVALUATE([xfrx("XFRX#DEVMODE", m.lcTAG2, m.lcPrinter)]) && create DEVMODE object ?m.loDEVMODE.GetPaper(9) && Get paper name m.lii=m.loDEVMODE.GetPaperSizeIndex(9) && Get internal index for paper size 9 IF m.lii>0 ?"Paper width in FRU", m.loDEVMODE.aPrinterPapers(m.lii, 2)*10000/254 ?"Paper length in FRU", m.loDEVMODE.aPrinterPapers(m.lii, 3)*10000/254 ELSE ?"Unknown paper size" ENDIF