Procedure TWPStyleScroller.UpdateStyleListUnit: WPCTRStyleScrollerClass: WPCTRStyleScroller.TWPStyleScroller