Reportcontrol and column are setup like this:

 

    'Create grid
    With grdList
        .AllowColumnRemove = False
        .AllowColumnReorder = False
        .AllowColumnResize = False
        .AllowColumnSort = True
        .BorderStyle = xtpBorderFrame
        .MultipleSelection = True
        .PaintManager.HighlightBackColor = &HC6F3FF
        .PaintManager.HighlightForeColor = vbBlack
        .Columns.DeleteAll
       
        Set oCol = .Columns.Add(ID_GRID_LOCATION, oLang.Translate(1201), 400, False)
        oCol.AutoSize = True
        oCol.Sortable = True
        oCol.SortAscending = True
    End With
   

 

And I add a record like this:

 

    Dim lRow As Long
    Dim oRow As ReportRecord
    Dim oItm As ReportRecordItem
   
    lRow = GetRowByID(Item!ID)
   
    With grdList
        'Add to the list
        If lRow = 0 Then
            Set oRow = grdList.Records.Add
           
        'Get current record
        Else
            Set oRow = grdList.Records(lRow)
        End If
       
        'Set the properties
        Set oItm = oRow.AddItem(vbNullString)
        With oItm
            .Value = Item!Name
            .Tag = Item!ID
        End With

        .Populate
    End With

 

I've got a reportcontrol with just one column, and it's set to be sorted in ascending order.

 

When I add records to the control, they are not automatically sorted but simply added to the bottom of the list.

 

How can records be automatically sorted when added?

 

Thanks,

Ivan