جعل الفروم يخرج مثل الماسنجر

[loulou]

[align=center]بسم الله الرحمان الرحيم



اليوم سأشرح لكم كيفية جعل الفروم يخرج مثل المآإسنجر

1-نفتح برنامج الفيجوال بيسك
2-ثم عمل جديد Standar EXE

يخرج لنا هكذا



اوك الان نضع هذا الكود بالفوروم

'Set the left position to left most side of the screen
Me.Left = Screen.Width - Me.Width - 50
'Set the top posiotion to beneath the screen
Me.Top = Screen.Height + Me.Height - 400

مثال



وبعـدِهـا نضـيِـف ادإه التـايـمِـرِ و نضغط عليها مرتين

ونضـيِـف هذا الكـوِد

'If the screen is not reached above then continue on
If Me.Top <= Screen.Height - Me.Height - 250 Then Timer1.Enabled = False
'For faster and smoother animation
'Ive done like this
For i = 1 To 5
Me.Top = Me.Top - 20
DoEvents
Next

و الان اعدادت التايمر



تم بحمدالله

التقييم من فضلكم :a12::a12::a12::a12::a12::a12::a12::a12::a12:

[/align]

[هكوره]

يسلمو على الطرح الرائع

[Gx1Sniper]

بارك الله فيك يالغالي

تقبل مروري

[Saad Ghamdi]

[align=center]جزاك الله خير شرح اكثر من رائع [/align]

[loulou]

شكرا على ردودكم المشجعة

[omer.arbab]

أكثــــر من رائع
أرجو تقبل مروري ^_^

[loulou]

مشكور اخي omer

[align=center]شـكــ وبارك الله فيك ـــرا لك[/align]

[loulou]

اقتباس المشاركة الأصلية كتبت بواسطة joker-x [align=center]شـكــ وبارك الله فيك ـــرا لك[/align]

لا شكر على واجب

[_Mr]

تسلم على مرورك ياغالى وان شاء الله التوفيق للجميـع

[loulou]

اقتباس المشاركة الأصلية كتبت بواسطة _Mr تسلم على مرورك ياغالى وان شاء الله التوفيق للجميـع

منور اخي

[oupsnight]

شكرا لك يا اخي

[loulou]

اقتباس المشاركة الأصلية كتبت بواسطة oupsnight شكرا لك يا اخي

لا شكر على واحب

[sayf]

قدييييييييمة

[loulou]

اقتباس المشاركة الأصلية كتبت بواسطة sayf قدييييييييمة

مشكوور على الشكر اخي

منور والله :wink2::wink2: (الله يهديك)