انشاء عدة Forms داخل Form1 وانشاء عدة TabPages داخل tabControl

djelal 16/12/2020, 12:44 am

انشاء عدة Forms داخل Form1 وانشاء عدة TabPages داخل tabControl

اضف فوق الفورم1
Form1
1 من نوع
MenuStrip1
و1 من نوع
TabControl1
---
تنشيء قائمة مكون من 3 وهم
File
New
Exit

كود سورس ب
visual basic 2008

الكود:: Public Class Form1 Dim i1 As Integer = 0 Dim j1 As Integer Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.IsMdiContainer = True Me.StartPosition = FormStartPosition.CenterParent TabControl1.TabPages(0).Text = "Page1" TabControl1.TabPages(1).Text = "Page2" j1 = TabControl1.TabPages.Count - 1 End Sub Private Sub TabControl1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TabControl1.Click If TabControl1.SelectedIndex = TabControl1.TabPages.Count - 1 Then Dim tbg As New TabPage TabControl1.TabPages.Add(tbg) j1 += 1 TabControl1.TabPages(TabControl1.TabPages.Count - 2).Text = "Page" + Convert.ToString(j1) TabControl1.TabPages(TabControl1.TabPages.Count - 1).Text = "+" End If End Sub Private Sub NewToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NewToolStripMenuItem.Click i1 += 1 Dim frm2 As New Form2 frm2.MdiParent = Me frm2.StartPosition = FormStartPosition.WindowsDefaultLocation frm2.Text = "Form" + Convert.ToString(i1) frm2.Show() End Sub Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click Application.Exit() End Sub End Class

انشاء عدة Forms داخل Form1 وانشاء عدة TabPages داخل tabControl

اضف فوق الفورم1
Form1
1 من نوع
MenuStrip1
و1 من نوع
TabControl1
---
تنشيء قائمة مكون من 3 وهم
File
New
Exit

كود سورس ب
visual c#

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;

//// انشاء عدة Forms داخل Form1 وانشاء عدة TabPages داخل tabControl

//// انشاء عدة نماذج داخل النموذج1
//// Form1 نموذج1
//// Forms نماذج

//// انشاء عدةالسن تاب باج داخل تاب كونترول
//// tabControl هي اداة يمكنها ان تحوي عدة السن بداخلها
//// TabPage لسان

namespace Test_TabControl1
{
public partial class Form1 : Form
{
//// متغيران من نوع عدد صحيح integer
//// تصريح عام أو اعلان عام داخل الاكلاس فورم1
int i1 = 0; int j1;
public Form1()
{
InitializeComponent();
}

private void Form1_Load(object sender, EventArgs e)
{
/// لجعل الفورم1 تحوي فورم او اثنان او ثلاث
this.IsMdiContainer = true;
/// وضعية ظهور الفورم في الوسط مثلا
this.StartPosition = FormStartPosition.CenterScreen;
/// 2 TabPage أي صفحتان
tabControl1.TabPages[0].Text = "Page1";
tabControl1.TabPages[1].Text = "Page2";
/// جعل المتغير عدد الصفحات ناقص واحد
/// نقص من عدد الصفحات واحد
j1 = tabControl1.TabPages.Count-1;
}
/// حدث النقر فوق تاب كونترول
private void tabControl1_Click(object sender, EventArgs e)
{
/// شرط الدخول هو اذا كان اخر تاب باج تم الضغط فوقه سيتم تنفيذ الشرط
/// من أجل إنشاء لسان او صفحة TabPage جديد
if (tabControl1.SelectedIndex == tabControl1.TabPages.Count-1)
{
/// انشاء TabPage جديد
TabPage tbg = new TabPage();
/// اضافة تاب باج TabPage الى تاب كونترول
tabControl1.TabPages.Add(tbg);
/// تزايد بواحد، كل ضغطة يزيد واحد
j1 += 1;
/// ترقيم الصفحات الى ما بعد الاخيرة
tabControl1.TabPages[tabControl1.TabPages.Count - 2].Text = "Page" + Convert.ToString(j1);
/// عرض أو اظهار العلامة + في الصفحة الاخيرة
tabControl1.TabPages[tabControl1.TabPages.Count - 1].Text = "+";
}
}

private void newToolStripMenuItem_Click(object sender, EventArgs e)
{
/// في كل مرة زيد واحد
i1 += 1;
/// انشاء الفورم2 من اجل عرض
Form2 frm2 = new Form2();
/// جعل الفورم2 يظهر داخل الفورم1
frm2.MdiParent = this;
/// وضعية ظهور الفورم واحدة بعد الاخرى
frm2.StartPosition = FormStartPosition.WindowsDefaultLocation;
/// ترقيم النماذج او الفورم
frm2.Text = "Form"+Convert.ToString(i1);
/// اظهار الفورم2
frm2.Show();
}

private void exitToolStripMenuItem_Click(object sender, EventArgs e)
{
/// الخروج من التطبيق
Application.Exit();
}
}
}

الكود:: using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace Test_TabControl1 { public partial class Form1 : Form { int i1 = 0; int j1; public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { this.IsMdiContainer = true; this.StartPosition = FormStartPosition.CenterScreen; tabControl1.TabPages[0].Text = "Page1"; tabControl1.TabPages[1].Text = "Page2"; j1 = tabControl1.TabPages.Count-1; } private void tabControl1_Click(object sender, EventArgs e) { if (tabControl1.SelectedIndex == tabControl1.TabPages.Count-1) { TabPage tbg = new TabPage(); tabControl1.TabPages.Add(tbg); j1 += 1; tabControl1.TabPages[tabControl1.TabPages.Count - 2].Text = "Page" + Convert.ToString(j1); tabControl1.TabPages[tabControl1.TabPages.Count - 1].Text = "+"; } } private void newToolStripMenuItem_Click(object sender, EventArgs e) { i1 += 1; Form2 frm2 = new Form2(); frm2.MdiParent = this; frm2.StartPosition = FormStartPosition.WindowsDefaultLocation; frm2.Text = "Form"+Convert.ToString(i1); frm2.Show(); } private void exitToolStripMenuItem_Click(object sender, EventArgs e) { Application.Exit(); } } }

انشاء عدة Forms داخل Form1 وانشاء عدة TabPages داخل tabControl

اضف فوق الفورم1
Form1
1 من نوع
MenuStrip1
و1 من نوع
TabControl1
---
تنشيء قائمة مكون من 3 وهم
File
New
Exit

كود سورس ب
visual c++

الكود:: #pragma once #include "Form2.h" namespace TabControl1 { using namespace System; using namespace System::ComponentModel; using namespace System::Collections; using namespace System::Windows::Forms; using namespace System::Data; using namespace System::Drawing; public ref class Form1 : public System::Windows::Forms::Form { private: int i1; int j1; public: Form1(void) { InitializeComponent(); i1=0; } protected: ~Form1() {} private: System::Windows::Forms::TabControl^ tabControl1; private: System::Windows::Forms::TabPage^ tabPage1; private: System::Windows::Forms::TabPage^ tabPage2; private: System::Windows::Forms::MenuStrip^ menuStrip1; private: System::Windows::Forms::ToolStripMenuItem^ fileToolStripMenuItem; private: System::Windows::Forms::ToolStripMenuItem^ newToolStripMenuItem; private: System::Windows::Forms::ToolStripSeparator^ toolStripMenuItem1; private: System::Windows::Forms::ToolStripMenuItem^ exitToolStripMenuItem; private: System::ComponentModel::Container ^components; #pragma region Windows Form Designer generated code void InitializeComponent(void) { //// } #pragma endregion private: System::Void Form1_Load(System::Object^ sender, System::EventArgs^ e) { this->IsMdiContainer=true; this->StartPosition=FormStartPosition::CenterScreen; tabControl1->TabPages[0]->Text = "Page1"; tabControl1->TabPages[1]->Text = L"Page2"; j1 = tabControl1->TabPages->Count-1; } private: System::Void newToolStripMenuItem_Click(System::Object^ sender, System::EventArgs^ e) { i1 += 1; Form2^ frm2=gcnew Form2(); frm2->MdiParent=this; frm2->StartPosition=FormStartPosition::WindowsDefaultLocation; frm2->Text = "Form"+Convert::ToString(i1); frm2->Show(); } private: System::Void exitToolStripMenuItem_Click(System::Object^ sender, System::EventArgs^ e) { Application::Exit(); } private: System::Void tabControl1_Click(System::Object^ sender, System::EventArgs^ e) { if (tabControl1->SelectedIndex == tabControl1->TabPages->Count-1) { TabPage^ tbg = gcnew TabPage(); tabControl1->TabPages->Add(tbg); j1 += 1; tabControl1->TabPages[tabControl1->TabPages->Count - 2]->Text = "Page" + Convert::ToString(j1); tabControl1->TabPages[tabControl1->TabPages->Count - 1]->Text = "+"; } } }; }