Error en OpenDialog

[roman]

Amigo José Francisco, yo te propongo, antes que nada, que revises con cuidado las indentaciones de tu código. Tal como las tienes lo hace casi ilegible. Por ejemplo, en el procedimiento que nos ocupa hay un bloque begin..end con cero indentación cuando debería estarlo. Hay ciclos for al que le siguen varias líneas indentadas pero no están encerradas en un bloque begin..end. Lo mismo con las líneas que siguen al if del OpenDialog.

Tal como está no esposible discernir si esas líneas tenías la intención de pertenecer a un mismo bloque o no y dificulta el anaálisis del código.

// Saludos