Property TWPRTFDataBlock.WorkOnText : BooleanUnit: WPRTEDefsClass: WPRTEDefs.TWPRTFDataBlockDescription You can set this property to true to move the cursor to this text object