[YVitaliy]

Это не ошибка, а предупреждение. В некоторых случаях, а именно когда

DISKRETNYE KOORDINATY - VNE OBLASTI !

, результат ф-ции будет неопределен. Напиши вначале, например

Код:

Result:=0;

, или

Код:

......
else
  Begin
    showmessage(' DISKRETNYE KOORDINATY - VNE OBLASTI  !  ');
    Result:=0;
  end;