reza1360 2 ارسال شده در 9 آبان، ۱۳۹۷ اشتراک گذاری ارسال شده در 9 آبان، ۱۳۹۷ با سلام.دوستان عزیر من بعد از ساخت اسلاید منو با MSMaterialDrawel تولبارم پایین میاد و از بالای صفحه جدا میشه و از حالت 100%x خارج میشه میشه راهنمایی بفرمایید؟ Sub Activity_Create(FirstTime As Boolean) ''''''''''''''''''''''''''''''''''''''مراحل ساخت اسلاید منو Dim pnlheader As Panel pnlheader.Initialize("pnlheader") pnlheader.Tag ="header" Dim msp As MSProfile Dim bmd As BitmapDrawable bmd.Initialize(LoadBitmap(File.DirAssets,"myface.png")) msp.withName("میر رضا عطایی").withEmail("info@sunsimkart").withIcon(bmd) Dim profilse(1) As MSProfile profilse(0) = msp Dim msa As MSAccountHeaderBuilder Dim bmd1 As BitmapDrawable bmd1.Initialize(LoadBitmap(File.DirAssets,"header.jpg")) msa.Initialize("") msa.addProfiles(profilse) msa.withHeaderBackground(bmd1) Dim obj As Object = msa.build Dim p1,p2,p3 As MSIconicDrawable p1.Initialize("gmd_home") p1.Color = Colors.Red p2.Initialize("gmd_drafts") p2.Color = Colors.Red p3.Initialize("gmd_person") p3.Color = Colors.Red Dim x1,x2,x3 As MSIconicDrawable x1.Initialize("gmd_settings") x1.Color = Colors.Red x2.Initialize("gmd_help") x2.Color = Colors.Red x3.Initialize("faw_google_wallet") x3.Color = Colors.Red MDB.Initialize("") MDB.withAccountHeader(obj) MDB.AddPrimaryDrawerItem("خانه",p1.Drawable,Null,300,True,1,"صفحه اصلی برنامه") MDB.AddPrimaryDrawerItem("پیام ها",p2.Drawable,Null,80,True,2,"پیامهای دریافتی") MDB.AddPrimaryDrawerItem("اشخاص",p3.Drawable,Null,"",True,3,"اشخاص را دنبال کنید") MDB.AddSectionDrawerItem("",True) MDB.AddSecondaryDrawerItem("تنظیمات",x1.Drawable,Null,"",True,4) MDB.AddSecondaryDrawerItem("راهنمایی",x2.Drawable,Null,"",True,5) MDB.AddSecondaryDrawerItem("همکاری",x3.Drawable,Null,"",True,6) MDB.withDrawerGravity(Gravity.LEFT) MD = MDB.Build ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Activity.LoadLayout("main") ForseRtlSupported toolbar.SetAsActionBar Dim pnl_tool As Panel = toolbar For Each v As View In pnl_tool If v Is Label Then Dim lbl As Label = v Select lbl.Text Case toolbar.Title lbl.Typeface = Typeface.LoadFromAssets("B Yekan.TTF") lbl.TextSize = 20 End Select End If Next Dim bmd , bmd1 As BitmapDrawable Dim xm , xm1 As XmlLayoutBuilder bmd = xm.GetDrawable("ic_account_outline_white_24dp") Activity.AddMenuItem3("user","menu1",bmd.Bitmap,True) bmd1 = xm1.GetDrawable("ic_bookmark_white_24dp") Activity.AddMenuItem3("bookmark","menu2",bmd1.Bitmap,True) End Sub اینم لینک تصویر http://s9.picofile.com/file/8341445634/Screenshot_26_.png لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
M-CAP7AIN 537 ارسال شده در 10 آبان، ۱۳۹۷ اشتراک گذاری ارسال شده در 10 آبان، ۱۳۹۷ اگه امکانش بود سورس و پیوست کنید تا بررسی بشه. لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
سوال
reza1360 2
با سلام.دوستان عزیر من بعد از ساخت اسلاید منو با MSMaterialDrawel تولبارم پایین میاد و از بالای صفحه جدا میشه و از حالت 100%x خارج میشه میشه راهنمایی بفرمایید؟
اینم لینک تصویر http://s9.picofile.com/file/8341445634/Screenshot_26_.png
لینک ارسال
به اشتراک گذاری در سایت های دیگر
1 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.