Por el error, alguno de los índices se te está saliendo de rango.
En estos casos siempre puedes ejecutar tu programa paso a paso y detectar en qué punto te está dando el error.
Por otro lado veo que generas una matriz, del Dataset pasas los datos a la matriz (doble array) y luego desde la matriz los pasas al TStringGrid.
¿Porqué no los pasas directamente del TDataset al TStringGrid?
Más sencillo, menos pasos y menos posibilidad de errores.
|