Проблема с объявлениями в делфи

[studen]

Приветствую, товарищи. Никак не могу объявить два класса, которые ссылаются друг на друга. Вот мой код:

type
  TMapData = object
    Map: ^TMap;
    Kind: (horz, vert);
    Value: Single;
    Horz, Vert: Integer;
  end;
  TMap = object
    Horz: array [ 0..5, 0..5 ] of TMapData;
    Vert: array [ 0..5, 0..5 ] of TMapData;
  end;

[Человек_Борща]

вот так должно работать:

type
TMapData = object;
TMap = object;
TMapData = object
Map: ^TMap;
Kind: (horz, vert);
Value: Single;
Horz, Vert: Integer;
end;
TMap = object
Horz: array [ 0..5, 0..5 ] of TMapData;
Vert: array [ 0..5, 0..5 ] of TMapData;
end;

И да, object скоро исчезнет из delphi

[studen]

Скопировал, все перепроверил, не работает:

[Error] maps.pas(20): 'END' expected but ';' found
[Error] maps.pas(21): 'END' expected but ';' found
[Error] maps.pas(22): Identifier redeclared: 'TMapData'
[Error] maps.pas(28): Identifier redeclared: 'TMap'
[Fatal Error] demo04.dpr(20): Could not compile used unit 'maps.pas'

мб я что-то не так делаю?

Упс, я поменял object на class и это предварительное объявление заработало, все хорошо, спасибо

[Kix.IV]

И да, object скоро исчезнет из delphi

А вот тут пожалуйста по подробнее.

[Аватар]

А че подробней? Устаревшая, оставленная для совместимости конструкция.
http://programmersforum.ru/showthread.php?t=171988

[Человек_Борща]

Его уже в XE4 хотели выкинуть...

[eval]

наверное просто забывают, а потом опа, блин опять в релиз ушел