Цитата:
|
Сообщение от Deman1986
можно еще спросить в реализации кода класса TSegment:
Код:
.....
function TSegment.GetFirst: TSegment;
begin
Result := FFirst; // во тут компилятор выдаёт ошибку "Несовместимость типов" TElement и TPage.
end;
.....
Спасибо. |
Только наверное не TElement, а TSegment. Если так, то ничего удивительного: поле TSegment.FFirst имеет тип TPage, а метод TSegment.GetFirst должен вернуть значение типа TSegment. Типы TSegment и TPage никак между собой не совместимы, о чём компилятор и сообщает.