• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

البحث في المنتدى

Showing results for tags 'windows forms'.

  • البحث بالتاقات

    اكتب الكلمات المفتاحيه بينها علامه الفاصله
  • البحث بكاتب الموضوع

تم إيجاد 25 نتيجة

  1. السلام عليكم اذا كنت مطور برامج سطح المكتب ويندز   Windows forms applications من المفترض ان يكون واجهتك مشكلة حجم الفورم وتجاوبها مع مختلف مقاسات الشاشات فيجب عليك لتفادي عدم فتح الفورم بشكل صحيح عندما يتغير حجم الشاشة في الفيديو التالي نقوم بتطبيق مثال عملي لحل هذه المشكلة والتدريب علي تصميم شاشة احترافية وتجنب مشكلة حجم الشاشة. اليكم الفيديو  https://www.youtube.com/watch?v=chffCLUiGDI  
  2. من فرج عن مسلم كربة

    كيف يمكننى وضع كود فى نموذج لتحريك الشاشة لمشاهدة صورة طويلة ( اطول من الشاشة) مثلا الصورة عبارة عن مستند نصى فيه 30 سطرا فسوف تظهر فى الشاشة فى النموذج 10 سطرا اريد الكود يحرك الشاشة لمشاهدة السطر العشرين فى الصورة
  3. السلام عليكم ورحمه الله وبركاته    بعد التحية    يوجد مشكلة عند رفع وصفحات ويب  على السيرفر ووعند اشغالها فى الموقع  يظهر هة الرساله خطأ    An error occurred during the processing of a configuration file required to service this request. Please review the specific error details below and modify your configuration file appropriately.      فى هذا السطر <authentication mode="Windows" />   يوجد فى المرفقات صرة توضيحية للمشكلة 
  4. بسم الله الرحمن الرحيم   كشفت شركة مايكروسوفت أنها ستقوم بفتح مصدر منصتها التطويرية NET. بالإضافة إلى أنها ستكون متوفرة على نظامي ماك و لينكس و هو الشيء الذي قوبل بترحيب كبير من طرف المطورين، بالإضافة إلى أن مايكروسوفت أعلنت أن منصة Visual Studio  2013 ستصبح مجانية.   و كانت المنصة التطويرية NET. متوفرة فقط على نظام ويندوز لكن مايكروسوفت تقول أنها تريد تقريب خدماتها لكل المطورين و المشتغلين على باقي الأنظمة خصوصا لينكس و ماك، حيث تشير مايكروسوفت أن عدد المطورين المستفيدين من خدمات المنصة يصل إلى ستة ملايين.   كما أن مايكروسوفت ستوفر مجانا كل من منصة Visual Studio 2013 و النسختين التجريبيتين من Visual Studio 2015 و NET 2015.   المصدر   ######################################################   رأيت بعض الأخوة المطورين المتذمرين من القرار و خصوصاً إنه سيأثر على اللغات الآخرى و بالأخص Java وبعضهم وصف بإنه قد تسقط اللغة ! ممكن تشاركونا أرائكم في هذا الموضوع وخصوصاً إني لا أحب ال .Net :)
  5. السلام عليكم ورحمة الله   يمكننا بسهولة انشاء Group جديدة في ال Active Dirctory بالطريقة العادية ولكن كيف يمكننا فعل ذلك باستخادم ال CMD، الصورة التالية توضح كيف نفعل ذلك ..انقر علي الصورة لتراها بحجمها الاصلي   منقول من مدونة كيف المصورة ..من هنا http://kaif00.blogspot.com/2014/07/group-cmd.html     منقول من مدونة كيف المصورة ..من هنا http://kaif00.blogspot.com/2014/07/group-cmd.html
  6. السلام عليكم ورحمة الله   دورات مدفوعة  بالعربية فى ASP.NET  بالفيديو والتطبيق العملى :-  ASP.NET Web Form Course :- http://goo.gl/xMBFg7ASP.NET MVC 3 & 4 Course :- http://goo.gl/h4uFp5ASP.NET MVC 5 Course :-  goo.gl/2hw7Y1ASP.NET Web API 2 Course:-  http://goo.gl/YnHeiz ِKnockoutJs with ASP.NET Course  : http://goo.gl/o2Sho6    يمكنك الدخول على رابط الدورة التى تريد لترى تفاصيل دقيقة عنها مثال :- عدد الدروس وعدد الساعات والفهرس ومعلومات كثييييييييييييييرة أخرى  ,ستساعدك فى أخذ قرار بالإشتراك معنا    بالتوفيق للجميع .
  7. كود ابرنامج: Imports System.Threading ' Imports System.Globalization ' ' Public Class Form1 'Private moveTo As Point Private mPrevPos As New Point Dim hours As Integer = DateTime.Now.Hour   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'Dim Today_Date As Date 'Dim Month_Nam As String 'Dim Month_Num As String Me.ControlBox = False Me.MaximizeBox = False Me.MinimizeBox = False Me.Text = "" Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None TransparencyKey = Color.White 'Button1.BackColor = Color.White 'PictureBox1.BackColor = Color.White Me.BackColor = Color.White End Sub Private Sub PictureBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox1.DoubleClick Me.Close() End Sub Private Sub PictureBox2_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox2.DoubleClick Me.Close() End Sub Private Sub PictureBox3_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox3.DoubleClick Me.Close() End Sub Private Sub PictureBox4_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox4.DoubleClick Me.Close() End Sub Private Sub PictureBox5_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox5.DoubleClick Me.Close() End Sub Private Sub PictureBox6_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox6.DoubleClick Me.Close() End Sub Private Sub PictureBox7_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox7.DoubleClick Me.Close() End Sub Private Sub PictureBox8_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox8.DoubleClick Me.Close() End Sub Private Sub PictureBox9_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox9.DoubleClick Me.Close() End Sub Private Sub PictureBox10_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox10.DoubleClick Me.Close() End Sub Private Sub PictureBox11_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox11.DoubleClick Me.Close() End Sub Private Sub PictureBox12_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles PictureBox12.DoubleClick Me.Close() End Sub Private Sub PictureBox1_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub PictureBox2_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox2.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub PictureBox3_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox3.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub PictureBox4_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox4.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub PictureBox5_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox5.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub PictureBox6_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox6.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub PictureBox7_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox7.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub PictureBox8_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox8.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub PictureBox9_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox9.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub PictureBox10_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox10.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub PictureBox11_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox11.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub PictureBox12_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox12.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub Label3_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label3.DoubleClick Me.Close() End Sub Private Sub Label3_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label3.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub Label3_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label3.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then 'ContextMenuStrip1.Show(Me, e.Location) ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub Label2_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label2.DoubleClick Me.Close() End Sub Private Sub Label2_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label2.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub Label2_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label2.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then ContextMenuStrip1.Show(Me, e.Location) 'ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub Label1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label1.DoubleClick Me.Close() End Sub Private Sub Label1_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label1.MouseMove Dim delta As New Size(e.X - mPrevPos.X, e.Y - mPrevPos.Y) If (e.Button = MouseButtons.Left) Then Me.Location += delta mPrevPos = e.Location - delta Else mPrevPos = e.Location End If End Sub Private Sub Label1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label1.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then 'ContextMenuStrip1.Show(Me, e.Location) ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub   Private Sub PictureBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then ContextMenuStrip1.Show(Me, e.Location) 'ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub PictureBox2_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox2.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then ContextMenuStrip1.Show(Me, e.Location) 'ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub PictureBox3_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox3.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then ContextMenuStrip1.Show(Me, e.Location) 'ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub PictureBox4_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox4.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then ContextMenuStrip1.Show(Me, e.Location) 'ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub PictureBox5_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox5.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then ContextMenuStrip1.Show(Me, e.Location) 'ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub PictureBox6_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox6.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then ContextMenuStrip1.Show(Me, e.Location) 'ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub PictureBox7_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox7.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then ContextMenuStrip1.Show(Me, e.Location) 'ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub PictureBox8_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox8.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then ContextMenuStrip1.Show(Me, e.Location) 'ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub PictureBox9_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox9.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then ContextMenuStrip1.Show(Me, e.Location) 'ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub PictureBox10_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox10.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then ContextMenuStrip1.Show(Me, e.Location) 'ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub PictureBox11_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox11.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then ContextMenuStrip1.Show(Me, e.Location) 'ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub PictureBox12_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox12.MouseDown If e.Button = Windows.Forms.MouseButtons.Right Then ContextMenuStrip1.Show(Me, e.Location) 'ContextMenuStrip1.Show(Me, Me.Location.X, Me.Location.Y) End If End Sub Private Sub AboutToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AboutToolStripMenuItem.Click MsgBox("3D Hijri Program Ver 1.0 " & Chr(10) & "Programmed by:" & Chr(10) & "Ayman Khoshouey 2013" & Chr(10) & "E-Mail: [email protected]" & Chr(10) & "Mobile: (+2010)-1800-2225" & Chr(10) & "Cairo-Egypt") End Sub Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click Me.Close() End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Dim Today_Date As Date Dim Month_Nam As String Dim Month_Num As String 'Dim Info_Label As String Dim Ar As CultureInfo = New CultureInfo("AR-SA") Thread.CurrentThread.CurrentCulture = Ar Ar.DateTimeFormat.Calendar = New HijriCalendar Ar.NumberFormat.DigitSubstitution = DigitShapes.Context 'Label1.Text = Format(Date.Now, " dddd,d MMM yyyy") Label1.Text = Format(Date.Now, "yyyy") Label2.Text = Format(Date.Now, "dddd") Today_Date = Format(Date.Now, " dddd,d MMM yyyy") Month_Nam = Format(Date.Now, "MM") Month_Num = Format(Date.Now, "dd") Ar.DateTimeFormat.Calendar = New GregorianCalendar Ar.NumberFormat.DigitSubstitution = DigitShapes.Context Label3.Text = Format(Date.Now, "dddd,d MMM yyyy") 'Label2.Text = Month_Nam 'Label3.Text = Month_Num 'PictureBox12.Visible = True 'Month_Nam = " " Select Case Month_Nam Case "01" PictureBox1.Visible = True Case "02" PictureBox2.Visible = True Case "03" PictureBox3.Visible = True Case "04" PictureBox4.Visible = True Case "05" PictureBox5.Visible = True Case "06" PictureBox6.Visible = True Case "07" PictureBox7.Visible = True Case "08" PictureBox8.Visible = True Case "09" PictureBox9.Visible = True Case "10" PictureBox10.Visible = True Case "11" PictureBox11.Visible = True Case "12" PictureBox12.Visible = True End Select Select Case Month_Num Case "01" NumBox1.Visible = True Case "02" NumBox2.Visible = True Case "03" NumBox3.Visible = True Case "04" NumBox4.Visible = True Case "05" NumBox5.Visible = True Case "06" NumBox6.Visible = True Case "07" NumBox7.Visible = True Case "08" NumBox8.Visible = True Case "09" NumBox9.Visible = True Case "10" NumBox10.Visible = True Case "11" NumBox11.Visible = True Case "12" NumBox12.Visible = True Case "13" NumBox13.Visible = True Case "14" NumBox14.Visible = True Case "15" NumBox15.Visible = True Case "16" NumBox16.Visible = True Case "17" NumBox17.Visible = True Case "18" NumBox18.Visible = True Case "19" NumBox19.Visible = True Case "20" NumBox20.Visible = True Case "21" NumBox21.Visible = True Case "22" NumBox22.Visible = True Case "23" NumBox23.Visible = True Case "24" NumBox24.Visible = True Case "25" NumBox25.Visible = True Case "26" NumBox26.Visible = True Case "27" NumBox27.Visible = True Case "28" NumBox28.Visible = True Case "29" NumBox29.Visible = True Case "30" NumBox30.Visible = True End Select 'Month_Nam = "" 'Month_Num = "01" If Month_Nam = "01" And Month_Num = "01" Then 'InfoLabel2.Visible = True 'InfoLabel1.Visible = False InfoTextBox2.Visible = True InfoTextBox1.Visible = False 'InfoLabel2.Text = InfoLabel2.Text.Substring(3) & InfoLabel2.Text.Substring(0, 3) InfoTextBox2.Text = InfoTextBox2.Text.Substring(3) & InfoTextBox2.Text.Substring(0, 3) Else 'InfoTextBox1.Text = InfoTextBox1.Text.Substring(3) & InfoTextBox1.Text.Substring(0, 3) InfoTextBox1.Text = InfoTextBox1.Text.Substring(3) & InfoTextBox1.Text.Substring(0, 3) End If If Month_Nam = "01" And Month_Num = "10" Then 'InfoLabel1.Text = " " InfoTextBox3.Visible = True InfoTextBox1.Visible = False InfoTextBox3.Text = InfoTextBox3.Text.Substring(3) & InfoTextBox3.Text.Substring(0, 3) End If If Month_Nam = "03" And Month_Num = "12" Then 'InfoLabel1.Text = " " InfoTextBox4.Visible = True InfoTextBox1.Visible = False InfoTextBox4.Text = InfoTextBox4.Text.Substring(3) & InfoTextBox4.Text.Substring(0, 3) End If If Month_Nam = "08" And Month_Num = "15" Then InfoTextBox5.Visible = True InfoTextBox1.Visible = False InfoTextBox5.Text = InfoTextBox5.Text.Substring(3) & InfoTextBox5.Text.Substring(0, 3) 'InfoLabel1.Text = " " End If If Month_Nam = "10" And Month_Num = "01" Then InfoTextBox6.Visible = True InfoTextBox1.Visible = False InfoTextBox6.Text = InfoTextBox6.Text.Substring(3) & InfoTextBox6.Text.Substring(0, 3) 'InfoLabel1.Text = " " End If If Month_Nam = "12" And Month_Num = "10" Then 'InfoLabel1.Text = " " InfoTextBox7.Visible = True InfoTextBox1.Visible = False InfoTextBox7.Text = InfoTextBox7.Text.Substring(3) & InfoTextBox7.Text.Substring(0, 3) End If 'InfoLabel1.Text = InfoLabel1.Text.Substring(3) & InfoLabel1.Text.Substring(0, 3) Select Case hours ' Case Is < 12 'Label1.Text = " " 'ElseIf hours < 17 Then ' Str = "Afternoon" 'ElseIf hours >= 12 Then 'Str = "Evening" Case Is >= 18 'Label1.Text = " " 'Process.Start("C:\Users\khoshoueyae\Documents\3D Hijri Arabic.exe") Me.Close() Case Else Exit Sub 'End If End Select End Sub Private Sub InfoTextBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles InfoTextBox1.DoubleClick Me.Close() End Sub Private Sub InfoTextBox2_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles InfoTextBox2.DoubleClick Me.Close() End Sub Private Sub InfoTextBox3_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles InfoTextBox3.DoubleClick Me.Close() End Sub Private Sub InfoTextBox4_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles InfoTextBox4.DoubleClick Me.Close() End Sub Private Sub InfoTextBox5_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles InfoTextBox5.DoubleClick Me.Close() End Sub Private Sub InfoTextBox6_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles InfoTextBox6.DoubleClick Me.Close() End Sub Private Sub InfoTextBox7_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles InfoTextBox7.DoubleClick Me.Close() End Sub   Private Sub YesToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles YesToolStripMenuItem.Click Me.TopMost = True End Sub Private Sub NoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NoToolStripMenuItem.Click Me.TopMost = False End Sub Private Sub CalendarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CalendarToolStripMenuItem.Click FormCalendar.Show() End Sub 'Private Sub Label1_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label1.MouseHover ' Label1.ForeColor = Color.Cyan 'End Sub Private Sub ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem.Click MsgBox("..........." & Chr(10) & " / " & Chr(10) & " ") End Sub End Class   يمكن رفع الصور المتحركة للبرنامج اذا رغب احد فى ذلك حيث لم اتمكن من رفعها فى الموقع
  8. السلام عليكم ورحمة الله ارفق لكم سلسلة من الدروس بالفيديو لتعلم برمجة تطبيقات وندوز فون من الصفر            الدروس  بشكل لست هي تتسلسل من درس الى اخر https://www.youtube.com/watch?v=Ydo0QkPUnxk&list=PLF8OvnCBlEY00u9yJ8P_qA_2AVq6KgHSE
  9. السلام عليكم ورحمة الله ارفق لكم سلسلة من الدروس بالفيديو لتعلم برمجة تطبيقات وندوز فون من الصفر          https://www.youtube.com/watch?v=Ydo0QkPUnxk&list=PLF8OvnCBlEY00u9yJ8P_qA_2AVq6KgHSE
  10. السلام عليكم ورحمة الله وبركاتة   الحالة : لدي نافذة رئيسية (MainWIndow) ويوجد بها زر(btn) .. يقوم بإنشاء نافذة آخرى .. ويوجد بالنافذة التي تم إنشائها زر(btn) وضيفة هذا الزر انه يقوم بإغلاق النافذة الرئيسية(MainWindow)   ما أريد الوصول إليه هو كيف أقوم بالتعامل مع الـ MainWindow من خلال النافذة المنشئة   ملفات المشروع :   أكواد المشروع : widget.h #ifndef WIDGET_H#define WIDGET_H#include <QWidget>#include <mydialog.h>namespace Ui {class Widget;}class Widget : public QWidget{ Q_OBJECTpublic: explicit Widget(QWidget *parent = 0); ~Widget();private slots: void on_pushButton_clicked();private: Ui::Widget *ui; myDialog *ddd;};#endif // WIDGET_Hwidget.cpp #include "widget.h"#include "ui_widget.h"Widget::Widget(QWidget *parent) : QWidget(parent), ui(new Ui::Widget){ ui->setupUi(this);}Widget::~Widget(){ delete ui;}void Widget::on_pushButton_clicked(){ ddd = new myDialog(this); // create new window ddd->show();}النافذة التي سيتم إنشائها من خلال الزر الموجود في النافذة الرئيسية mydialog.h #ifndef MYDIALOG_H#define MYDIALOG_H#include <QDialog>namespace Ui {class myDialog;}class myDialog : public QDialog{ Q_OBJECTpublic: explicit myDialog(QWidget *parent = 0); ~myDialog();private: Ui::myDialog *ui;};#endif // MYDIALOG_Hmydialog.cpp #include "mydialog.h"#include "ui_mydialog.h"myDialog::myDialog(QWidget *parent) : QDialog(parent), ui(new Ui::myDialog){ ui->setupUi(this);}myDialog::~myDialog(){ delete ui;}
  11. معاي لاب توب ايسر من نوع aspire 4930 نظام التشغيل windows 7 راح علي تعريف الصوت يعني صاير الجهاز اخرس حاولت انزل تعريف الصون من نوع realtek لمن يتم التثبيت يطلع لي خطا من نوع 0x00000005 ولم استطع حل المشكلة يالليت احد يقدر يساعدني 
  12.   أكثر من 47 ساعة فيديو ــــــ وأكثر من 1000 صفحة مكتوبة ـــــ كن محترفاً فى ASP.NET ,  للإشتراك ومعرفة التفاصيل من هنا :- http://goo.gl/8qXu9R وفق الله الجميع  
  13. بسم الله الرحمن الرحيم السلام عليكم و رحمة الله قبل يومين كنت أستخدم اسطوانة parted magic لإدارة الاقراص الصلبة و قمت عن  طريق الخطأ بحذف قرص الC :( :excl: معلومات الجهاز :- acer v5-471  windows 8 single language الان قمت بتثبيت ويندوز جديد لكني أريد ان ارجع النظام السابق جربت اعمل  recovery بس ما زبط معاي تظهر لي رسالة تخبرني بأن القرص مفقود ممكن المساعدة من اصحاب الخبرة ؟ :excl:
  14. الموضوع ايها الساده الافاضل هو  عمل استعلام للبحث عن طالب ودرجاته باستخدام الدالة  (  Like '*'+[forms]!![q[]+'*' ) الدالة تعمل يدويا ولا تعمل معي ورجعت زر الماكرو المركب لفتح النموذج الخاص بالاستعلام و لكني فشلت  ارجو المساعدة   
  15.   الرجاء المساعده في شرح windows azure و hadoop بالتفصيل  و ايهما افضل في عمل cloud computing و جزاكم الله خيرا 
  16. الاخوه الكرام اعضاء المنتدى تحية طيبه برجاء مساعدتى فى كيفية ادخال عدة سجلات مره واحد وهذه عنوان مشاركة فى منتدى الفريق العربى للبرمجة وقد أستفدت منها كثيرا و جزاهم الله خيرا على ما بذلوا من جهد فى ذلك     http://arabteam2000-forum.com/index.php/topic/282655-%D9%83%D9%8A%D9%81%D9%8A%D8%A9-%D8%A5%D8%AF%D8%AE%D8%A7%D9%84-%D8%B9%D8%AF%D8%A9-%D8%B3%D8%AC%D9%84%D8%A7%D8%AA-%D8%AF%D9%81%D8%B9%D8%A9-%D9%88%D8%A7%D8%AD%D8%AF%D8%A9-%D9%81%D9%8A-%D8%AC%D8%AF%D9%88%D9%84-%D8%A3%D9%83%D8%B3%D8%B3/   ولكن هل يمكن أن :-                   1 - يستبدل مربع رقم الموطف بـ combo box لتسهيل عملية أختيار الموظف الذى تضاف إليه البيانات بسبب زيادة عدد الموظفين                   2 - عند الضغط على زر تحديث الحقول فى form2 إذا تم الضغط أكثر من مره ولو بطريق الخطا يتم أضافة السجلات مره أخرى هل من طريقة لتلافى ذلك                وجزاكم الله خيرا مرفق الملف za-Database-UP2.rar
  17. كن واثقاً من كلامك وأنت تتحدث عن ASP.NET   تمهيد :- كثير من الناس يتسائلون عن الفرق بين Web Forms و MVC ويوجد كثير من الخلط بينهم , وهل هم بدائل ؟, وماذا عن Web API ؟ وما هى SPA ؟ وماذا يعنى SignalR ؟ , هل كل هذا يعد ASP.NET ؟ , والكثير أيضاً يسأل , يقول أنا مبتدأ, بماذا أبدأ ؟, وغيره يقول, لا حاجة فى web Forms سأبدأ بتعلم MVC هذا هو الحديث, وغيره يقول, هل شرط أن أتعلم Web API بعد تعلم MVC ؟ , أم ماذا ؟ , الكثييير من الأسئلة التى سأحاول أن أضع إجابات مختصرة لها , والله المستعان .   مقدمة :- فى بداية الآمر, كنا لا نجد إلا ما يُعرف بـ ASP.NET فقط, حيث كنا نقوم بتعريفها, على أنها " بيئة برمجية لتطوير تطبيقات الإنترنت "والتى قمت بتقديم سلسلة دروس من ستة أجزاء كمقدمة تعريفية لها …... وتوالت الإضافات على ASP.NET منذ نشأتها إلى يومنا هذا , حتى إزداد الأمر تعقيداً !, ففى ما يلى سأسرد لك هذة الإضافات والله المستعان.    Web Forms ظهرت العيوب على السطح , وإشتكى مجتمع المطورين من أمور عدة تفتقدها ASP.NET , بل وكان يحتقرها مطورى البيئات الأخرى مثال PHP وغيرها, والأسباب معروفة لدى الكل, وكانت الأسباب كالتالى:- ASP.NET ليست إلا HTML Generator . ASP.NET ليست إلا Drag-Drop , وليس لكم تحكم فى الـ HTML . هذا الكلام يمكن أن يرد عليه بإنك تستطيع التحكم من خلال مرحلة الـ Rendering , وأيضاً من خلال الـ Source View, ولكن ليس بالقدر الكافى . ASP.NET تمر بالعديد من الأحداث التى قد لا أحتاجها فى الكثير من الآوقات. ASP.NET من الصعب إجراء Automation Testing عليها, إلا بمحاكاة HttpContext. ASP.NET لا تتبع مبادئ ولا أنماط التصميم المتبعة فى تصميم البرمجيات, والتى نعرفها بإسم Design Patterns و Software Design Principles, ولعل التركيز الأكبر كان على مبدأ الفصل المعروف بإسم SOC. ASP.NET , لا يوجد بها مرونة فى إمكانية إعادة الإستخدام و كذلك صيانة الكود .   كان الحديث كله يدور حول ASP.NET والتى باتت تعرف الأن بإسم Web Forms, أو ASP.NET Classic (ولاحظ إنى لا أقول ASP Classic بل أقول ASP.NET Classic ), وكان الهدف من وجود Web Forms بهذا الشكل, هو محاكاة تطبيقات الـ Event-Driven مثال Windows Form Application , فظلت المشكلة تنغص على مايكروسوفت فرحتها بإبداعاتها داخل Web Forms.    MVC Framework   قرأت مرة أن Scott Guthrie حيث كان مدير قسم التطويرفى فريق ASP.NET حينها على ما أذكر , أنه كان مسافراً, وفى رحلته على متن الطائرة, فكر بتطبيق MVC Pattern داخل ASP.NET , حيث كان الجميع يتحدثون حينها عن هذا النمط (MVC) , وما يقدمه من مزايا فى العمل, رغم أن هذا النمط موجود من عشرات السنين, إلا أن الحاجة إليه باتت ملحة بالنسبة لمايكروسوفت , وذلك لإعجاب الكثيرين به عندما تم تطبيقه فى كثيرمن بيئات التطوير,فما كان من مايكروسوفت إلا أن تسعى لإيجاد حلاً لعلاج ذلك, فجائت له الفكرة, أن يقوم بتطبيق هذا النمط بإستخدام HttpHandler وHttpModule, ولكن كيف والنمط ينص على أن لكل صفحة مدير وحالة بيانات تنتقل منها وإليها, والصفحة هنا هى View والمدير هنا هو Controller وحالة البيانات هنا هى Model ,وهنا ستكون كل صفحة مصحوبة بـ Controller, ذلك الوصف قريباً مما يحدث فى aspx Page و Code-behind إلا أن الإثنان هنا لا يَعرفان بعضهما البعض, بمعنى إنهم غير مرتبطين ببعض كما فى aspx, أى أن الـ Controller لا يعرف شئ عن الـ View والعكس صحيح. فظهرت الحاجة إلى وجود نمط آخر, يضمن وجود Controller لأكثر من View, فكانت فكرة تطبيق نمط آخر وهو Front Controller, وهو الذى ينص على وجود Controller واحد يخدم أكثر من View. فأصبح لدينا نمطين أولهم MVC Pattern مبنى على الثانى وهو Front Controller Pattern .  فكان نتاج هذا الأمر هو MVC Framework , والذى جاء ليعمل جنباً إلى جنب Web Forms, وليس بديل, وليس تحديث, وأعلنت مايكروسوفت من اللحظة الأولى لإنطلاقه, أنها ستدعم Web Forms ولن تتخلى عنه, ولكن قد قدمت لك طريقين لبناء تطبيقات إنترنت أحدهما Web Forms وثانيهما MVC , فأختر إيهما تسلك.  وقد سألنى الكثيرون هذا السؤال " لدى مشروع , فهل أستخدم Web Forms أم MVC ؟ “ ….. وتكون إجابتى دوماً بــ "على حسب ” …... فلابد أن تستجمع تركيزك لترد على هذة الإجابة بسؤال آخر , وهو " على حسب ماذا؟ " …........ الحقيقة على حسب الكثيييير , ولكن سأسرد لك بعضها:- إذا كنت تريد أن تتحكم أكثر فى HTML فعليك بـ MVC. إذا كنت تريد أن تحصل على Re-usability أعلى , فعليك بـ MVC. إذا كنت تريد أن تحصل على Maintainability أعلى , فعليك بـ MVC. إذا كنت تريد أن تحصل على Testability أعلى , فعليك بـ MVC. إذا كنت تريد Productivity أعلى مع إهمال ما سبق فعليك بـ Web Forms.  ربما يقول قائل "ماذا عن تطبيقMVP Pattern داخل Web Forms ؟ ”. مممم , حقاً تطبيق هذا النمط قد يجعل Web Forms تكسب كل هذة النقاط لمصلحتها.... الحقيقة, ربما, ولكن ما التكلفة ؟............. التكلفة ستكون على حساب الـ Productivity وما سيأخذ ذلك التطبيق من وقت, حيث أن تطبيق MVP داخل Web Forms يتطلب عناءاً مع الوقت فى كتابة الكود, وقد قدمت مقالتين من قبل فى شرح هذا النمط وكذلك فى شرح Framework يسمى WebFormsMVP وكيفية إستخدامه.  تلقيت سؤالاً أيضاً يقول " أنا أريد أن أبدأ فى ASP.NET , هل أبدأ معWeb Forms أم MVC “ ….... التجربة أثبتت أنه لا فرق............. إشترك فى دورة MVC معى يوماً مطوراً قادماً من PHP, وأخبرنى أنه إستطاع أن يقوم بإنشاء موقع كامل بعد الدرس الرابع, فلا شك أنه مجتهد,والشاهد من هذا, أنه لم يجد معاناةً فى التعرف على MVC مباشرةً دون العلم بـ Web Forms, فهذا جيد, فكل ما تريد فقط معرفته هو لغة البرمجة التى تستخدمها C#/VB, والبقية هو إجتهادك والله الموفق. هذة هى التجربة, أما عن رأيى , فلا أرى أى فرق, غير أن الفهم العميق لألية عمل MVC فيما وراء المشهد يتطلب معرفتك بـ ASP.NET Runtime وكيف تسير الآمور.    ظهربعد ذلك ما يعرف بـ ASP.NET Web API .   Web API Framework   هى Framework لبناء Service مستندة فى عملها على ASP.NET وتستطيع الوصول إليها من خلال HTTP. بدايتها ظهرت مع WCF تحت إسم WCF Http Service, فبعيداً عن تعقيدات إعدادات (Configuration) WCF , كانت الحاجة لإستقلالها ومجيئها تحت إسم ASP.NET Web API, والهدف مازال واحداً وهو بناء Service قائمة على HTTP. تم الإعتماد بشكل أساسى على MVC حينما قاموا بإنشاء Web API , حيث نجد أن آلية العمل واحدة , وعلى الرغم من أنى أتجنب الدخول فى ذكر تفاصيل آلية عمل كلاً منهما لإن هذا سيخرج بنا خارج الهدف من الموضوع وهو التعريف السطحى فقط, ولكن جدير بالذكر, أن نقول أن هناك تشابة كبير جداً بين MVC و Web API من حيث آلية العمل, ولكن تبقى لـWeb API أهدافها التى صممت من آجلها وهى :- إذا أردت أن تقوم بتصميم خدمة (Service ) تعمل كمزود للبيانات فقط أو ما يسمى Data Point فعليك بـ Web API. إذا أردت أن تقوم بتصميم خدمة تصل إلى كافة الأجهزة التى تملك إمكانية إرسال HTTP Request وإستقبال HTTP Response فعليك بـ Web API , ولاحظ أن ذلك يشمل , كافة الأجهزة الحديثة بإختلاف أنواعها من هواتف نقالة إلى أجهزة ذكية إلى مواقع إنترنت إلى تطبيقات سطح المكتب وغير ذلك . إذا أردت مرونة فى العمل, ولا وجود لإى متطلبات غير HTTP فعليك بـ Web API. إذا أردت أن تكون لديك خدمة تستطيع التفاوض حول المحتوى المطلوب, والمقصود هنا " نوع البيانات " على إختلاف أنواعها فعليك بـ Web API. إذا أردت أن تتحكم بمرونة كافية فى طلبات العملاء (Http Requests ) والردود على هذة الطلبات (Http Response) فعليك بـ Web API , مما يجعلك وكأنك تتعامل مباشرةً مع HTTP.  وقد سألنى أيضاً آخرون " هل لابد من معرفتى بـ MVC حتى أتعرف على Web API ؟ " ….......... وإجابتى تكون............. "الأفضل ذلك ولكن ليس شرطاً" ….... وذلك لمسته حقاً حينما كنت أقوم بشرح دورة فى Web API........ فالإضافة التى ستجنيها من معرفتك أولاً بـ MVC , هى أنك, ستجد مرونة فى تقبل Web API بوقت أسرع, وذلك لسابق معرفتك ببعض الأمور المتشابة بين Web API و MVC .  والسؤال الثانى … "هل يمكن أن أقوم بإستخدام Web API مع Web Forms “ …..... إجابتى تكون " نعم" …. وخذ فى إعتبارك أيضاً, أنه يمكنك أن تستخدمها فى Client -Applications.    ساهمت Web API أيضاً فى جعل العمل مع Single Page Application أكثر مرونة .   SPA Concept   يأتى الإسم SPA إختصاراً لـ Single Page Application وهو مفهوم , وليسLibrary , وليس Framework, ويمكن أن نسميه إسماً آخر وهو JavaScript Application , أى تطبيق قائم على JavaScript, وكلمة SPA تخالف الواقع الذى يتم فيه تطبيق SPA, فالمعنى الحرفى هو, تطبيق الصفحة الواحدة, وهذا ليس واقعياً, فلاشك أن تقول, ربما تكون SPA لتطبيق يتكون من صفحة واحدة, أى تطبيق متناهى الصغر, الحقيقة لا!.......... ولهذا نقول أن المعنى منافى للمراد, فالمعنى يقول تطبيق مكون من صفحة واحدة , والمراد, أن المستخدم سيتعامل مع التطبيق بصفحاته المتعددة وكأنه داخل صفحة واحدة لم يخرج منها, والمعنى لا يخفى عليك كمطور لتطبيقات إنترنت, فى أننا سنقوم بإخفاء Refresh, والعمل على إنشاء Data point على الخادم (Data point على سبيل المثال Web API ) ومن ثم نقوم بإستخدام أحد الـ Libraries أو Frameworks الخاصة بـ JavaScript للعمل داخل التطبيق , فعلى سبيل المثال , يمكن العمل مع AngularJs أو DurandalJs أو EmberJs أو غيرهم, أو ربما تفضل العمل مع مجموعة من المكتبات المنفصلة مثال KnockoutJs و SammyJs و RequireJs وغيرهم. والهدف من كل هذا, هو معالجة تفاعلات المستخدم من عرض البيانات التى يطلبها, أوإرسال للبيانات التى يُدخلها, وكذلك التنقل بين الصفحات, وغير ذلك من العمليات التى تتم فى التطبيق العادى, مع الأخذ فى الإعتبار, أن الذهاب إلى الخادم لن يكون إلا فى الضرورة,وأن كافة الأعمال فى التطبيق ستتم على الـ Client, يتطلب هذا إتباع طرق مختلفة لتحقيق هذا الهدف من تخزين للبيانات فى Cache وكذلك إستخدام Rendering Templates والطرق كثيرة وكل مطور يذهب فى الطريق الذى يعرف ويفضل, فالمجال مفتوح.   SignalR Library   فى البداية هى مكتبة أكواد جاهزة أحضرتها لك مايكروسوفت ,لتقوم بالعمل مع ما يعرف Real-time , والمعنى مختصراً, أن هذة المكتبة, تعمل على إرسال البيانات من جهاز الـخادم إلى جهاز العميل تلقائياً حينما تتوفر هذة البيانات, بإضافة آخرى........ يمكن أن تقول, أنه بدلاً من أن يقوم المستخدم بطلب البيانات, سيقوم الخادم بإرسالها إليه متى كانت متاحة, وهذا الأمر, تجده ضرورياً فى التطبيقات التى تحتاج تحديث فورى للبيانات وكذلك دورى, وفورى معناه, أى فى نفس الوقت التى تتاح فيه, ودورى معناه , أى بشكل مستمر, أفضل مثال على إستخدامها, تطبيق المحادثة (Chat ) والذى لابد له أن يرسل لك البيانات التى أدخلها من يقوم بالمحادثة فى الطرف الآخر, كذلك تطبيقات الأسهم, والتى تحتاج إلى تحديث بأسعار الأسهم وإرتفاعها وإنخفاضها, فهذان مثالان يوضحان كيف أن SignalR تقوم بإرسال البيانات إلى جهاز العميل تلقائياً متى كانت متاحة دون أن يطلبها المستخدم.   Web Pages Framework   هى Framework لبناء صفحات إنترنت بسيطة, وجاءت لتوفر بيئة مبسطة لبناء هذة الصفحات بدون تعقيدات Web Forms أو غيرها, وتم إيجاد IDE بإسم WebMatrix وهو البرنامج الذى من خلاله تستطيع أن تقوم بإنشاء مثل هذة الصفحات, حيث تتكون الصفحة الواحدة من HTML ثابت ومحتوى يتغير من خلال الكود فى نفس الصفحة, مستخدماً فى ذلك Razor Syntax, وهذا لمن يريد أن ينشأ صفحات إنترنت بسيطة بدون سابق معرفة بـ ASP.NET , ولا ولن يحتاج أن يعرف عنها شئ .   الختام   فى النهاية , ليس هناك بديل لشئ, إنما الكل يعمل لديك, وكلها أدواتك, وهناك أوقات سيتم فرض العمل مع أحدهم عليك رغماً عنك, فلا غنى لك عن تعلم الجميع, على سبيل المثال, قد يأتيك تطبيقاً تم إنشائه بـ Web Forms منذ زمن, وتم طلب تعديلات أو ربما تحديثات, فهل يعقل, أن تخبر العميل, أو حتى المدير, أن نقوم بترقية التطبيق وإنشائه من الصفر ولكن بـ MVC, هذا غير وارد فى الأصل, وكذلك العكس, وربما كنت فى Web Forms فعلاً, ولديك إضافة تتطلب تحديث فورى للبيانات, فعندها SignalR تفى بالغرض, أو ربما تحتاج إلى Data Point داخل Web Forms, أو قد تحتاج إلى Service تقبل الإتصال من خلال HTTP لتدعم العديد من انواع الـ Clients, فحينها Web API هو الحل الأمثل. خلاصة الأمر لا غنى لك بواحدة عن الآخرى, أنت فقط توظف معرفتك حيث تحتاجها.  سأحاول أن أوضح كيف تعمل كلاً منهم , متعمقين فى ما يحدث وراء المشهد وذلك فى مقالات منفصلة فى أقرب وقت إن شاء الله.  هذا وبالله التوفيق .   المراجعة :- أتوجه بالشكر لـكلاً من "محمد مليجى" والذى تستطيع أن تصل إليه من خلال @meligy على تويتر,  و"محمد الشريف" والذى تستطيع أن تصل إليه من خلال @bashmohandes على تويتر أيضاً , على إعطائنا من وقتهم الثمين للمراجعة بعد النشر. الكاتب أحمد موسى  وتستطيع أن تتعرف عليه من هنا
  18. تم نشر مقالة قبل ايام في موقع codeproject لنظام مفتوح المصدر يستطيع كشف اكثر من 65 اصدار مختلف من نظام التشغيل ويندوز قام ببرمجة النظام وتطويره فريد القرشي وهناك نسختين للتحميل ملف تنفيذي جاهز للإستخدام وملف السورس كود     لتحميل الملفات والإطلاع على المقال الأصلي: http://www.codeproject.com/Tips/664064/Windows-OS-Version-Detector   منقول للفائدة
  19. السلام عليكم ورحمة الله وبركاته   برجاء من الاخوه الاعضاء المساعدة فى الأتي : اريد عند كتابة تاريخ  من   و    الى     يقوم تلقائيا بكتابة تواريخ هذه الايام تلقائيا   مثال : الاجازة   من 1/9/2013    الى    3/9/2013   يقوم بكتابة       من 1/9/2013    الى    1/9/2013                    من 2/9/2013    الى   2/9/2013                    من 3/9/2013    الى   3/9/2013   برجاء المساعدة ولكم جزيل الشكر ،،، test.rar
  20. السلام عليكم ورحمة الله وبركاته   قاعدة بيانات المرفقة خاصة ببرنامج الاجازات للموظفين واحيانا تكون الاجازة لمدة ثلاثة ايام او اكثر فأقوم بادخال بيانات الموظف ثلاث أو خمس مرات حسب عدد الايام وكل مرة اغير فقط التاريخ   وهو امر مرهق جدا ،   برجاء من الاخوه الاعضاء المساعدة عندما اكتب  تاريخ  من   و    الى   فى نموذج خارجى أو فى نفس النموذج يقوم تلقائيا بكتابة جميع بيانات الموظف الموجوده مع  بكتابة تواريخ هذه الايام فى الجدول المرتبط بالنموذج الموجود بقاعدة البيانات وهو USER_SPEDAY   مثال : الاجازة   من 1/9/2013    الى    3/9/2013   يقوم بكتابة       من 1/9/2013    الى    1/9/2013                    من 2/9/2013    الى   2/9/2013                    من 3/9/2013    الى   3/9/2013   برجاء المساعدة ولكم جزيل الشكر ،،، test.rar
  21. لقد عملت فحص لنظام وندوز لدي لكي استكشف النظام الجديد وما بة من مزايا وعيوب ولقد وجدت ثغرة Vulnerabilities في احدى ملفات الربط الديناميكية dll واسم المكتبة msxml4.dll وهي  الموجودة في مجلد النظام وتوجد على المسار التالي C:\Windows\System32\msxml4.dll وهي  ثغرة في Microsoft XML الأساسية خدمات 3.0، 4.0، 5.0، و 6.0 التي يمكن استغلالها إذا عرض مستخدم صفحة ويب وضعت خصيصا باستخدام Internet Explorer. يتم تشغيل المشكلة عندما يحاول MSXML للوصول إلى كائن في الذاكرة التي لم تتم تهيئة، والتي قد تفسد الذاكرة في مثل هذه الطريقة التي يمكن للمهاجمين تنفيذ هجوم على  المستخدم الذي قام بتسجيل الدخول الى هذه الصفحة . هذه الفئة من  Vulnerabilitiesقابلة للاستغلال من خلال إعداد كل من المكدس وذاكرة الكومة مع البيانات التي تسيطر عليها المهاجم قبل إلغاء مرجعية مؤشر غير صالح.ايظاً موجودة في نظام وندوز7 .  وبعد ايجادي الVulnerabilities لذلك قلت فالابحث في جوجل لعي اجد ما عمل هذه المكتبة فتفاجئت حينما رأيت بان الثغرة موجودة من زمان من 13Jun 2012 6:30 PM ولكن مايكروسوفت لم تفعل لها شيء رغم انها هل يعقل بان  شركة مثل Microsoft مهملة لنظام تشغيلها ولعملائها الى هذه الدرجة بان ثغرة في احدى مكتبات النظام موجودة من 13Jun 2012 6:30 PM ولحد سنة 2013 وهي موجودة هل يجب علينا الثقة بـMicrosoft...............؟؟؟؟؟ رابط الخبر عن الVulnerabilities  الذي وجدة بعد البحث http://blogs.technet.com/b/srd/archive/2012/06/13/msxml-fix-it-before-fixing-it.aspx لذلك سارع باتخاذ الاحتياطات باصلاح الثغرة ....ولاتستعمل انترنت اكسبلورر اطلاقاً. اريد ان اسأل لو ان هذه الثغرة موجودة في احدى توزيعات لينكس هل كان مجتمع تطوير لينكس لابقى عليها من 13Jun 2012 الى2013
  22. السلام عليكم ورحمة الله تعالى و بركاته ،،،   إن الحمد لله نحمده و نستعينه و نستغفره و نعوذ بالله من شرور أنفسنا و من سيئات أعمالنا ، من يهده الله فلا مضل له و من يضلل فلا هادي له ، و أشهد أن لا إله إلا الله وحده لا شريك له و أشهد أن محمدا عبده ورسوله صلى الله عليه وسلم .   وكما قال السوريون الأحرار : ~~ قائدنا للأبد سيدنا محمد ~~ عليه الصلاة و السلام .   و في هذا المقام لا يسعني إلا أن أهدي هذه الأبيات إلى إخواني السوريين الأبطال الذين ضربوا أعظم الأمثلة في الصمود و الجهاد ،،، فبشرى لكم يا أهل الشام بشرى !!!   قصيدتي قصيرة - شعر حر - ، اخترت لها إسما أقصر ، عنوانها | إنما القول قول الصوارم | :   سألت المدن ، سألت الدول ، سألت الأمـــــــــــــم سؤالي غريب، فلحرف العين قصة تنتظر الرد من أي متكلـــــم "أين شجاعة العرب ؟" هذا سؤالي للمسلمين قاطبة و للعالــم أخرسان في حفلة ساخبة ، كل واحد يتهم الآخر بعدم سماع الكلام يأتي رجل من العامة ، فيذهب بهما إلى مكان هادئ و من موقعهما الجديد ، يستمر كل واحد في اتهام الآخر فافهم المغزى يا من تقول أنا مسلـــــــــم .   أمة خرساء ،  شعوب صماء ، و عالم أعمى  . هذه هي ضريبة قيام السوريين بثورة عظيمة ...   ~ الموضوع ~   أقدم لكم هذه الأداة البسيطة التي من خلالها يمكنك تغيير نسخة الويندوز المنصبة في الجهاز ،،، خلاصة الكلام :     ~ الجانب النظري ~   يمكننا تغيير نسخة الويندوز إلى SP3 من خلال تغيير قيمة النسخة التي في الروجستري ،،،   نفتح الروجيستري و نذهب إلى المسار التالي :     نجد القيمة المسماة ب CSDVersion و هي تحمل رقم النسخة المنصبة في الجهاز ، طبعا إن كانت النسخة هي SP2 في القيمة ستكون 2 و قس على ذلك ...   لنغير النسخة يكفي أن نبدل الرقم 200 بالهكس إلى 300 بالهكس أيضا ، هكذا :     ~ الجانب التطبيقي ~   شكل الأداة المتواضعة :     نضغط على الزر Change it now  ،،، لتظهر لنا الرسالة الآتية :     الآن أصبحت لديك نسخة الويندوز إكس باء ذات الحزمة الخدمية 3 :lol:  - ترجمة وحشة أوي ههههه -   و الآن مع السورس كود المتواضع :(  :   .486.model flat,stdcalloption casemap:noneinclude windows.incinclude advapi32.inc ;; For RegSetValueEx Functioninclude kernel32.incinclude user32.incincludelib kernel32.libincludelib user32.libincludelib advapi32.lib.dataText DB "Change Your Windows XP SP1 or SP2 to SP3",0RegKey DB "SYSTEM\ControlSet001\Control\Windows",0RegValue DD 300h ;; SP 3key DD 0CSDVersion DB "CSDVersion",0success DB 20h,"Your Windows XP is converted to Windows XP SP3 successfully !!!",0fail DB 20h,"An Error Is Occurred.Try Again Please,,,",0cap DB "Notice",0cap2 DB "Error",0DLG_ID DB "XPSP",0ExitButton EQU 2hChangeItButton EQU 3hMovedText EQU 4hAboutMe DB 20h,20h,20h,20h,"This is a little tool that I programmed in order to convert your " DB "Windows XP sp1 or sp2 to sp3, this is a little trick you can use it for installing " DB "Programs, I mean programs that work only in Windows XP SP3 .",13,10,13,10 DB 09h,09h,09h,09h,09h,09h,09h,"Created by The Hidden Ghost",0AboutMeCap DB 20h,"About the Hidden Ghost",0.codewndproc PROTO :DWORD,:DWORD,:DWORD,:DWORDbegin:invoke GetModuleHandle,0invoke DialogBoxParam,eax,addr DLG_ID,0,wndproc,0invoke ExitProcess,0wndproc proc hwnd:DWORD,msg:DWORD,wparam:DWORD,lparam:DWORD invoke SetDlgItemText,hwnd,MovedText,addr Text .if msg == WM_COMMAND mov eax,wparam .if eax == ChangeItButton invoke RegOpenKeyEx,HKEY_LOCAL_MACHINE,addr RegKey,0,KEY_ALL_ACCESS,addr key invoke RegSetValueEx,key,addr CSDVersion,0,REG_DWORD,addr RegValue,SIZEOF RegValue invoke RegCloseKey,key .if eax == ERROR_SUCCESS invoke MessageBox,0,addr success,addr cap,MB_OK + MB_ICONINFORMATION ret .else invoke MessageBox,0,addr fail,addr cap2,MB_OK + MB_ICONERROR ret .endif .elseif eax == ExitButton invoke MessageBox,0,addr AboutMe,addr AboutMeCap,MB_OK + MB_ICONINFORMATION invoke ExitProcess,0 ret .endif .endif .if msg == WM_CLOSE invoke EndDialog,hwnd,0 ret .endif xor eax,eax retwndproc endpend begin  أتمنى أن يروق لكم هذا الموضوع البسيط ، والسلام عليكم ورحمة الله تعالى وبركاته ،،، :P   Changeit.zip
  23. عندى جهازين ويندوز 7 وبينهم شبكة عادية . المشكلة عند مشاركة ملف معين بين الجهازين لايظهر هذا الملف فى المشاركة او بالمعنى العام مبيظهرش على الجهاز التانى وتقريبا المشكلة فى علامة $ الى فى اسم الملف الى هو dataxh$ فارجو المساعدة ولكم الشك مع العلم انو لازم يتشير فى وجود هذة العلامة
  24. طيف نتعامل مع الصور

    :rolleyes: السلام عليكم ورحمة الله وبركاته ماهي الدوال الخاصة للتعامل مع الصور في لغة vc++ بمعنى كيف يمكنني التعامل مع كل بيكسل في الصورة ؟ وكيف يمكن التعرف على قيمة كل بيكسل هل هي 0,1؟ وجزاكم الله خير الجزاء . . .