主题：用代码如何来实现CurrentTable.PrintSetting()中的内容 譬如标题 等？

CurrentTable.PrintInfo.PaperWidth = 500

 全部属性

PrinterName
PaperSource
PaperRawKind
PaperKind
PaperWidth
PaperHeight
LeftMargin
TopMargin
RightMargin
BottomMargin
LandScape
Title
SubTitle
PageHeader
PageFooter
PageHeaderLine
PageFooterLine
SpaceAfterPagerHeader
SpaceBeforePagerFooter
SpaceAfterTitle
SpaceAfterSubtitle
PageHeaderFont
PageFooterFont
TitleFont
SubtitleFont
PageColumns
WaterMark
RepeatFixedRows
RepeatFixedCols
PrintFixedCols
ExcuteDrawCell
FitIntoPage
WrapMemo
ExtendMemoRow
OnlyPrintTitleOnFirstPage
AdjustFontSize
OnlySelectedRows
Renumber
EnableStyle
PrintTitle
PrintHeader
PrintFooter
ExtendLastCol
DirectFitIntoPage
DirectFitIntoOnePage
DirectExtendLastCol
DirectPageHeader
DirectPageFooter
DirectHighLight
DirectPageHeaderFont
DirectPrintHeader
DirectPrintFooter