Hola a mi si me funciona, te cuento como lo he puesto.
1- He añadido el TestPacthInt3.pas al proyecto
2- Luego, he edité el fuente del proyecto ( Project-> View Source )
3- Pusé el TestPacthInt3.pas el primero, ya que el por defecto lo puso al final, y quedó asi :
program EJEMPLO;
uses
TestPacthInt3 in 'TestPacthInt3.pas',
Forms,
[...]
Con esto se me solucionó. Espero que te funcione.