Cosa de locos

[[seoane]]

Pero todavía sigo sin saber como llenas los valores de la matriz La única razón para que no entre en el if, es que no se cumpla la condición. No te fíes de la información que se ve en los watch, tratándose de valores de punto flotante puede que se trate de una aproximación y no del valor real. Por eso te preguntaba, como llenabas la matriz, para estar seguro de que valores se guardaban en ella. Si pudieras poner el código, donde llenas la matriz, por lo menos a mi, me aclararía muchas cosas.

[[seoane]]

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.

[bosterito]

Hola Seoane
Ahí pongo algo de código

Type Tmatriz1 = array[1..16,1..16] of Real; // Aquí defino la matriz

Theta := Angulo1 ( Gxx, Gyy, Gxy );  // En esta función se obtiene un determinado ángulo
Angulos[(((Alto+Bloque-1) div Bloque), ((Ancho-1) div Bloque)] := Theta; //Aquí le asigno el valor a la matriz

y luego la llamo por parámetros por el código que ya puse

[[seoane]]

¿Has probado las soluciones que te propuse? ¿funcionaron o sigues teniendo el mismo problema?