کتابخانه PagerBullet

[porya 959]

سلام خدمت دوستان عزیز
با این کتابخونه میتونین مثل تصاویر زیر یک همچین ViewPager برای خودتون بسازید و هر چند تا آیتم که خواستید میتونید ادد کنید توضیح خاصی نمیدم همه چیز تو تصاویر مشخصه
این کتابخونه از لینک زیر رپ شده
https://github.com/robohorse/pagerbullet

تصاویری از کاربرد کتابخونه


کتابخونه به همراه سمپل پیوست شد.
PagerBullet.zip

------------------------------

نسخه دوم کتابخونه PagerBullet v2.0

امکان اضافه کردن چندین انیمیشن

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

[طاها 480]

عکس میشه گذاشت؟

[Milad-Mohammadi 401]

بله

 

 

 

سعی کنید از جدیدترین کتابخونه android-support-v4 استفاده کنید بنده این کتابخونه رو در کنار پروژه قرار دادم و شما اون رو در محل کتابخونه هاتون کپی کنید.

دقیقا همین کارو کردم.من این کتابخونه رو از فایل داخل پروژه کپی پیست کردم تو قسمت کتابخونه ها!!

[porya 959]

ببینید این ارور میگه که همچین متدی تو این کتابخونه android-support-v4 وجود نداره
شما باید از آخرین ورژن این کتابخونه android-support-v4 استفاده کنید و احتمالا sdk تون بروز نیست

[Alireza.Ghafari 2,104]

نایس توی همین پروژم لازم داشتم  

خسته نباشی 

[sajad325 76]

لینک عکس خرابه (عکس باز نمیشه)

[مهدی ایزدی 9,203]

@@porya,@,

 

فایلی با این آدرس وجود ندارد. 

[porya 959]

لینک عکس خرابه (عکس باز نمیشه)

 

 

@@porya,@,

 

فایلی با این آدرس وجود ندارد.

 

تصاویر پست اول ویرایش شد.

[dada 8]

چگونه میتوانیم به هر صفحه لایوت بدیم ممنون

[porya 959]

چگونه میتوانیم به هر صفحه لایوت بدیم ممنون

سلام شما میتونی تو هر صفحه یه پنل ادد کنی بعد بیا لایوت مورد نظرت رو تو پنل لود کنی...

[mahdiabasi444 0]

چطوری میشه عکس توش قرار داد ؟؟

[arefhoot 91]

دوستان چطوری میشه عکس بهش اضافه کرد

[porya 959]

چطوری میشه عکس توش قرار داد ؟؟

 

 

دوستان چطوری میشه عکس بهش اضافه کرد

 

برای قرار دادن عکس میتونین از کد زیر استفاده کنین فقط دقت کنین عکس ها از یه فرمت و به ترتیب شماره گذاری شده باشه...

	Dim pa As PagerBulletAdapter
	pa.Initialize
	
	For i = 0 To 4
		Dim img As ImageView
		img.Initialize("img")
        i = i + 1      
		img.Bitmap = LoadBitmap(File.DirAssets,i&".png")
		pa.AddPage(img)
	Next
	
	Dim pb As PagerBullet
	pb.Initialize(pa,"pb")

	Activity.AddView(pb,0,0,100%x,100%y) 

[mahdi tahan 723]

این کتابخونه sub click نداره...

 

کسی میدونی چطوری قابلیت کلیک براش بزارم؟

 

این کتابخونه فقط  Sub onPageChanged داره....

 

[mahdi tahan 723]

سلام داداش چطور میش عدد  رو به جایی اون دایره ها گذاشت؟

 

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

 

 

منظورم این..

 

سوال دیگ این محدودیت نداره؟چون میخوام برای گالری ویو ازش استفاده کنم.منظور از محدودیت تعداد عکس...

[porya 959]

این کتابخونه sub click نداره...

 

کسی میدونی چطوری قابلیت کلیک براش بزارم؟

 

این کتابخونه فقط  Sub onPageChanged داره....

 

 

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

Sub Activity_Create(FirstTime As Boolean)

	Dim pa As PagerBulletAdapter
	pa.Initialize
	For i = 0 To 20
		Dim p As Panel
		p.Initialize("p")
		p.Color = Colors.RGB(Rnd(0,255),Rnd(0,255),Rnd(0,255))
		p.Tag = i
		pa.AddPage(p)
	Next
	
	Dim pb As PagerBullet
	pb.Initialize(pa,"pb")
	Activity.AddView(pb,0,0,100%x,100%y)
	
End Sub

Sub p_Click
	Dim p As Panel
	p = Sender
	Log(p.Tag)
End Sub

سلام داداش چطور میش عدد  رو به جایی اون دایره ها گذاشت؟

 

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

 

سوال دیگ این محدودیت نداره؟چون میخوام برای گالری ویو ازش استفاده کنم.منظور از محدودیت تعداد عکس...

 

محدودیت که فکر نکنم داشته باشه چون بنده تا صد ایتم هم ادد کردم و خیلی روان کار کرد در مورد اون دایره ها هم اگه ایتم ها بیشتر از 20 تا باشه خودکار تبدیل به تکست میشه.

[porya 959]

سلام دوستان 

نسخه دوم کتابخونه PagerBullet منتشر شد.

تو این نسخه قابلیت اضافه کردن چندین انیمیشن قرار داده شده است تصویر زیر نحوه کار این کتابخونه همراه با یکی از انیمیشن ها را نشان میدهد.

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

امیدوارم به دردتون بخوره.

موفق باشید.

[Hamidbergis 332]

داداش تصاویر رو از نت هم میتونه دانلود کنه و بگیره؟

[porya 959]

در 58 دقیقه قبل، Hamidbergis گفته است :

داداش تصاویر رو از نت هم میتونه دانلود کنه و بگیره؟

خیر

[ali.1020 98]

با تشکر از کتابخانه خوبتون

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

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

Sub pb_onPageChanged(position As Int)
	Log(position)
		Activity.SetBackgroundImage(LoadBitmap(File.DirAssets,position&".jpg"))
End Sub

ممنون میشم ساب لانگ کلیک رو اضافه کنید