Hola, nunca había utilizado la función AddItem con el MsFlexgrid, pero está claro que funciona, lo unico que pasa es que la misma palabra lo dice: Add (Añadir)
El problema que tienes es que según como tengas definido el grid en diseño tendrá mas o menos filas y te añade al final, por tanto la opción AddItem no es nada práctica.
Si quieres puedes utilizar una esta rutina:
Código vb:
Ver originalPrivate Sub AddGrid(Grid As MSFlexGrid, Fila As Single, Columna As Single, Texto As String)
' Comprobamos si la fila existe, si no la añadimos.
If Grid.Rows - 1 < Fila Then Grid.Rows = Fila + 1
' Comprobamos si la columna existe, si no la añadimos.
If Grid.Cols - 1 < Columna Then Grid.Cols = Columna + 1
' Pasamos el dato al Grid
Grid.TextMatrix(Fila, Columna) = Texto
End Sub
La llamada a la misma es muy simple, te pongo un ejemplo
AddGrid grd, 5, 0, Text1
AddGrid grd, 5, 1, Text2
AddGrid grd, 5, 2, Text3
AddGrid grd, 5, 3, Text3
Cualquier duda comenta y lo aclaramos
Saludos