Mientras pones algo mas de codigo, permiteme adivinar un par de soluciones.
Esto es lo que tienes ahora:
Código Delphi
[-]
if (Matriz[j,i] = 1.5707963268)then
Solución 1:
Código Delphi
[-]
if SameValue(Matriz[j,i],1.5707963268)then
Solución 2:
Código Delphi
[-]
if SameValue(Matriz[j,i],pi/2)then
PD: Para que funcione, necesitas incluir en la uses la unit math.