Hello,

Could someone check whether or not this compiles with Delphi 2009+ ?

****
type
  tforward = class;
  tc = class
   type
    tnest = class
    end;
  end;
  ty = class
    function f: tforward;
  end;
  tforward = tc.tnest;
begin
end.
***

Thanks,

Jonas

Jonas Maebe wrote

Hello, Could someone check whether or not this compiles with Delphi 2009+ ?

No, this does not compile on XE. However, you can do this:

   tforward = class;
   tc = class
    type
     tnest = class
     end;
   end;
   ty = class
     function f: tforward;
   end;
// let tforward be a class derived from tc.tnest
   tforward = class (tc.tnest);
You can also do this, of course:
   tc = class
    type
     tnest = class
     end;
   end;
   tforward = tc.tnest;
   ty = class
     function f: tforward;
   end;

Cheers,
Willibald