[Muxa]

Код:

...
end;

Выходит предупреждение Return value of function might be undefined.
Что я мог упустить?

[PhoeniX]

Упустил инициализацию результата функции... не забывай, в перавой же строчке любой функции должно идти

Код:

Result:=0; // '' / nil / чё нить нулевое

в соответствии с типом результата.

[Muxa]

Спасибо. Да, точно я упустил инициализацию функции. Поправил.