وسط چین کردن اشیاء

[ctrain 38]

سلام دوستان.

فرض کنید ما کدی به این شکل داریم

Dim panl As Panel
panl.Initialize("")
Example.AddView(panl,7,10,97%x,100%y)

Dim contenter As Label
contenter.Initialize("")
panl.AddView(contenter,0,0,95%x,100%y)

چطور اون container که تعریف کردیم و داخل panl ادد کردیم وسط چین کنیم؟ یعنی خود لیبل عین کدی که تو دیزاینر مینویسیم بیاد وسط؟ (تو دیزاینر مثلاً میشد از کد HorizontalCenter استفاده کرد)

 

با تشکر

[maxi333 38]

برای اینکه لیبل وسط "صفحه گوشی" نمایش داده بشه:

contenter.Left = ((100%x - contenter.Width) / 2) - panl.Left

اگه میخواهید لیبل وسط "پنل" باشه:

contenter.Left = (panl.Width - contenter.Width) / 2

برای "وسط چین متن" لیبل هم میتونید بنویسید:

contenter.Gravity = Gravity.CENTER_HORIZONTAL

که آخری رو میتونید همزمان با یکی از دو تا متد اول استفاده کنید تا هم متن و هم خود ویو بیاد وسط.

موفق باشید.

[پژمان نیکروان 6,055]

سلام

وسط در وسط:

panl.AddView(contenter,50%x,50%y,95%x,100%y)