Hola shoulder.
Ví que te tomaste mucho trabajo en la presentación del código, pero lamentablemente las etiquetas [quote]...[/quote] quitan todo el formato. Por otro lado te recuerdo que las etiquetas [delphi]...[/delphi] hacen automáticamente la tarea que realizaste a mano.
Saludos
Edito: (ya lo había notado Casimiro...
)