PDA

View Full Version : حرکت دکمه در صفحه



mahdi.manian
یک شنبه 11 فروردین 1392, 04:12 صبح
با سلام.

دوستان من مسئله زیرا دارم:
برنامه ای بنوسید که یک دکمه درحال حرکت با برخورد به لبه های نرم بازگردد.

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

با تشکر.

WOLF_MEHRDAD
یک شنبه 11 فروردین 1392, 04:30 صبح
درود بر شما

چند سالی هست که vb6 کار نکردم ولی شما باید 2 تا timer بذارید و کدی شبیه کد زیر رو براش بنویسید


timer1 :
if(btn.left <= frm.width)
{
btn.left += 10
}else
{
timer2.start()
timer1.stop()
}

timer2:

if(btn.left >= 0)
{
btn.left -= 10
}else
{
timer1.start()
timer2.stop()
}


راستی الان وقت خواب نیست :لبخند:
موفق باشید

mahdivita
یک شنبه 11 فروردین 1392, 05:03 صبح
ُسلام
یه کم روی این کار کنی به جوابت میرسی

Private Sub Timer1_Timer()
If Label1.Left < Form1.Width - Label1.Width Then
Label1.Left = Label1.Left + 20
Else
Timer1.Enabled = False
End If
End Sub

mahdi.manian
یک شنبه 11 فروردین 1392, 07:45 صبح
سلام.

دوستان ما هنوز timer را نخوندیم.

ممنون میشم اگه با همون روش قدیمی left دادن کدشو بدید که حرکت کنه و وقتی به گوشه می خوره برگرده (البته این که به گوشه ها می خوره ، برگرده، فکر کنم باید بگیم اگه left اش x شد. ممنون میشم دوستان کدشو قرار دهد.)


با تشکر.

SlowCode
یک شنبه 11 فروردین 1392, 12:11 عصر
با سلام.

دوستان من مسئله زیرا دارم:
برنامه ای بنوسید که یک دکمه درحال حرکت با برخورد به لبه های نرم بازگردد.

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

با تشکر.

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

mahdivita
یک شنبه 11 فروردین 1392, 14:34 عصر
دوستمون آقا محسن راست میگن ممکنه ادمین حذفتون کنه دوست عزیز
بعد شما چطوری هنوز timer رو نخوندین؟؟؟؟؟(مگه سال سوم نیستین؟؟؟)
:متفکر: