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

أخذ فكرة عن عمل ثريد(Thread) وهو مثال في اللغات الثلاث

اذهب الى الأسفل

أخذ فكرة عن عمل ثريد(Thread) وهو مثال في اللغات الثلاث Empty أخذ فكرة عن عمل ثريد(Thread) وهو مثال في اللغات الثلاث

مُساهمة  djelal 28/12/2020, 10:26 am

أخذ فكرة عن عمل ثريد(Thread) وهو مثال في اللغات الثلاث

وعملية تنفيذ

Visual C#

using System.Threading;

namespace Test_Thread1
{
class Program
{
static void Main(string[] args)
{
TThread1 th1 = new TThread1();
ThreadStart MyThreadStart1 = new ThreadStart(th1.FuncThread);
ThreadStart MyThreadStart2 = new ThreadStart(TThread2.FuncThread);

Thread MyThread1 = new Thread(MyThreadStart1);
Thread MyThread2 = new Thread(MyThreadStart2);

MyThread1.Start();
MyThread2.Start();
}
}

public class TThread1
{
public void FuncThread()
{
for (int i1 = 0; i1 <= 5; i1++)
{
Console.WriteLine(" Thread One");
Thread.Sleep(50);
}
}
} // End Class TThread1
class TThread2
{
public static void FuncThread()
{
for (int i1 = 0; i1 <= 5; i1++)
{
Console.WriteLine("Thread Two ");
Thread.Sleep(50);
}
}
} // End Class TThread2

}

///////////////////////////// Visual Basic

Visual Basic

Imports System.Threading
Module Module1
Sub Main()
Dim th1 As New TThread1
Dim MyThreadStart1 As New ThreadStart(AddressOf th1.FuncThread)
Dim MyThreadStart2 As New ThreadStart(AddressOf TThread2.FuncThread)
Dim MyThread1 As New Thread(MyThreadStart1)
Dim MyThread2 As New Thread(MyThreadStart2)
MyThread1.Start()
MyThread2.Start()
End Sub
Public Class TThread1
Public Sub FuncThread()
Dim i1 As Integer
For i1 = 0 To 5
Console.WriteLine(" Thread One")
Thread.Sleep(50)
Next i1
End Sub

End Class ' End Class TThread1
Public Class TThread2
Public Shared Sub FuncThread()
Dim i1 As Integer
For i1 = 0 To 5
Console.WriteLine("Thread Two ")
Thread.Sleep(50)
Next i1
End Sub
End Class ' End Class TThread2

End Module

/////////////////////////// Visual C++

Visual C++

using namespace System::Threading;

public ref class TThread1
{
public:
static void FuncThread()
{
for (int i1 = 0; i1 <= 5; i1++)
{
Console::WriteLine(" Thread One");
Thread::Sleep(50);
}
}
}; // End Class TThread1
public ref class TThread2
{
public:
static void FuncThread()
{
for (int i1 = 0; i1 <= 5; i1++)
{
Console::WriteLine("Thread Two ");
Thread::Sleep(50);
}
}
}; // End Class TThread2

void main()
{
ThreadStart^ MyThreadStart1 = gcnew ThreadStart(&TThread1::FuncThread);
ThreadStart^ MyThreadStart2 = gcnew ThreadStart(&TThread2::FuncThread);

Thread^ MyThread1 = gcnew Thread(MyThreadStart1);
Thread^ MyThread2 = gcnew Thread(MyThreadStart2);

MyThread1->Start();
MyThread2->Start();

Console::ReadKey();
}




djelal
مبرمج مجتهد

عدد المساهمات : 157
تاريخ التسجيل : 29/04/2015

الرجوع الى أعلى الصفحة اذهب الى الأسفل

الرجوع الى أعلى الصفحة

- مواضيع مماثلة

 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى