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

اندازه متن در اسکرین های متفاوت


myoyo

سوال

سلام...

ما برای اینکه مثلا یک ویو تو گوشی های مختلف سرجاش باشه از %y و %x استفاده میکنیم...

اما برای سایز متن (font) چیکار کنیم؟؟؟

من یه برنامه نوشتم که تو گوشی خودم که 5اینچیه اندازه فونتش مناسبه ولی تو گوشی های با صفحه کوچکتر که امتحان کردم فونتش خیلی بزرگ میشه (نسبت به اندازه صفحه گوشی)

آیا برای حل این مشکل راه حلی هست؟

ممنون.

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

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

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

دوست عزیز myoyo ما خیلی خوش حالیم که شما مشکلتون رو تو این انجمن حل میکنید

اما خواهش میکنم برای تشکر از اون کلید پایین پست استفاده کنید شما با دادن متن خیلی ممنون یه کاری میکنید دوستانی که در مورد جواب دادن تلاش میکنن هی بیان تو این تاپیک تا جواب بدن و میبینن که شما تشکر کردی!

موفق باشید دوست من *ناز*

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

سرچ میکردی پیدا میکردی

این کد مجیدو ببین

خوبه پس

بنده متدشو قرار میدم بقیه ریزه کاریاش با خودت عزیزم:

Sub Globals
Dim stu As StringUtils
End Sub

Sub SetTextSize(lbl As Label, txt As String)
 Dim dt As Float
 Dim limit = 0.5 As Float
 Dim h As Int

 lbl.Text = txt
 lbl.TextSize = 72
 dt = lbl.TextSize
 h = stu.MeasureMultilineTextHeight(lbl, txt)
 Do While dt > limit OR h > lbl.Height
   dt = dt / 2
   h = stu.MeasureMultilineTextHeight(lbl, txt)
   If h > lbl.Height Then
     lbl.TextSize = lbl.TextSize - dt
   Else
     lbl.TextSize = lbl.TextSize + dt
   End If
 Loop
End Sub

مثال از متد :

Sub Button1_Click
Dim txt = "Salam bebinid In Matn Tolaniye va Man Mikham Vaqti Toye Label Mizaram Label Dar Har Sizei Ke Hast In Matno Ja BEde To Khudesh" As String
SetTextSize(Label1, txt)
End Sub

مشکلی بود در خدمتم

سایزو مطابق اندازه لیبل تنظیم میکنه

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

بایگانی شده

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

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

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