type
  t1 = class
internal i1: integer;
private
i2: integer;
protected
i3: integer;
public
end;

begin end.