В строках 308, 310 заменить "F_P" на "FPC". Надо бы проверить, работает ли вообще компонент.
Кстати, почему не используются функции GetMem/FreeMem вместо самодельных AllocMemo/FreeMemo?