Te tengo que dar la misma respuesta que antes:
Tienes que darle un tamaño:
Código:
resultx:array [xxx] of string;
Código:
resultx[fin]:=FloatToStr(Xutm); -----------------------AKI ESTA EL ERROR
Te aconsejo que leas sobre los arrays.
No puede asignar un valor a algo que no existe,
Ejemplo:
Código:
var
personas : array [3] of string; // array de 3 elementos
begin
personas[0] := 'manolo'; // posición 1
personas[1] := 'maría'; // posición 2
personas[2] := 'pedro'; // posición 3
personas[3] := 'juan'; // ERROR !!! no existe sitio en el array para 4 elementos !!!
end;