If Not Pemstatus(_Screen,[lblVertAligned],5) Then _Screen.AddObject([lblVertAligned],[Label]) Endif With _Screen.lblVertAligned .Top = -100 .Visible = .T. .AutoSize = .T. .FontBold = This.FontBold .FontItalic = This.FontItalic .FontName = This.FontName .FontSize = This.FontSize .FontStrikethru = This.FontStrikethru .FontUnderline = This.FontUnderline .Caption = This.Caption .Anchor = This.Anchor This.Anchor = 0 This.Rotation = 360 This.Width = .Width This.Anchor = .Anchor EndwithCarlos