[Konrad]

In_Data:array of real;
смени на
In_Data:array of double;