Quiza para que tengas mas a mano las dimensiones que te quedo la matriz podrias modificar y en vez de un proceso sea una funcion que devuelva un TPoint..
Código Delphi
[-]function Procesar ( sArchivo : String ) : TPoint;
y antes de la operacion
Código Delphi
[-]...
SetLength(Matriz, 3, MiArchivo.Count);
...
podes agregar un
Código Delphi
[-]Result.X := 3;
Result.Y := MiArchivo.Count;
ahh y hay una parte del codigo que esta mal.. y es esta
Código Delphi
[-]Delete(Texto, 1, Pos(Texto, ' ') - 1);
cambiala por esta otra
Código Delphi
[-]Delete(Texto, 1, Pos(Texto, ' '));
si newtron hay incontables maneras de hacer las cosas XD es buenisimo eso .. :P