07-08-20, 06:34 AM
(آخر تعديل لهذه المشاركة : 07-08-20, 06:37 AM {2} بواسطة عبد الهادي بهاب.)
السلام عليكم
بالاستفادة مما سبق .كيف اجعل صفحة العمل على شكل ورقة مليميترية
العمل المطلوب :
افتح صفحة جديدة
الان في كود الصفحة ازرع الكود التالي لاستعمال خاصية الرسم
الان في الكود العام
في بداية العرض form1_load
الان في form1_Paint
يمكن تغيير لون الخط حسب ذوقك
الشكل الناتج
بالتوفيق
ماذا نستفيد من ذلك ؟
طبعا يا صديقي ........يمكن ان نصمم تمرين رياضي في تحديد نقطة من المعلم المتعامد المتجانس
مثلا نطلب منه : اين النقطة ذات الاحدثيات ( 5 . 8 ) لما يضغط في النقطة نصحح له باظهار رسالة ما
ممكن نستفيد برسم مثلث او مربع وفق شروط معينة
الخ من الافكار
بالاستفادة مما سبق .كيف اجعل صفحة العمل على شكل ورقة مليميترية
العمل المطلوب :
افتح صفحة جديدة
الان في كود الصفحة ازرع الكود التالي لاستعمال خاصية الرسم
PHP كود :
Imports System.Drawing
الان في الكود العام
PHP كود :
Dim g As Graphics
في بداية العرض form1_load
PHP كود :
g = CreateGraphics()
الان في form1_Paint
PHP كود :
' معطيات طول و عرض الصفحة كلها
Dim Mw As Integer = Me.Size.Width
Dim Mh As Integer = Me.Size.Height
' الخطوط الافقية
For i = 0 To Mh Step 4
Dim x = 0
Dim y = i
g.DrawLine(Pens.OrangeRed, New Point(x, y), New Point(Mw, y))
Next
' الخطوط العمودية
For i = 0 To Mw Step 4
Dim x = i
Dim y = 0
g.DrawLine(Pens.OrangeRed, New Point(x, y), New Point(x, Mh))
Next
' كل عشرة افقية خط سميك
For i = 0 To Mh Step 40
g.DrawRectangle(Pens.Red, 0, i, Mw, 1)
Next
' كل عشرة خطوط عمودية خط مسيك
For i = 0 To Mw Step 40
g.DrawRectangle(Pens.Red, i, 0, 1, Mh)
Next
' الخط المركزي الافقي
Dim Cw As Integer = Mh / 2 - 10
g.DrawRectangle(Pens.DarkRed, 0, Cw, Mw, 1)
' الخط العمودي المركزي
Dim Ch As Integer = Mw / 2
g.DrawRectangle(Pens.DarkRed, Ch, 0, 1, Mh)
يمكن تغيير لون الخط حسب ذوقك
الشكل الناتج
بالتوفيق
ماذا نستفيد من ذلك ؟
طبعا يا صديقي ........يمكن ان نصمم تمرين رياضي في تحديد نقطة من المعلم المتعامد المتجانس
مثلا نطلب منه : اين النقطة ذات الاحدثيات ( 5 . 8 ) لما يضغط في النقطة نصحح له باظهار رسالة ما
ممكن نستفيد برسم مثلث او مربع وفق شروط معينة
الخ من الافكار
لعل الكلمة التي تنفعني لم أكتبها بعد
عبد الله بن المبارك