منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
عرض الفورم في مكان محدد - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : عرض الفورم في مكان محدد (/showthread.php?tid=26440)

الصفحات: 1 2

عرض الفورم في مكان محدد - المتألق9 - 10-09-18

السلام عليكم 
ممكن طريقة عرض الفورم في اسفل يمين الشاشة مهما تغيرت دقة الشاشة

RE: عرض الفورم في مكان محدد - Hazem1 - 10-09-18

(10-09-18, 08:52 PM)المتألق9 كتب : السلام عليكم 
ممكن طريقة عرض الفورم في اسفل يمين الشاشة مهما تغيرت دقة الشاشة

الأفضل أن تجعل الفورم في مُنتصف الشاشة، أو جرب الخيارات الأُخرى من هذه الخاصية أخي الكريم

RE: عرض الفورم في مكان محدد - ابراهيم ايبو - 10-09-18

السلام عليكم 

اخي الكريم من الخاصية location للفورم ضع الاحداثيات التي تريد ان تحدد مكان ظهور الفورم مثلا 500; 100
 واعلم ان الاحداثيات تبدأ من الزاوية العلوية اليسرى بقيمة 0;0 ولن تحتاج الى كتابة اي كود
من ناحية اخرى اعتقد ولست جازما لايوجد للفورم خاصية dock هذا في نسخة vb2008 اما في النسخ الحديثة فلا اعلم لاني لم استخدمها 
لذلك يتوجب عليك معرقة قياس الشاشة التي سيعمل عليها البرنامج وهذا ليس بعملي وكما ذر الاخوة قبلي يمكنك استحدام الخاصية start position

RE: عرض الفورم في مكان محدد - عبد العزيز البسكري - 10-09-18

السّلام عليكم و رحمة الله و بركاته
إضافة لما قدّمه الإخوة الأفاضل .. مع تغيير الأرقام حسب ما تريده .. و مع إضافة كود خاصية عدم تحريك الفورم
كود :
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
    'وضعية الفورم
       Me.StartPosition = FormStartPosition.WindowsDefaultLocation
       Me.TopMost = True
       Me.Top = 118
       Me.Left = 2
       Me.Height = 585
       Me.Width = 1200
End Sub



RE: عرض الفورم في مكان محدد - elgokr - 11-09-18

وعليكم السلام ورحمة الله وبركاته

كل ما عليك استخدام الكود التالى فى حدث  Form1_Load
كود :
       Dim x As Integer
       Dim y As Integer
       x = Screen.PrimaryScreen.WorkingArea.Width
       y = Screen.PrimaryScreen.WorkingArea.Height - Me.Height
       Do Until x = Screen.PrimaryScreen.WorkingArea.Width - Me.Width
           x = x - 1
           Me.Location = New Point(x, y)
       Loop

يفضل ان تجعل خصائص الفورم 

PHP كود :
StartPosition = Manual 

تحياتى لك
وتمنياتى لك التوفيق


RE: عرض الفورم في مكان محدد - المتألق9 - 16-09-18

مشكورين جميعا على الرد
ولكن كود الاخ [b]elgokr هو ما ابحث عنه فله الشكر والتقدير[/b]

RE: عرض الفورم في مكان محدد - DK-x - 16-09-18

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


RE: عرض الفورم في مكان محدد - elgokr - 17-09-18

(16-09-18, 03:33 PM)DK-x كتب :
طيب يا جماعه مشكورين على جهدكم   Heart
و هالشي مو بس الاخ المتألق9 رح يستفاد منه اني كذلك
بس لوردت البرنامج يعرض اسفل يسار الشاشة
كيف؟.


حتى تعم الفائدة كاملاً 


عرض الشاشة اسفل / يمين
كود :
Dim x As Integer
      Dim y As Integer
      x = Screen.PrimaryScreen.WorkingArea.Width
      y = Screen.PrimaryScreen.WorkingArea.Height - Me.Height
      Do Until x = Screen.PrimaryScreen.WorkingArea.Width - Me.Width
          x = x - 1
          Me.Location = New Point(x, y)
      Loop

عرض الشاشة اسفل / يسار
كود :
       Dim x As Integer = 0
       Dim y As Integer = Screen.PrimaryScreen.WorkingArea.Height - Me.Height
       Me.Location = New Point(x, y)

يفضل ان تجعل خصائص الفورم
PHP كود :
StartPosition = Manual 

تحياتى لكم
وتمنياتى للجميع التوفيق


RE: عرض الفورم في مكان محدد - DK-x - 17-09-18

من المناقشة توصلت الى هذه النتيجة Idea
[attachment=19556]
وفيه كل الاماكن اتمنى تنفعكم Heart
[attachment=19557]

RE: عرض الفورم في مكان محدد - المتألق9 - 18-09-18

وماذا لو أريد ان يظهر الفورم في اليمين مع ظهور تدريجي وليس ظهور الفورم كاملا مرة واحدة