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

[bahman2012 13]

سلام دوستان

خیلی خیلی ممنون و دعا گو میشم اگه کسی لطف کنه یه کدی بزاره که اگه فهرست اسکرول شد و به انتها ی لیست رسید یه پیام ظاهر بشه 10 تا دیگه رکود از دیتابیس لود بشه

[mohammad-alone 564]

یه متغیر تعریف کنید

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

[AMiN.M7892 1,029]

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

 

load 10 taee.zip

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

@@mohammad-alone,  برادر تاپیک قدیمی رو بالا نیارید.

 

@,  از شما هم تشکر بابت سورس

[mohammad-alone 564]

دوست عزیز باید با خصیصه Position اسکرول کار کنید.

[bahman2012 13]

میدونم و اینم میدونم که باس از limit استفاده کرد ولی دنبال یه نمونه کد هشتم نه توضیح

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

نمونه کدش داره آماده میشه ( امادس یک مورد کوچولو داره ) و توی فروشگاه قرار می گیره

[bahman2012 13]

ای بابا شما که همه چیو پولی قررار میدید

حداقل یه سایت خارجی مربوط به موضوع معرفی کنید

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

ای بابا شما که همه چیو پولی قررار میدید

حداقل یه سایت خارجی مربوط به موضوع معرفی کنید

همه چیو پولی قرار دادیم ؟

بنده از 600 تا پستی که دادم چنتاش پولیه یا کلا چنتا پکیج پولی توی فروشگاه وجود داره؟

خب وقتی یه زحمتی رو میکشیم و یه وقتی رو واسش تلف می کنیم نباید یه کمکی بشه بهمون ؟

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

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

دوست عزیز شما توی اون تاپیک هم سوال کردید بنده هم درباره LIMIT بهتون توضیح دادم و لینک تاپیک تشخیص به انتها رسیدن ScrollView رو هم دادم

دیگه از این بالاتر چه راهنمایی میتونه وجود داشته باشه؟ پشتیبانی یعنی همین دیگه

اونی که شما الان میخواهید عین خود کدنویسی هست که اون هم دوستانی که پر میکنن میخوان یک مبلغی دستشون بیاد و درآمدی داشته باشن از روی کاری که انجام میدن

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

کاش اینقدر ناشکر نباشیم

[bahman2012 13]

خوب limit , positoin رو که گفتم خودم میدونم و فقط مشکلم اینجاست اگه کد حلقه رو تو بخشس که position اسکرول رو میده قرار بدم با کوچکترین حرکت حلقه تکرار میشه

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

Sub sv_feh1_ScrollChanged(Position As Int)

Dim a As Int
a= Round(Position/500)
If maxi -10=-10 Then 
mini = 0
Else
mini =maxi -10
End If
If a*10 = 0 Then
maxi= 10
Else
maxi=a*10
End If
Log(mini &"-" &maxi)


End Sub