radGrid Cells alignment

I'm using a telerik RadGrid with data dynamically created on page load...

I am formatting the text-alignment with the attached code.

Is there a faster "For each..." way of doing this?
Protected Sub grdAvailableForSale_ItemDataBound(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridItemEventArgs) Handles grdAvailableForSale.ItemDataBound
        If TypeOf e.Item Is GridHeaderItem Then
            Dim item As GridHeaderItem = DirectCast(e.Item, GridHeaderItem)
            item.Cells(3).HorizontalAlign = HorizontalAlign.Center
            item.Cells(4).HorizontalAlign = HorizontalAlign.Center
            item.Cells(5).HorizontalAlign = HorizontalAlign.Center
            item.Cells(6).HorizontalAlign = HorizontalAlign.Center
            item.Cells(7).HorizontalAlign = HorizontalAlign.Center
            item.Cells(8).HorizontalAlign = HorizontalAlign.Center
        End If
        If TypeOf e.Item Is GridDataItem Then
            Dim item As GridDataItem = DirectCast(e.Item, GridDataItem)
            item.Cells(3).HorizontalAlign = HorizontalAlign.Center
            item.Cells(4).HorizontalAlign = HorizontalAlign.Center
            item.Cells(5).HorizontalAlign = HorizontalAlign.Center
            item.Cells(6).HorizontalAlign = HorizontalAlign.Center
            item.Cells(7).Text = Convert.ToDateTime(item.Cells(7).Text).ToString("MM/dd/yyyy")
            item.Cells(7).HorizontalAlign = HorizontalAlign.Center
            item.Cells(8).HorizontalAlign = HorizontalAlign.Center
        End If

Open in new window

Larry Bristersr. DeveloperAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
Larry BristerConnect With a Mentor sr. DeveloperAuthor Commented:
Actually I grunted out my own solution with the attached code
PrivateSubRadGrid1_ItemDataBound(sender AsObject, e AsGridItemEventArgs)
    IfTypeOfe.Item IsGridHeaderItem Then
        Dimitem As GridHeaderItem = TryCast(e.Item, GridHeaderItem)
        Fori AsInteger= 0 Toitem.Cells.Count - 1
            item.Cells(i).HorizontalAlign = HorizontalAlign.Center
        Next
    EndIf
 
    IfTypeOf e.Item IsGridDataItem Then
        TryCast(e.Item, GridDataItem).HorizontalAlign = HorizontalAlign.Center
    EndIf
EndSub

Open in new window

0
 
gamarrojgqCommented:
Hi,

Try to use this code for each column, not in the ItemDataBound event, but in the event where you are setting the datasource dynamically

grdAvailableForSale.Columns(3).HorizontalAlign = HorizontalAlign.Center
0
 
Larry Bristersr. DeveloperAuthor Commented:
FOund my own solution
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.