رفتن به مطلب
  • 0

کد تنظیم خودکار width و lable height با توجه به متن


hosseinkarimian

سوال

سلام با کلی زیر رو کردن اینترنت و سایت مرجع بالاخره روشی پیدا کردم که میتونید طول و عرض lable رو با توجه به متن تنظیم کنید و مقدار اون رو بگیرید . توی انجمن بحث شده بود که منفی 2 بزاریم تنظیم میشه ولی یه مشکل جدی این بود که مثلا اگه شما مقدار طول و عرض رو می خواستید در هر صورت -2 رو بر می گردوند که با کد زیر مشکل حل شده. (با کلیک روی دکمه متن تنظیم میشه و طول عرض بدست میاد.)

#Region Module Attributes
	#FullScreen: False
	#IncludeTitle: True
	#ApplicationLabel: LabelWidthauto
	#VersionCode: 1
	#VersionName: 
	#SupportedOrientations: unspecified
	#CanInstallToExternalStorage: False
#End Region

'Activity module
Sub Process_Globals
	'These global variables will be declared once when the application starts.
	'These variables can be accessed from all modules.

End Sub

Sub Globals
	Dim lblTest, lblHeight, lblWidth As Label
	Dim btnChangeWidthHeight As Button
	Dim obj As Reflector
End Sub

Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("main")
	lblTest.Text = "Line1" & CRLF & "Line2 looooooooong line" & CRLF & "Line3" & CRLF & "Line4"
	lblWidth.Text = "width = " & lblTest.Width
	lblHeight.Text = "width = " & lblTest.Height
End Sub

Sub btnChangeWidthHeight_Click
	Dim Height, Width As Int
	
	lblTest.Width = -2
	lblTest.Height = -2
	DoEvents	' needed to update the properties
	
	obj.Target = lblTest
	Width = obj.RunMethod("getWidth")
	Height = obj.RunMethod("getHeight")
	lblWidth.Text = "width = " & Width
	lblHeight.Text = "height = " & Height
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

 

آدرس سایت مرجع

https://www.b4x.com/android/forum/threads/autosize-label-based-on-its-text.8721/

 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

0 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

هنوز برای این سوال پاسخی ارسال نشده است

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...