Ошибка:Unsatisfied forward or external declaration 'TOrderStringList.GetAscending'

Использую FIBPlus 6.41
Хочу использовать локальную сортировку. Имеется такой код:

TOrderStringList = class(TStringList)
protected
function GetAscending(Index: Integer): boolean;
procedure SetAscending (Index: Integer; Value: boolean);
public
property Ascending[Index: Integer]: boolean read GetAscending write SetAscending;
end;

Программа выдает ошибка:
Unsatisfied forward or external declaration 'TOrderStringList.GetAscending'

Но в демопримерах FIBPlus все нормально.
Подскажите пожалуйста, что я делаю не так?

СПАСИБО ЗА ВСЕ ОТВЕТЫ!!!

Попробуйте спозиционироваться на сообщение об ошибке и нажать кнопку F1. Уверен, она расскажет, в каких именно случаях возникает эта ошибка.

Демки скомпилированны вами ? Скорее всего из-за диррективы компилятору.

Да демки скомпилировал сам. Демки не выдают ошибку даже если еще раз компилировать. А какие директивы следует использовать?

Очень нужен, помогите

Откройте модуль с описанием класса, поищите (Search->Find In Files... -> Searcl All Open Files) буквосочетание GetAscending, и сравните описание в классе и реализации. Можно бахнуть DCU и перекомпилить.

А где реализация метода TOrderStringList.GetAscending?