[RaggiTech]

كاتب المشاركة : أحمد جمال

بناء Windows Forms بالكود :

قبل أن نبدأ باستخدام المعالجات الجاهزة التي وفرتها لنا مايكروسوفت ضمن Visual Studio ، يفضل ان نقوم بمحاولة بناء نموذج بعيداً عنها حتى نستطيع فهم كيفية عمل Windows Forms .

لذا قم بفتح المفكرة Notepad ، قم بانشاء ملف مثلاً باسم WindowsForms.cs ، ومن ثم سنبدأ في كتابة الكود .

أولاً سنقوم بتعريف كلاس مشتق من الفئة Forms بالشكل التالي مثلاً :

C#:

كود :

class SimpleWindow : Form
{
}

vb.net:

كود :

Class SimpleWindow
Inherits Form

End Class

والآن سنقوم في حدث Main باستدعاء نسخة منه ، لا تنسى اضافة مكتبات System.Windows.Forms ، لذا سيكون الكود بالكامل بالشكل التالي :
C#:

كود :

using System;
using System.Windows.Forms;
namespace WindowsForms
{
class Program
{
static void Main()
{
Application.Run(new SimpleWindow ());
}
}
}
class SimpleWindow : Form
{
}

vb.net:

كود :

Imports System
Imports System.Windows.Forms
Namespace WindowsForms

Class Program
Private Shared Sub Main()
Application.Run(New SimpleWindow())
End Sub
End Class

End Namespace
Class SimpleWindow
Inherits Form

End Class

الآن فقط كل ما عيك هو فتح Cmd الخاص بك ، وكتابة أمر مثل التالي :

كود :

csc /target:winexe *.cs

طبعاً بعد الذهاب لمسار البرنامج ، وبعد تعريف csc لتكون جاهزة للاستخدام في أي مكان ، سيكون الناتج شيئاً مثل هذا :



والآن بامكاننا التحكم في بعض الخصائص ، مثل الطول والعرض . الشفافية .... الخ من الخصائص أو حتى تنفيذ الأوامر التي يمكن الوصول إليها من خلال Object Browser بالشكل التالي مثلاً :



لذا نجد ان بامكاننا مثلاً تغيير الطول والعرض وتوسيطه ، لذا سيكون كود الفورم بالشكل التالي :
C#:

كود :

class SimpleForm : Form
{
public SimpleForm (int height, int width, bool center)
{
Width = width;
Height = height;
if(center) CenterToScreen();
}
}

vb.net:

كود :

Class SimpleForm
Inherits Form
Public Sub New(ByVal height As Integer, ByVal width As Integer, ByVal center As Boolean)
Width = width
Height = height
if center=True Then
CenterToScreen()
End If
End Sub
End Class

لكن لا تنس أنك في Run سوف تقوم بتمرير بارميترات إلى الفئة ، بالشكل التالي مثلاً :
C#:

كود :

static void Main()
{
Application.Run(new MainWindow(200, 300,True));
}

vb.net:

كود :

Private Shared Sub Main()
Application.Run(New MainWindow(200, 300, [True]))
End Sub

لا تنس طبعاً انه بامكانك الحصول على هذه القيم من خلال Args كما تعلمنا سابقاً ....