سلام به همه عزیزان
من یک متن فارسی انگلیسی دارم ( دقت کنید فارسی و انگلیسی با هم هست در جمله )
با راست چین و چپ چین کردنشون به مشکل خوردم !!!
محبت میکنید راهنمایی بفرمایید چه طور وقتی اول یا آخر یک جمله کلمه لاتین هست باز هم بتونم راست نویسش کنم؟؟
و یا برعکس وقتی اول یه جمله با فارسی شروع میشه بتونم چپ چینش کنم
عکس زیر به شما نشون میده که لیبل های قرمز رببینید متوجه میشید
وقتی اول جمله با لاتین شروع بشه اگر شما بخواهید راست چین باشه !! نمیشه ( لیبل شماره 8 از بالا )
و یا اگر اول جمله فارسی باشه و شما بخواهید چپ چین باشه بازم بیسیک خطا میده ( لیبل شماره 3 )
کد ها رو قرار دادم
چون هر چی تلاش میکنم بازم بیسیک اتوماتیک تو راست چین کلمه لاتین رو میزاره اول و در چپ چین کلمه انگلیسی رو میزاره اول جمله !!!
ممنون از محبت وراهنمایی شما
عکس و کد و فایل نمونه ضمیمه شد
#Region Project Attributes
#ApplicationLabel: B4A Example
#VersionCode: 1
#VersionName:
'SupportedOrientations possible values: unspecified, landscape or portrait.
#SupportedOrientations: unspecified
#CanInstallToExternalStorage: False
#End Region
#Region Activity Attributes
#FullScreen: False
#IncludeTitle: True
#End Region
Sub Process_Globals
End Sub
Sub Globals
Private Label1 As Label
Private Label2 As Label
Private Label3 As Label
Private Label4 As Label
Private Label5 As Label
Private Label6 As Label
Private Label7 As Label
Private Label8 As Label
Private RTLJustifyTextView1 As RTLJustifyTextView
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Layout1")
Label1.Color=Colors.White
Label2.Color=Colors.White
Label3.Color=Colors.Red
Label4.Color=Colors.White
Label5.Color=Colors.White
Label6.Color=Colors.White
Label7.Color=Colors.White
Label8.Color=Colors.Red
Label1.textColor=Colors.Black
Label2.textColor=Colors.Black
Label3.textColor=Colors.Black
Label4.textColor=Colors.Black
Label5.textColor=Colors.Black
Label6.textColor=Colors.Black
Label7.textColor=Colors.Black
Label8.textColor=Colors.Black
'-------------------------------------------------------------------------------
Label1.Gravity=Gravity.LEFT
Label2.Gravity=Gravity.LEFT
Label3.Gravity=Gravity.LEFT
Label4.Gravity=Gravity.LEFT
Label1.Text="AnswerCenter"
Label2.Text="مرکز پاسخ گویی به سوالات"
Label3.Text="اسم انجمن==>AnswerCenter"
Label4.Text="AnswerCenter==>نام انجمن است"
'-------------------------------------------------------------------------------
Label5.Gravity=Gravity.RIGHT
Label6.Gravity=Gravity.RIGHT
Label7.Gravity=Gravity.RIGHT
Label8.Gravity=Gravity.RIGHT
Label5.Text="AnswerCenter"
Label6.Text="مرکز پاسخ گویی به سوالات"
Label7.Text="اسم انجمن==>AnswerCenter"
Label8.Text = "AnswerCenter==>نام انجمن است"
' این هم یک کتابخونه جاستیفای هست که کار نکرد متاسفانه!!
RTLJustifyTextView1.SetText("AnswerCenter==>نام انجمن است",True)
RTLJustifyTextView1.DrawingCacheEnabled = True
RTLJustifyTextView1.TextColor = Colors.Blue
RTLJustifyTextView1.TextGravity = RTLJustifyTextView1.GRAVITY_CENTER_VERTICAL
'-------------------------------------------------------------------------------
End Sub
Sub Activity_Resume
End Sub
Sub Activity_Pause (UserClosed As Boolean)
End Sub
سوال
arastooms 1,046
سلام به همه عزیزان
من یک متن فارسی انگلیسی دارم ( دقت کنید فارسی و انگلیسی با هم هست در جمله )
با راست چین و چپ چین کردنشون به مشکل خوردم !!!
محبت میکنید راهنمایی بفرمایید چه طور وقتی اول یا آخر یک جمله کلمه لاتین هست باز هم بتونم راست نویسش کنم؟؟
و یا برعکس وقتی اول یه جمله با فارسی شروع میشه بتونم چپ چینش کنم
عکس زیر به شما نشون میده که لیبل های قرمز رببینید متوجه میشید
وقتی اول جمله با لاتین شروع بشه اگر شما بخواهید راست چین باشه !! نمیشه ( لیبل شماره 8 از بالا )
و یا اگر اول جمله فارسی باشه و شما بخواهید چپ چین باشه بازم بیسیک خطا میده ( لیبل شماره 3 )
کد ها رو قرار دادم
چون هر چی تلاش میکنم بازم بیسیک اتوماتیک تو راست چین کلمه لاتین رو میزاره اول و در چپ چین کلمه انگلیسی رو میزاره اول جمله !!!
ممنون از محبت وراهنمایی شما
عکس و کد و فایل نمونه ضمیمه شد
#Region Project Attributes #ApplicationLabel: B4A Example #VersionCode: 1 #VersionName: 'SupportedOrientations possible values: unspecified, landscape or portrait. #SupportedOrientations: unspecified #CanInstallToExternalStorage: False #End Region #Region Activity Attributes #FullScreen: False #IncludeTitle: True #End Region Sub Process_Globals End Sub Sub Globals Private Label1 As Label Private Label2 As Label Private Label3 As Label Private Label4 As Label Private Label5 As Label Private Label6 As Label Private Label7 As Label Private Label8 As Label Private RTLJustifyTextView1 As RTLJustifyTextView End Sub Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("Layout1") Label1.Color=Colors.White Label2.Color=Colors.White Label3.Color=Colors.Red Label4.Color=Colors.White Label5.Color=Colors.White Label6.Color=Colors.White Label7.Color=Colors.White Label8.Color=Colors.Red Label1.textColor=Colors.Black Label2.textColor=Colors.Black Label3.textColor=Colors.Black Label4.textColor=Colors.Black Label5.textColor=Colors.Black Label6.textColor=Colors.Black Label7.textColor=Colors.Black Label8.textColor=Colors.Black '------------------------------------------------------------------------------- Label1.Gravity=Gravity.LEFT Label2.Gravity=Gravity.LEFT Label3.Gravity=Gravity.LEFT Label4.Gravity=Gravity.LEFT Label1.Text="AnswerCenter" Label2.Text="مرکز پاسخ گویی به سوالات" Label3.Text="اسم انجمن==>AnswerCenter" Label4.Text="AnswerCenter==>نام انجمن است" '------------------------------------------------------------------------------- Label5.Gravity=Gravity.RIGHT Label6.Gravity=Gravity.RIGHT Label7.Gravity=Gravity.RIGHT Label8.Gravity=Gravity.RIGHT Label5.Text="AnswerCenter" Label6.Text="مرکز پاسخ گویی به سوالات" Label7.Text="اسم انجمن==>AnswerCenter" Label8.Text = "AnswerCenter==>نام انجمن است" ' این هم یک کتابخونه جاستیفای هست که کار نکرد متاسفانه!! RTLJustifyTextView1.SetText("AnswerCenter==>نام انجمن است",True) RTLJustifyTextView1.DrawingCacheEnabled = True RTLJustifyTextView1.TextColor = Colors.Blue RTLJustifyTextView1.TextGravity = RTLJustifyTextView1.GRAVITY_CENTER_VERTICAL '------------------------------------------------------------------------------- End Sub Sub Activity_Resume End Sub Sub Activity_Pause (UserClosed As Boolean) End Sub
test.zip
لینک ارسال
به اشتراک گذاری در سایت های دیگر
8 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.