راهنمایی جهت ایجاد اسلاید منو

[siroos12 14]

سلام،

دوستان من میخوام یه دکمه بزارم برا اسلاید منوم،باید چه کدی رو بنوییسم که روی دکمه که کلیک شد باز و بسته بشه؟؟؟

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

[siroos12 14]

درود.

از کدوم اسلاید منو استفاده میکنید؟؟؟

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

والا نمیدونم چه اسمی داره،ولی اسلاید منوش ساده است

[Elyas Erfani 3,582]

والا نمیدونم چه اسمی داره،ولی اسلاید منوش ساده است

 

دوست عزیز اگر از انجمن دانلود کردید لینک تاپیک اسلاید منو رو قرار بدید

 

از روی سادگی و غیره ک نمیشه تشخیص داد

[alirezakazemizaroomi 437]

سلام

یه عکسی چیزی ازاون چیزی که میخوای بذار

[siroos12 14]

این برای دکمه منو خود گوشی میاد من برا باتن میخوام بذارمش.

اینم عکس:

[مجید آرتا 5,874]

خب شما کافیه کدی که توی رویداد KeyPress  برای نمایش این منو گذاشته شده رو در رویداد کلیک دکمتون قرار بدید.

[siroos12 14]

خب شما کافیه کدی که توی رویداد KeyPress برای نمایش این منو گذاشته شده رو در رویداد کلیک دکمتون قرار بدید.

کدشو میشه بذارید؟

[مجید آرتا 5,874]

برادر کد رو بنده چطوری براتون قرار بدم!

نمونه های مختلفی از اسلاید منو موجوده.

شما کد خودتون رو در تگ کد قرار بدید بنده راهنماییتون می کنم.

[siroos12 14]

برادر کد رو بنده چطوری براتون قرار بدم!

نمونه های مختلفی از اسلاید منو موجوده.

شما کد خودتون رو در تگ کد قرار بدید بنده راهنماییتون می کنم.

نه من منظورم مربوط به دکمه که باز و بسته بشه.

[مجید آرتا 5,874]

دوستم تا بنده کد شمارو نبینم نمی تونم نظری بدم!

لطفا کدتون رو قرار بدید.

[siroos12 14]

بفرما

این برای key press

Sub Activity_KeyPress (KeyCode As Int) As Boolean 'Return True to consume the event
	If KeyCode = KeyCodes.KEYCODE_MENU Then
If s.Visible = False Then
s.ShowMenu

Else

s.HideMenus

End If

Return True

End If

End Sub

اینم sub

Sub createMenu (sm As SlidingMenu)
	
	sm.Initialize("Menu")

Dim offset As Int = 140dip

sm.BehindOffset = offset

sm.Mode = sm.RIGHT

Dim lv1 As ListView

lv1.Initialize("panelMenu")

sm.Menu.Color= Colors.RGB(40,100,150)
	
lv1.TwoLinesAndBitmap.Label.Gravity = Gravity.RIGHT
lv1.TwoLinesAndBitmap.Label.Width = 50%x
lv1.TwoLinesAndBitmap.ImageView.Width = 17%x
	
lv1.TwoLinesAndBitmap.ImageView.Height = lv1.TwoLinesAndBitmap.ImageView.Width
lv1.TwoLinesAndBitmap.ImageView.Left = 50%x
lv1.TwoLinesAndBitmap.ImageView.Top = 15dip
lv1.TwoLinesAndBitmap.Label.Left = 0%x
lv1.TwoLinesAndBitmap.Label.Top = 15dip
lv1.TwoLinesAndBitmap.Label.Typeface = Typeface.DEFAULT_BOLD
	
	
'-----------------------------------------
lv1.AddTwoLinesAndBitmap2("حمایت مالی از برنامه","",Null,"support")
lv1.AddTwoLinesAndBitmap2("ارتباط با ما","",Null,"contact")
lv1.AddTwoLinesAndBitmap2("دادن نظر به برنامه","",Null,"idea")
lv1.AddTwoLinesAndBitmap2("معرفی محصولات دیگر","",Null,"product")
lv1.AddTwoLinesAndBitmap2("نشان شد ها","",Null,"bookmark")
lv1.AddTwoLinesAndBitmap2("بروز رسانی برنامه","",Null,"update")
lv1.AddTwoLinesAndBitmap2("درباره ما","",Null,"about")
lv1.AddTwoLinesAndBitmap2("تنظیمات","",Null,"setting")
lv1.AddTwoLinesAndBitmap2("خروج","",Null,"exit")
	'-----------------------------------------
sm.Menu.AddView(lv1,0,0,100%x-offset,100%y)
	
End Sub

[dostmobile 329]

sub button-click


if s.showmenus then
s.hidemenus
else
s.showmenus
end if

end sub

کدهای مربوط به رویداد کی پرس رو حذف کنید

چون کیبوردم خرابه نشد صحیح بنویسم

اون خط مربوط به رویداد باتن رو شما کپی نکن

[siroos12 14]

دادا نگرفتم ی کم بیشتر توضیح بده

[dostmobile 329]

گمونم شما باید قبل از انجام اینکار مفاهیم اولیه رو بیاوزید

موفق باشید

[mahfelsoft 130]

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

خوب شما یه دکمه تعریف کن بعد هم توی رویداد کلیکش بنویس

Sub buuton_Down
if menu.visible=true then
menu.hidemenu
else
menu.ShowMenu
end if
end sub

همین البته اون menu اسم اسلاید منو هست . شما اسم اسلاید منویی که خودت گذاشتی جاش بزار

[siroos12 14]

گمونم شما باید قبل از انجام اینکار مفاهیم اولیه رو بیاوزید

موفق باشید

اره فکر کنم

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

درود.

از کدوم اسلاید منو استفاده میکنید؟؟؟

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