رفتن به مطلب

نوشتن متن دربرنامه


1234

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

چن تا راه هست

1=اسکرول ویو+لیبل،که متن رو باید داخل فایل تکس بندازی بعد فراخونیش کنی

2=از طریق دیتابیس

3=از طریق لود کردن فایل htmlکه همون وب ویو

 

 

در کل برا کارای اول بهتر از گزینه اول استفاده کنی

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


Sub Globals

'These global variables will be redeclared each time the activity is created.

'These variables can only be accessed from this module.

Dim panelheight As Int

Dim text As String

Dim strUtil As StringUtils

Dim ht As Float

Dim mfont As Typeface

Private ScrollView1 As ScrollView

End Sub

Sub Activity_Create(FirstTime As Boolean)

'Do not forget to load the layout file created with the visual designer. For example:

'Activity.LoadLayout("Layout1")

Activity.LoadLayout("s3")

text= File.ReadString(File.DirAssets,"esm matnet.txt")

mfont=Typeface.LoadFromAssets(tanzimat.font &".ttf")

scroll

End Sub

Sub scroll

ScrollView1.Initialize(500dip)

Activity.AddView(ScrollView1, 0, 17%y, 100%x, 70%y)

panelheight=0

Dim lbltest As Label

lbltest.Initialize("lbltest")

ScrollView1.Panel.AddView(lbltest,2dip, panelheight, 100%x-5dip, 50dip)

lbltest.TextSize=18

lbltest.TextColor=Colors.White

ht= art (text,lbltest,mfont,20)

panelheight=panelheight+ht+25dip

panelheight=panelheight+80dip

ScrollView1.Panel.Height=panelheight

End Sub

Sub art(txt As String,leb As Label,font As Typeface,size As Int) As Float

Dim before,after As Float

Dim Obj1 As Reflector

leb.text=txt

leb.TextSize=size

leb.Gravity=Gravity.CENTER

leb.Left=leb.Left

leb.Typeface=font

ht = strUtil.MeasureMultilineTextHeight(leb , txt)

Obj1.Target = leb

before = Obj1.RunMethod("getLineHeight")

Obj1.Target = leb

Obj1.RunMethod3("setLineSpacing", .10, "java.lang.float", 1.5, "java.lang.float")

Obj1.Target = leb

after = Obj1.RunMethod("getLineHeight")

ht = ((after * ht)/before)

leb.Height = ht

Return ht

End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

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

  • 1 ماه بعد...

سلام دوست عزیز 

من  وقتی از این کد برای فراخوانی فایل txt استفاده میکنم و از برنامه خروجی میگیرم 

متن فارسی منو به صورت لامت های سوال (؟؟؟؟؟) نشون میده اما متن انگلیسی مشکلی نداره

لطفا منو راهنمایی کنید.

ممنون

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

سلام دوست عزیز 

من  وقتی از این کد برای فراخوانی فایل txt استفاده میکنم و از برنامه خروجی میگیرم 

متن فارسی منو به صورت لامت های سوال (؟؟؟؟؟) نشون میده اما متن انگلیسی مشکلی نداره

لطفا منو راهنمایی کنید.

ممنون

یا از فونته ، یا از API پایینه که پشتیبانی نمی کنه!

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

سلام دوست عزیز 

من  وقتی از این کد برای فراخوانی فایل txt استفاده میکنم و از برنامه خروجی میگیرم 

متن فارسی منو به صورت لامت های سوال (؟؟؟؟؟) نشون میده اما متن انگلیسی مشکلی نداره

لطفا منو راهنمایی کنید.

ممنون

سلام دوست عزیز.شما باید بونیکد رو روی UTF8 قرار بدید تا این مشکل پیش نیاد.

شما متن فارسی رو کپی کنید توی فایل تکست و فایل تکست رو Save As  کنید و پنجره ای که باز میشه پایین قسمت Encoding  گزینه UTF-8  رو انتخاب کنید و ذخیره کنید.

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

سلام خسته نباشید

دوستان اگه میشه راهنمایی کنن 

من یه متن بلند رو داخل فایل txt فراخوانی کردم و بین متن هم چند تا عکس گزاشتم میخواستم بدونم چه جوری میشه تو متنم قسمت هایی که تو پرانتز قرار دادم رو به یه رنگ دیگه مثلا قرمز نشون بده.

مثلا این جوری:       سلام دوستان(چاکرتونم)عزیر

با تشکر

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

  • 1 ماه بعد...

سلام دوستان گرامی

 

File.DirAssets

 

چیه؟؟؟

باید چی جاش بزاریم؟؟؟

 

ممنون

دوست عزیز!!!

قوانین رو رعایت کنید.

شما بهتره که طبق این اموزش ها پیش برید:

http://answercenter.ir/forum/37-%D8%A2%D9%85%D9%88%D8%B2%D8%B4-%D9%87%D8%A7%DB%8C-%DA%AF%D8%A7%D9%85-%D8%A8%D9%87-%DA%AF%D8%A7%D9%85-%D8%A8%D8%B1%D8%A7%DB%8C-%D9%85%D8%A8%D8%AA%D8%AF%DB%8C-%D9%87%D8%A7/

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

بایگانی شده

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

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

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