تغیر رنگ متن و رنگ پس زمینه tabhost

[hamidspeed 20]

سلام به همگی

من یه مشکل در تغییر رنگ متن و پس زمینه تب هاستم دارم

کل اموزش ها رو هم نگاه کردم چیزی پیدا نکردم اگه کسی میتونه کمک کنه

ممنون

[hamidspeed 20]

عزیز جان مگه شما طبق آموزش تصویری آقا مجید پیش نرفتید؟؟

اگه کداتون همینه خیلی کار دارید که هنوز.

در مورد این خطا هم بگم قبلش باید اینیشیالایز کنید:

tabs.Initialize(pager)

اما پیشنهاد میکنم این آموزش رو ببینید و از روی این بسازید وگرنه ناقص هست ، حتی کد بالا و الان ممکنه بگید چرا به pager خطا میگیره؟

http://answercenter.ir/topic/7838-%D8%A2%D9%85%D9%88%D8%B2%D8%B4-%D8%AA%D8%B5%D9%88%DB%8C%D8%B1%DB%8C-%DA%A9%D8%A7%D8%B1-%D8%A8%D8%A7-ahviewpager/

 

 

اموزش رو ندیده بودم

عالیه دمت گرم

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

سلام علیکم....

از چه تب هاستی استفاده میکنید؟ AHViewPager؟

[hamidspeed 20]

سلام علیکم....

از چه تب هاستی استفاده میکنید؟ AHViewPager؟

 

AHViewPager

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

AHViewPager

به فرض اگر متغیر tabs از نوع AHViewPagerTabs تعریف کرده باشید به این صورت میتونید رنگ هارو تغییر بدید:

tabs.Color=Colors.RGB(59,178,38) 'رنگ خود تب هاست'
tabs.TextColor=Colors.Black 'رنگ متن ، زمانی که روی تب فعلی نیست'
tabs.TextColorCenter=Colors.White 'رنگ متن همین تب فعلی'
tabs.LineColorCenter=Colors.White 'رنگ خط زیر تایتل'
tabs.TextSize=16 'اندازه متن'

[hamidspeed 20]

 

به فرض اگر متغیر tabs از نوع AHViewPagerTabs تعریف کرده باشید به این صورت میتونید رنگ هارو تغییر بدید:

tabs.Color=Colors.RGB(59,178,38) 'رنگ خود تب هاست'
tabs.TextColor=Colors.Black 'رنگ متن ، زمانی که روی تب فعلی نیست'
tabs.TextColorCenter=Colors.White 'رنگ متن همین تب فعلی'
tabs.LineColorCenter=Colors.White 'رنگ خط زیر تایتل'
tabs.TextSize=16 'اندازه متن'

این کدهارو تو کدوم قسمت مینویسیم

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

این کدهارو تو کدوم قسمت مینویسیم

توی هرقسمتی که تب هاست هارو ایجاد میکنید...

مثلا بعد از حلقه فور در رویداد Activity_Create

[hamidspeed 20]

توی هرقسمتی که تب هاست هارو ایجاد میکنید...

مثلا بعد از حلقه فور در رویداد Activity_Create

تو همون قسمت Activity_Create گذاشتم این ارور رو میده

 

 

این هم سورس کدهام

Sub Globals

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

    'These variables can only be accessed from this module.

    Private TabHost1 As TabHost

    Private Button1 As Button

    Private Label1 As Label

Dim tabs As AHViewPagerTabs

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("2")

    

    TabHost1.AddTab("صفحه 1","3.bal")

    TabHost1.AddTab("صفحه 2","4.bal")

    TabHost1.AddTab("صفحه 3","5.bal")

    tabs.Color=Colors.RGB(59,178,38) 'رنگ خود تب هاست'

tabs.TextColor=Colors.Black 'رنگ متن ، زمانی که روی تب فعلی نیست'

tabs.TextColorCenter=Colors.White 'رنگ متن همین تب فعلی'

tabs.LineColorCenter=Colors.White 'رنگ خط زیر تایتل'

tabs.TextSize=16 'اندازه متن'

End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

 

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

عزیز جان مگه شما طبق آموزش تصویری آقا مجید پیش نرفتید؟؟

اگه کداتون همینه خیلی کار دارید که هنوز.

در مورد این خطا هم بگم قبلش باید اینیشیالایز کنید:

tabs.Initialize(pager)

اما پیشنهاد میکنم این آموزش رو ببینید و از روی این بسازید وگرنه ناقص هست ، حتی کد بالا و الان ممکنه بگید چرا به pager خطا میگیره؟

http://answercenter.ir/topic/7838-%D8%A2%D9%85%D9%88%D8%B2%D8%B4-%D8%AA%D8%B5%D9%88%DB%8C%D8%B1%DB%8C-%DA%A9%D8%A7%D8%B1-%D8%A8%D8%A7-ahviewpager/