Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to center label vertically in toolbar
Message
De
14/04/2006 18:54:30
 
 
À
03/04/2006 01:25:24
Dorin Vasilescu
ALL Trans Romania
Arad, Roumanie
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
Visual FoxPro:
VFP 9 SP1
Divers
Thread ID:
01109825
Message ID:
01113814
Vues:
22
>>Hi,
>>
>>I want to add a label to a toolbar and center it vertically in the toolbar. Right now, it appears right next to the top with no obvious way to move it down. The top property seems to be readonly. Is there a way to lower it?
>>
>>TIA,
>>
>>Alex
>
>Put it into a container

Add this code to your label class init event:
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
Endwith
Carlos
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform