• الإعلانات

    • فيصل الحربي

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

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

shush

اعضاء
  • عدد المشاركات

    41
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل شيء نشر بواسطة shush

  1. كيف يعمل ProgressBar

    ProgressBar1.Value+=1 طبعا بدك تايمر
  2. السلام عليكم dim X,i as int16 x=Val(textbox1.text) for i=1 to x Dim N as new Button n.top=(i*10) n.left=(القياس الذي تريد ) و بامكانك تحديد اي من خواص الزر بنفس الطريقة و كذلك الامر بالنسبة للفورم me.width=(x*100) 'مثلا
  3. السلام عليكم يبدو انك جديد جدا على لغة السي++ و لم تتعلم بعد الفيجوال سي++ ابدا مشروع جديد و اختر مشروع سي++ ثم اختر نوع المشروع Win32 console project و من ثم اعطي مشروعك اسما و اختر المكان الذي تريد ان تحفظه فيه و اضغط ok ستظهر لك نافذة اضغط فينش ثم يظهر لك محرر الكود بالتوفيق
  4. استخدم هذا الكود Imports System.Globalization SetKeyboardLanguage("ar-SA")
  5. السلام عليكم ربما ما انت بحاجه له هو كود الحفظ الى قاعدة البيانات الاكسس ( او هيك انا فهمت السؤال) وهذا ان شاء الحل Try            'Attempt to update the datasource.            Me.UpdateDataSet()        Catch eUpdate As System.Exception            'Add your error handling code here.            'Display error message, if any.            System.Windows.Forms.MessageBox.Show(eUpdate.Message)        End Try        Me.objMainDataSet_PositionChanged() Public Sub UpdateDataSet() 'Create a new dataset to hold the changes that have been made to the main dataset.        Dim objDataSetChanges As Doc_2006.MainDataSet = New Doc_2006.MainDataSet        'Stop any current edits.        Me.BindingContext(objMainDataSet, "MainTable").EndCurrentEdit()        'Get the changes that have been made to the main dataset.        objDataSetChanges = CType(objMainDataSet.GetChanges, Doc_2006.MainDataSet)        'Check to see if any changes have been made.        If (Not (objDataSetChanges) Is Nothing) Then            Try                'There are changes that need to be made, so attempt to update the datasource by                'calling the update method and passing the dataset and any parameters.                Me.UpdateDataSource(objDataSetChanges)                objMainDataSet.Merge(objDataSetChanges)                objMainDataSet.AcceptChanges()            Catch eUpdate As System.Exception                'Add your error handling code here.                Throw eUpdate            End Try            'Add your code to check the returned dataset for any errors that may have been            'pushed into the row object's error.        End If   End Sub
  6. كود حفظ الصورة ؟؟

    السلام عليكم انا اعتقد ان فكرة الاخ mbmh اكثر عملية من تخزين كامل الصورة في قاعدة البيانات و يوفر في الوقت و الذاكرة المستخدمة من قبل البرنامج حيث ان الداتا ست تقوم بتحميل كافة المعلومات الموجودة في قاعدة البيانات او الجدول المعني فتخيل كم سيكون حجم الداتا ست كبيرا و بالتالي سيشكل عبء كبير على الرام و يقلل من كفاءة برنامجك و سرعه الاستجابة
  7. هذا هو الكود لكن للامان قمت بكتابته لكن لم اجربه المهم ان تضع الصور في مجلد البرنامج و تسميها بارقام Dim NextPicture, TestReslute As Int16    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick        Static NextPicture As Int16 = 0        Dim PicName As String        If NextPicture < 12 Then            NextPicture += 1            PicName = NextPicture.ToString & ".jpg" ' او نوع الصورة                      PictureBox1.Image = New Drawing.Bitmap(Application.StartupPath + \\PicName)        Else            Timer1.Stop()            ViewReslute()        End If    End Sub    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged        If TextBox1.Text = nextpicture Then            TestReslute += 1        End If    End Sub    Private Sub ViewReslute()        TextBox2.Text = Testreslute    End Sub
  8. list viwe

    السلام عليكم الحل بسيط فقط عندما تضع الداتا سورس اختار اسم الداتا الست و لا تختار اسمالداتا ست . اسم الجدول ستلاحظ انه تلقائيا سيتم تحويل الحقل المقابل للحقل المختار في الكمبو بوكس ارجو ان اكون قد افدتك :D
  9. كود حفظ الصورة ؟؟

    السلام عليكم يهذا الكود يحفظ مسار الصورة في قاعدة البيانات Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click        If OpenFileDialog1.ShowDialog = DialogResult.OK Then            editصورة.Text = OpenFileDialog1.FileName            PictureBox1.Image = New Drawing.Bitmap(OpenFileDialog1.FileName)        End If    End Sub طبعا تضع التكست بوكس و بعد تحميل مسار الصورة اليه تقوم بحفظ النص , و يمكنك استعادة الصورة من النص التالي If editصورة.Text <> "" Then          picturebox1.image= New Drawing.Bitmap(editصورة.Text)        End If اتمنى ان يكون في هذا جواب لسؤالك !!!
  10. السلام عليكم أخي بارك الله فيك , يمكن كان افضل لو شرحت كيف الاستخدام و شرحت الفنكشن و مدخلاتها و بعدين حطيت مثال
  11. السلام علكم لا تنسو ان كتير منا بدش هون عشان زيادة المعرفة او حتى التعلم
  12. السلام عليكم اذا عملت generate sql script و الحقتها مع البرنامج البرنامج بتعرف عليها لوحد و لا لازم نكتب كود خاص لذلك *-)
  13. طباعة datagrid أو Panel

    السلام عليكم ان شاء ان جيد جدا بس اعطينا فرصة نجربة و الف بارك فيك
  14. تحزيم التطبيقات ( تمهيداً لتوزيعها )

    ياريت بس لو تضع لنل مثال بارك الله فيك
  15. .NET Framework

    شكرا على الرد السريع
  16. السلام عليكم ........ اعرف انه موضوع قديم و موجود في المنتدى لكني لم اسطع ان اجده حتى بعد طول بحث .؟؟؟؟!!!! :angry: :angry: :angry: :angry: ممكمن مساعده كيف اضيفه ؟؟؟ :D :D
  17. يا اخوان ساعدوا المبتدئين بشوية شرح اذا سمحتوا
  18. السلام عليكم . انا مبرمج VB.NET و أريد ان اتعلم ال C#.NET & C++.NET و اذا امكنبعض الكتب الموضحة والسهلة و يفضل ان تكون عربية رغم المامي الواسع باللغة النجليزية . و اريد ان اعرف الفرق بينهما و ايهما افضل و للجميع الشكر :lol: :lol: :lol: :lol: :lol:
  19. السلام عليكم ياشباب انا بستخدم VB.NET و هذه الدوال معظمها لا يعمل خصوصا الدوال التي تستخدم hwnd شو الحل ......؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ :blink: :wacko: :s :unsure: و بالنسبة للفكرة و للموضوع اكثر من رائع .!
  20. شؤون الموظفين ؟؟؟SQL

    الظاهر يا اخي انك اذكى من الكل ! ؟ ! ؟ ! ؟ ! ؟ ! ؟ ! ؟ اكتب انتا برنامج خلينا نشوف
  21. شكرا اخي waleedhm , هناك طرق أخرى قمت بتجربتها و لكن بدون فائدة , هل ممكن الاستعانة بدوال ال APIs .
  22. السلام عليكم كيف اعرف اي المفاتيح على اللوحة قد ضغت المستخدم لاطلاق حدث معين عند ضغط مفتاح ما ( لدي ListBox و اريد ان اضيف الماتيح التي يضغتها المستخدم الى هذه الاداه ) :o :s :unsure: :wacko: ;) :blink: :(
  23. شكرا اخي عبدالله ولكن الجواب بعيد نوعا ما
  24. مش معقول يا checkbox

    بسيطة اعمل TextBox و اعملها binding و بعدين خلي TextBox في مخفي من الفورم واكتب الكود التالي :wacko: checkbox.Text = Textbox.Text بس لا تزعل حالك
  25. السلام عليكم شكرا ............. ولكن احدهم غير الباسوورد الرجاء تحميل البرنامج من جديد