المحاضرة الخامسة

المحاضرة الخامسة
:Software Process عملیات البرامجیات
ھناك عدة طرق من اجل معالجة البرامجیات سوف نذكرھا خلال بحثن ا الق ادم ولك ن قب ل ان نب دأ یج ب ان نع رف الف رق ب ین ھندس ة
النظم وھندسة البرامجیات :
.SW والبرامجیات HW فھندسة البرامجیات : مجموعة من الانشطة المترابطة بھدف انتاج برامجیات تھتم بالمعدات
بینما ھندسة النظم : مجموعة م ن الانش طة المترابط ة بھ دف انت اج برامجی ات تھ تم بانت اج الانظم ة والبرامجی ات ول یس لھ ا علاق ة
:.HW بالمعدات
Waterfall Model اولا: الطریقة الانحداریة او طریقة الشلال
وتستخدم ھذه الطریقة اذا كانت متطلبات النظام واضحة المعالم ومحددة وذلك لان ھذه الطریقة اذا انتقلنا من احد المراحل ف لا ع ودة
بعدھا كما ھو موضح بالرسم وذلك لانھا ستؤدي الى خسائر فعلى سبیل المث ال ل و انن ا ح ددنا المع دات المفت رضتواج دھا وعل ى
ھذا الاساس قام المبرمج بابرام العقد مع الشركة الراغبة في النظ ام وعل ى اس اس المع دات والتك الیف الت ي اع دھا لھ م المھن دس او
المحلل ومن ثم لاحظ ان المعدات ناقصة فان تكالیف المعدات الناقصة سوف یتحملھا المھندس .

الواجب الخامس : رسم دالة ال
-1 رسم ثابت او ستاتیكي :
Imports System.Drawing
Imports System.Drawing.Drawing2D
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Dim r As Graphics = Me.CreateGraphics
Dim mypen As New Pen(Color.Blue, 2)
mypen.DashStyle = DashStyle.Dash
r.DrawLine(mypen, 150, 150, 150, 105)
r.DrawLine(mypen, 350, 150, 350, 195)
r.DrawLine(Pens.Red, 50, 250, 50, 50)
r.DrawLine(Pens.Red, 50, 150, 500, 150)
r.DrawBezier(Pens.Black, 50, 150, 150, 50, 250, 150, 250, 150)
r.DrawBezier(Pens.Black, 250, 150, 350, 250, 450, 150, 450, 150)
l1.Location() = New Point(30, 145)
l1.Text = 0
l2.Location = New Point(145, 155)
l2.Text = 90
l3.Location = New Point(250, 130)
l3.Text = 180
l4.Location = New Point(340, 200)
l4.Text = 270
l5.Location = New Point(450, 155)
l5.Text = 360
l6.Location = New Point(30, 105)
l6.Text = 1
l7.Location = New Point(30, 195)
l7.Text = -1
r.DrawLine(Pens.Green, 20, 300, 20, 300)
Dim p As New Point(New Size(50, 50))
End Sub
End Class
ودینامیكیة

Class
ودینامیكیة (متحركة): sin -2 رسم المنحنى باستخدام الدالة
Imports System.Drawing
Imports System.Drawing.Drawing2D
Public Class Form1
Dim i As Single = 0
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Timer1.Tick
Dim gr As Graphics = Me.CreateGraphics
Dim mypen As New Pen(Color.Blue, 2)
mypen.DashStyle = DashStyle.DashDot
Dim toDegree As Double = (22 / 7) / 180
gr.DrawLine(mypen, 300, 100, 300, 200)
gr.DrawLine(mypen, 120, 100, 120, 0)
gr.DrawLine(Pens.Black, 30, 100, 390, 100)
gr.DrawLine(Pens.Black, 30, 0, 30, 200)
gr.DrawEllipse(Pens.Red, i + 30, -CInt(Math.Sin(toDegree * i) * 100) + 100, 1, 1)
l1.Text = 1
l1.Location = New Point(10, 0)
l2.Text = -1
l2.Location = New Point(10, 200)
l3.Text = 0
l3.Location = New Point(10, 90)
l4.Text = 90
l4.Location = New Point(110, 110)
l5.Text = 180
l5.Location = New Point(210, 80)
l6.Text = 270
l6.Location = New Point(300, 210)
l7.Text = 360
l7.Location = New Point(390, 90)
i += 1
If i = 360 Then
Timer1.Enabled = False
End If
End Sub
End Class