program tw21593b; {$MODE DELPHI} type TWrapper = record strict private const Size = SizeOf(T); { Error: Illegal expression } public class procedure Test; static; end; class procedure TWrapper.Test; begin Writeln(Size); end; begin TWrapper.Test; end.