تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ممكن مساعده في تغير لون صف
#1
السلام عليكم اخوكم جدبد في الديف اكسبريس 

واريد كود يعمل الاتي
عندي علي الفورم جريد كنترول و تسكت بوكس وبوتن 
اريد عند كتابه كلمه في التكست بوكس و الضغط علي البوتن يبحث عن الكلمه في عامود رقم 2 لو كان يحتوي علي نفس الكلمه يغير لونه الي اخمر

انا عملتا بالجريد فيو العاديه بس اريد ان اعملها بالجريد كنترول الخاص بالديف اكسبريس

هذ هو الكود اللي بالداتا جريد فيو العاديه 
كود :
If DataGridView1.Rows.Count > 1 Then
               For Each row As DataGridViewRow In Me.DataGridView1.Rows
                   If row.IsNewRow = False Then
                       If TextBox7.Text.Trim <> "" And row.Cells(2).Value.ToString.Contains(TextBox7.Text.Trim) Then
                           row.DefaultCellStyle.BackColor = Color.Green
                       Else

                       End If
                   End If
               Next
الرد }}}
تم الشكر بواسطة:
#2
الجرد فيو في الدف اكسبرس تختلف تماما عن الجرد العادي
جرب هذا الكود

وحقيقة انا اميل الى استخدام الادوات الخاصة بالبرنامج من غير اضافات خارجية لانها ستخلق لك مشاكل انت في غنى عنها وخصوصا
عند نقل برنامجك لاجهزة اخرى ، كذلك هذه الادوات غالية الثمن وقد يلجأ البعض الى كسر حمياتها وقد يترتب على ذلك امور قد نشك
بحليتها خصوصا للامور التجارية

كل التوفيق
PHP كود :
rivate Sub MyGridView_RowStyle(ByVal sender As ObjectByVal e As RowStyleEventArgs 
    Dim quantity 
As Integer Convert.ToInt32(MyGridView.GetRowCellValue(e.RowHandle"QuantityField"))  

    If quantity 
0 Then  
        e
.Appearance.BackColor Color.Red  
    Else  
        e
.Appearance.BackColor Color.LightGreen  
    End 
If  

    e
.HighPriority True   'override any other formatting  
End Sub 
الرد }}}
#3
(13-01-21, 07:47 AM)moosa_alabri كتب : الجرد فيو في الدف اكسبرس تختلف تماما عن الجرد العادي
جرب هذا الكود

وحقيقة انا اميل الى استخدام الادوات الخاصة بالبرنامج من غير اضافات خارجية لانها ستخلق لك مشاكل انت في غنى عنها وخصوصا
عند نقل برنامجك لاجهزة اخرى ، كذلك هذه الادوات غالية الثمن وقد يلجأ البعض الى كسر حمياتها وقد يترتب على ذلك امور قد نشك
بحليتها خصوصا للامور التجارية

كل التوفيق
PHP كود :
rivate Sub MyGridView_RowStyle(ByVal sender As ObjectByVal e As RowStyleEventArgs 
    Dim quantity 
As Integer Convert.ToInt32(MyGridView.GetRowCellValue(e.RowHandle"QuantityField"))  

    If quantity 
0 Then  
        e
.Appearance.BackColor Color.Red  
    Else  
        e
.Appearance.BackColor Color.LightGreen  
    End 
If  

    e
.HighPriority True   'override any other formatting  
End Sub 

حبيبي يا كبير كلامك صحيح جداا ولكن الديف موفره وقت في بعض الادوات 

انا عايز اطلب من حضرتك طلب 

انا اريد ان اجلب جميع القيم اللي في عامود 0 في ليست بوكس انا اعرف اعملها من جريد فيو العاديه لكن ديف اكسبريس لا 

استخدم هذا الكود في الفورم لود 
كود :
GridView1.Columns.Clear()
       dt.Columns.Add("Name")
       dt.Columns.Add("Price")
       dt.Columns.Add("Address")
       dt.Columns.Add("Phone")
       dt.Columns.Add("Description")
       dt.Columns.Add("Date ads")
       dt.Columns.Add("Date account")
       dt.Columns.Add("Viwe")
       dt.Columns.Add("Link")

       GridControl1.DataSource = dt
       GridView1.Columns("Name").Caption = "Name"
       GridView1.Columns("Price").Caption = "Price"
       GridView1.Columns("Address").Caption = "Address"
       GridView1.Columns("Phone").Caption = "Phone"
       GridView1.Columns("Description").Caption = "Description"
       GridView1.Columns("Date ads").Caption = "Date ads"
       GridView1.Columns("Date account").Caption = "Date account"
       GridView1.Columns("Viwe").Caption = "Viwe"
       GridView1.Columns("Link").Caption = "Link"

وهذا الكود لملئ الحقول 
كود :
           dt.Rows.Add(xName, xPrice, xAddress, xPhone, xDescription, xDate_ads, xDate_account, xViwe, xlink)

(13-01-21, 06:16 PM)اليوم السابع كتب :
(13-01-21, 07:47 AM)moosa_alabri كتب : الجرد فيو في الدف اكسبرس تختلف تماما عن الجرد العادي
جرب هذا الكود

وحقيقة انا اميل الى استخدام الادوات الخاصة بالبرنامج من غير اضافات خارجية لانها ستخلق لك مشاكل انت في غنى عنها وخصوصا
عند نقل برنامجك لاجهزة اخرى ، كذلك هذه الادوات غالية الثمن وقد يلجأ البعض الى كسر حمياتها وقد يترتب على ذلك امور قد نشك
بحليتها خصوصا للامور التجارية

كل التوفيق
PHP كود :
rivate Sub MyGridView_RowStyle(ByVal sender As ObjectByVal e As RowStyleEventArgs 
    Dim quantity 
As Integer Convert.ToInt32(MyGridView.GetRowCellValue(e.RowHandle"QuantityField"))  

    If quantity 
0 Then  
        e
.Appearance.BackColor Color.Red  
    Else  
        e
.Appearance.BackColor Color.LightGreen  
    End 
If  

    e
.HighPriority True   'override any other formatting  
End Sub 

حبيبي يا كبير كلامك صحيح جداا ولكن الديف موفره وقت في بعض الادوات 

انا عايز اطلب من حضرتك طلب 

انا اريد ان اجلب جميع القيم اللي في عامود 0 في ليست بوكس انا اعرف اعملها من جريد فيو العاديه لكن ديف اكسبريس لا 

استخدم هذا الكود في الفورم لود 
كود :
GridView1.Columns.Clear()
       dt.Columns.Add("Name")
       dt.Columns.Add("Price")
       dt.Columns.Add("Address")
       dt.Columns.Add("Phone")
       dt.Columns.Add("Description")
       dt.Columns.Add("Date ads")
       dt.Columns.Add("Date account")
       dt.Columns.Add("Viwe")
       dt.Columns.Add("Link")

       GridControl1.DataSource = dt
       GridView1.Columns("Name").Caption = "Name"
       GridView1.Columns("Price").Caption = "Price"
       GridView1.Columns("Address").Caption = "Address"
       GridView1.Columns("Phone").Caption = "Phone"
       GridView1.Columns("Description").Caption = "Description"
       GridView1.Columns("Date ads").Caption = "Date ads"
       GridView1.Columns("Date account").Caption = "Date account"
       GridView1.Columns("Viwe").Caption = "Viwe"
       GridView1.Columns("Link").Caption = "Link"

وهذا الكود لملئ الحقول 
كود :
           dt.Rows.Add(xName, xPrice, xAddress, xPhone, xDescription, xDate_ads, xDate_account, xViwe, xlink)

لقيت الحل 
كود :
 For i As Integer = 0 To GridView1.DataRowCount - 1
           Dim ass As String = GridView1.GetRowCellValue(i, "Name")
           'do something  

       Next
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو
#4
لو في نموذج بسيط بيكون افضل
الرد }}}
تم الشكر بواسطة: اليوم السابع , ابراهيم ايبو


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ممكن حل المشكلة فى الكود التالي - من مشاركة استاذنا القدير / عبدالله الدوسري new_programer 4 169 02-03-24, 07:36 PM
آخر رد: new_programer
Sad ممكن حل لهذا المشكل melad2002 0 240 30-01-24, 08:01 PM
آخر رد: melad2002
  ممكن استفسار عن m3u8 malekmohamed155 0 232 20-01-24, 07:47 PM
آخر رد: malekmohamed155
  ممكن تعديل في كود التفقيط للارقام melad2002 2 333 01-01-24, 08:47 PM
آخر رد: melad2002
  [VB.NET] السلام عليكم ممكن مساعدة اخوان احتاج يكون تسجيل الدخول textbox1 + textbox2 Coder_iraqii 4 400 18-12-23, 06:46 PM
آخر رد: Kamil
  ممكن كود ترقيم تلقائي في الداتا غريد فيو المبرمج البسيط 16 10,577 08-11-23, 01:44 AM
آخر رد: الحزين اليماني
  ممكن مساعدة في تعلم طريقة جمع التاريخ ؟ Ali_hassn 2 456 27-08-23, 02:18 AM
آخر رد: Ali_hassn
  اريد تغير حجم ال Panel عند التفيذ من داخل الكود moh61 2 403 23-07-23, 12:22 AM
آخر رد: أبووسم
  مساعده في تشغيل اكثرمن فورم في وقت واحد maherhaddaf 5 527 19-07-23, 03:28 PM
آخر رد: Taha Okla
  مساعده في كود ترحيل البيانات الى اكسل من داتا قرايد فيو maherhaddaf 1 621 27-06-23, 08:03 PM
آخر رد: Shade0001

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم