[DXCategory("CustomDraw")]
public event RowObjectCustomDrawEventHandler CustomDrawFooter

<DXCategory("CustomDraw")>
Public Event CustomDrawFooter As RowObjectCustomDrawEventHandler

private void Form3_Load1(object sender, EventArgs e) {
    CustomDrawFooter(gridControl1, gridView1);
}

public static void CustomDrawFooter(GridControl gridControl, GridView gridView) {
    gridView.OptionsView.ShowFooter = true;
    gridView.FooterPanelHeight = 70;

    Color highPriority = Color.Green;
    Color normalPriority = Color.Orange;
    Color lowPriority = Color.Red;
    int markWidth = 16;

    // Handle this event to paint the footer panel manually
    gridView.CustomDrawFooter += (s, e) => {
        int offset = 5;
        e.DefaultDraw();
        Color color = highPriority;
        Rectangle markRectangle;
        string priorityText = " - High level";
        for (int i = 0; i < 3; i++) {
            if (i == 1) {
                color = normalPriority;
                priorityText = " - Normal level";
            }
            else if (i == 2) {
                color = lowPriority;
                priorityText = " - Low level";
            }
            markRectangle = new Rectangle(e.Bounds.X + offset, e.Bounds.Y + offset + (markWidth + offset) * i, markWidth, markWidth);
            e.Cache.FillEllipse(markRectangle.X, markRectangle.Y, markRectangle.Width, markRectangle.Height, color);
            e.Appearance.TextOptions.HAlignment = HorzAlignment.Near;
            e.Appearance.Options.UseTextOptions = true;
            e.Appearance.DrawString(e.Cache, priorityText, new Rectangle(markRectangle.Right + offset, markRectangle.Y, e.Bounds.Width, markRectangle.Height));
        }
    };
}

Private Sub Form3_Load1(ByVal sender As Object, ByVal e As EventArgs)
    CustomDrawFooter(gridControl1, gridView1)
End Sub

Public Shared Sub CustomDrawFooter(ByVal gridControl As GridControl, ByVal gridView As GridView)
    gridView.OptionsView.ShowFooter = True
    gridView.FooterPanelHeight = 70

    Dim highPriority As Color = Color.Green
    Dim normalPriority As Color = Color.Orange
    Dim lowPriority As Color = Color.Red
    Dim markWidth As Integer = 16

    ' Handle this event to paint the footer panel manually
    AddHandler gridView.CustomDrawFooter, Sub(s, e)
        Dim offset As Integer = 5
        e.DefaultDraw()
        Dim color As Color = highPriority
        Dim markRectangle As Rectangle
        Dim priorityText As String = " - High level"
        For i As Integer = 0 To 2
            If i = 1 Then
                color = normalPriority
                priorityText = " - Normal level"
            ElseIf i = 2 Then
                color = lowPriority
                priorityText = " - Low level"
            End If
            markRectangle = New Rectangle(e.Bounds.X + offset, e.Bounds.Y + offset + (markWidth + offset) * i, markWidth, markWidth)
            e.Cache.FillEllipse(markRectangle.X, markRectangle.Y, markRectangle.Width, markRectangle.Height, color)
            e.Appearance.TextOptions.HAlignment = HorzAlignment.Near
            e.Appearance.Options.UseTextOptions = True
            e.Appearance.DrawString(e.Cache, priorityText, New Rectangle(markRectangle.Right + offset, markRectangle.Y, e.Bounds.Width, markRectangle.Height))
        Next i
    End Sub
End Sub