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

لود کردن صفحه التیمت دار


muhammad_rad

سوال

با سلام دوستان ببخشید یک سوال داشتم

من میخوام در متریال تب یک التیمت لود کنم اولش در کد زیر قرار داده بودم که اگر ایف = ۱ بود لود کنه اما هر کاری کردم نتونستم 

    PC.Initialize

    For i =0 To 2

        P.Initialize("")

        P.Color = Colors.White

        If i = 1 Then P.LoadLayout("lytm")

            PC.AddPage(P,"")

        If i = 0 Then p.LoadLayout("settings")

        Next

        AHViewPager1.GotoPage(1,False)

        codes.color(DSTabLayout1)

        AHViewPager1.PageContainer = PC

        AHViewPager1.GotoPage(1,False)

        DSTabLayout1.SetViewPager(AHViewPager1)

        DSTabLayout1.TabIndicatorColor = Colors.White

        DSTabLayout1.SetTabIcon(0,xml.GetDrawable("ic_settings_white_24dp"))

        DSTabLayout1.SetTabIcon(1,xml.GetDrawable("ic_home_white_24dp"))

        DSTabLayout1.SetTabIcon(2,xml.GetDrawable("ic_heart_white_24dp"))

 

به همین دلیل در رویداد پیچ چینج تب کد زیر را نوشتم که اگر به صفحه اول رفت التیمت را لود کنه اما نمیتونم بگم در کدام صفحه لود بشه برای همین همیشه در صفحه اخر لود میشه لطفا کدی بگید که در بالا قرار بدم یا کدی بدید که در پایین بهش بگم که صفحه مورد نظرم را لود بکنه.

 

Sub AHViewPager1_PageChanged (Position As Int)

    Log("pageCehnge=" & Position)

    Log("k="&k)

         If Position = 1 Then

            P.LoadLayout("list")

            crs4 = sq1.ExecQuery ("SELECT * FROM tblTitr WHERE number = 1")

            'اضافه کردن لی اوت به التیمیت

            UL1.AddLayout("newlayout1","ul1_LayoutCreator","ul1_ContentFiller",72dip,True)

            UL1.Color = Colors.Transparent

            'برای رنگی شدن هنگام کلیک

            Dim bk1 As ColorDrawable

            bk1.Initialize(Colors.LightGray,0)

            UL1.PressedDrawable = bk1

            'برای اضافه کردن ایتم به التیمت

            For d = 0 To  crs4.RowCount- 1

            UL1.AddItem("newlayout1",d)

            Next

                  

    End If

End Sub

 

 

ببخشید اگر بد توضیح دادم

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

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

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

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

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

بایگانی شده

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

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

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