Yes. Very similar to mine based on Maciej's earlier scetch.in approach.
And just like mine it suffers from ugly hard casting (until we have a default property, that is ).
This is a good solution for FreePascal, can't be used on Delphi, though,
It generattes also slightly less code, it seems.
Nice!