تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] تناقص البانل من الأيسر إلى الأيمن
#1
Heart 
إخوتي الأعزاء
كيف يمكنني أن أجعل البانل يتناقص تدريجيا من جهته اليسرى إلى جهته اليمنى...يعني من الأيسر نحو الأيمن  
و شكرا مسبقا


    Heart ربي زدني علما  Heart

الرد
تم الشكر بواسطة:
#2
مرحبا أخي
تفضل و إن شاء الله أكون فهمت الاتجاهات صحيح

البانل تكون على يمين المستخدم ( يسار الشاشة ) 
و 770 الموجودة بالكود هي عرض الفورم الذي توجد به البانل

كود :
Do While Panel1.Location.X < 770
           Panel1.Location = New Point(Panel1.Location.X + 1, Panel1.Location.Y)
       Loop
الرد
تم الشكر بواسطة: ابراهيم ايبو
#3
Rainbow 
(30-05-21, 06:42 PM)ADAM12 كتب : مرحبا أخي
تفضل و إن شاء الله أكون فهمت الاتجاهات صحيح

البانل تكون على يمين المستخدم ( يسار الشاشة ) 
و 770 الموجودة بالكود هي عرض الفورم الذي توجد به البانل

كود :
Do While Panel1.Location.X < 770
           Panel1.Location = New Point(Panel1.Location.X + 1, Panel1.Location.Y)
       Loop


السلام عليكم أخي الكريم
أنا لا أقصد مكان تواجد البانل في الفورم...سأشرح..
إفترض أنه عندنا بانل في يسار الفورم ...و هذا البانل طوله 200...نريد أن نجعل طوله يتناقص تدريجيا من 200 ثم 190 ثم 180 ثم 170 ثم 160 ثم 150 ...حتى يصل 0 ...لكن المشكلة أن هذا التناقص يحدث من يمين البانل نحو يساره...يعني من رأسه الأيمن نحو رأسه الأيسر...
الآن نريده أن يتناقص من يساره نحو يمينه..
شكرا أخي الكريم 


    Heart ربي زدني علما  Heart

الرد
تم الشكر بواسطة: ابراهيم ايبو
#4
السلام عليكم ورحمة الله وبركاته
اخي الكريم الفكرة هي ان نثبت تموضع البانل من جهة اليمين
المثال التالي هو ماتريد ان شاء الله


الملفات المرفقة
.zip   Panel Minus.zip (الحجم : 132.55 ك ب / التحميلات : 18)
اعمل الخير واجرك لاتنتظره فالله خير من اليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد
#5
اخي انت تحتاج الى تعديل موقع البانل ايضا بعد انقاص عرضه 
فبهذه الطريقة سيبدو ان البانل يتناقص عرضه من اليسار لليمين باختصار السر في تعويض موقع البانل بنفس القيمة 
التي انفصتها منه وهذا يكون بزيادة قيمة الخاصية Left اذا كنت تريد ان يكون التناقص من اليسار لليمين 




كود :
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Panel1.Width -= 10
        Panel1.Left += 10
    End Sub

الرد
تم الشكر بواسطة: ابراهيم ايبو , kebboud , ابو روضة
#6
Thumbs Up 
(04-06-21, 12:47 AM)ابراهيم ايبو كتب : السلام عليكم ورحمة الله وبركاته
اخي الكريم الفكرة هي ان نثبت تموضع البانل من جهة اليمين
المثال التالي هو ماتريد ان شاء الله


السلام عليكم أخي الكريم 
بالضبط هذا ما أريده ...
بارك الله فيك و أدام علينا و عليكم نعمه الظاهرة و الباطنة و جعل فيكم منافع للناس..


    Heart ربي زدني علما  Heart

الرد
تم الشكر بواسطة: ابراهيم ايبو , ابو روضة
#7
وبارك الله فيك ولك اخي الكريم
اعمل الخير واجرك لاتنتظره فالله خير من اليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد
تم الشكر بواسطة: ابو روضة
#8
(04-06-21, 12:56 AM)معاند الحظ كتب : اخي انت تحتاج الى تعديل موقع البانل ايضا بعد انقاص عرضه 
فبهذه الطريقة سيبدو ان البانل يتناقص عرضه من اليسار لليمين باختصار السر في تعويض موقع البانل بنفس القيمة 
التي انفصتها منه وهذا يكون بزيادة قيمة الخاصية Left اذا كنت تريد ان يكون التناقص من اليسار لليمين 




كود :
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Panel1.Width -= 10
        Panel1.Left += 10
    End Sub


السلام عليكم أخي المبجل المفخم
هذا بالضبط ما أريده ..حفظك الله لنا نبراسا نسير على ضوئه في ظلمات البرمجة...
شكرا مسبقا
Heart


    Heart ربي زدني علما  Heart

الرد
#9
(04-06-21, 12:41 PM)kebboud كتب :
(04-06-21, 12:56 AM)معاند الحظ كتب : اخي انت تحتاج الى تعديل موقع البانل ايضا بعد انقاص عرضه 
فبهذه الطريقة سيبدو ان البانل يتناقص عرضه من اليسار لليمين باختصار السر في تعويض موقع البانل بنفس القيمة 
التي انفصتها منه وهذا يكون بزيادة قيمة الخاصية Left اذا كنت تريد ان يكون التناقص من اليسار لليمين 




كود :
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Panel1.Width -= 10
        Panel1.Left += 10
    End Sub


السلام عليكم أخي المبجل المفخم
هذا بالضبط ما أريده ..حفظك الله لنا نبراسا نسير على ضوئه في ظلمات البرمجة...
شكرا مسبقا
Heart

وعليك السلام ورحمة الله وبركاته
بارك الله فيك وفي اهلك واحبابك ومشكور على كلماتك الراقية

الرد
تم الشكر بواسطة: kebboud , ابراهيم ايبو , ابو روضة , ابو روضة


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] اريد كود إلغاء ظهور قائمة النسخ عند النقر بزر الماوس الأيمن على مربعات النصوص Ahmed Gandos 3 1,686 08-03-16, 08:54 PM
آخر رد: HASAN6.0
  حركة جميلة للفورم لكن هل يمكن تطبيقها على البانل فقط داخل الفورم؟؟؟ Ameer syria 2 2,088 30-11-13, 09:52 AM
آخر رد: sooriaty03

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم