With   ActiveDocument.PageSetup  
                  .LineNumbering.Active   =   False  
                  .Orientation   =   wdOrientPortrait  
                  .TopMargin   =   CentimetersToPoints(2.54)  
                  .BottomMargin   =   CentimetersToPoints(2.54)  
                  .LeftMargin   =   CentimetersToPoints(3.17)  
                  .RightMargin   =   CentimetersToPoints(3.17)  
                  .Gutter   =   CentimetersToPoints(0)  
                  .HeaderDistance   =   CentimetersToPoints(1.5)  
                  .FooterDistance   =   CentimetersToPoints(1.75)  
                  .PageWidth   =   CentimetersToPoints(19)  
                  .PageHeight   =   CentimetersToPoints(20)  
                  .FirstPageTray   =   wdPrinterDefaultBin  
                  .OtherPagesTray   =   wdPrinterDefaultBin  
                  .SectionStart   =   wdSectionNewPage  
                  .OddAndEvenPagesHeaderFooter   =   False  
                  .DifferentFirstPageHeaderFooter   =   False  
                  .VerticalAlignment   =   wdAlignVerticalTop  
                  .SuppressEndnotes   =   False  
                  .MirrorMargins   =   False  
                  .TwoPagesOnOne   =   False  
                  .BookFoldPrinting   =   False  
                  .BookFoldRevPrinting   =   False  
                  .BookFoldPrintingSheets   =   1  
                  .GutterPos   =   wdGutterPosLeft  
                  .LayoutMode   =   wdLayoutModeLineGrid  
          End   With  
  如何转化为delphi啊  
    或者PageHeight   的度量单位如何改变,我想用CM表示