Procedure TWPRTFDataBlock.InitPage(aPage:TWPVirtPage; pnr:Integer)Unit: WPRTEDefsClass: WPRTEDefs.TWPRTFDataBlockParameters aPage:TWPVirtPage pnr:Integer