Hola de nuevo.
Gracias cadetill, delphi.com.ar y demás amig@s por vuestra ayuda. Es para morirse de risa (por no llorar). "Casualmente" he dado con la solución y es que por no sé qué razón extraña al escribir el código desde el IDE, me ha puesto todo un procedimiento en una línea. Así de raro. Esto lo he comprobado abriendo el fichero .pas con el programa UltraEdit y me aparecía todo el procedimiento en una línea de esta manera:
procedure TForm1.ActivateForm (....) begin .... if (....) begin ... end...
Cuando he puesto esto convenientemente con sus saltos de línea, "bualá", al hacer el debug y ejecutar, ha pasado por los 'showmessage' que os dije que se saltaba. En fin, muchas gracias de nuevo y hasta pronto.
Un saludo,
Bye.
