Procedure TWPObject.OnReadName(Reader:TReader; Component:TComponent; Name:string)Unit: WPRTEDefsClass: WPRTEDefs.TWPObjectParameters Reader:TReader Component:TComponent Name:string