(06-09-20, 10:39 PM)Anas Mahmoud كتب : طيب كيف لنا ان نعرف كيف قمت بتلوين الخلايا ؟ اين وضعت الكود ؟ ما هو الكود تحديدا ؟

(06-09-20, 10:59 PM)Anas Mahmoud كتب : هل تقوم بعد هذا الكود في الفورم لود بملئ الداتا جريد فيو مرة اخرى ؟
ربما المشكلة ان بعد تنفيذ كود التلوين تمسح الخانات وتضيفها من جديد فيضيع التلوين

(06-09-20, 11:21 PM)Anas Mahmoud كتب : طيب عليك وضع كود تغيير لون الاصناف في اجراء Sub واستدعائه بعد ملئ الداتا جريد فيو وليس في حدث form.load
هكذا مثلا :

كود :

Sub UpdateColors()
Dim a As Date = Date.Today
       For i As Integer = 0 To DataGridView.RowCount - 1
           If DataGridView(1, i).Value <= a Then
               DataGridView.Rows(i).DefaultCellStyle.BackColor = Color.Orange
           End If
       Next
       Dim b As Date = Date.Today.Date.AddDays(31)
       For i As Integer = 0 To DataGridView.RowCount - 1
           If DataGridView(1, i).Value > a And DataGridView(1, i).Value <= b Then
               DataGridView.Rows(i).DefaultCellStyle.BackColor = Color.Green
           End If
       Next
End Sub

وبعد كل عملية ملئ للداتا جريد فيو تستدعي هذا الاجراء :

كود :

UpdateColors()

(06-09-20, 11:45 PM)Hasaneen كتب : الحل بسيط واستخدمه دايما

ضعي كود التلوين في الحدث CellFormatting للداتاجريد

PHP كود :

   Private Sub DataGridView1_CellFormatting(sender As Object, e As DataGridViewCellFormattingEventArgs) Handles DataGridView1.CellFormatting
        If e.ColumnIndex = 1 And e.Value IsNot Nothing Then

            Dim a As Date = Date.Today
            If CDate(e.Value) <= a Then
                sender.Rows(e.RowIndex).DefaultCellStyle.BackColor = Color.Orange
            End If

            Dim b As Date = Date.Today.Date.AddDays(31)
            If CDate(e.Value) > a And CDate(e.Value) <= b Then
                sender.Rows(e.RowIndex).DefaultCellStyle.BackColor = Color.Green
            End If

        End If
    End Sub 


(07-09-20, 12:04 AM)Moham كتب : بس اذا ممكن ليش ما عملنا فور لوب هنا اذا ممكن توضيح؟