구글링 해도 비슷한 답이 나오지 않네요.

type
TKind = packed record
  a: string;
  b: integer;
end;

위 처럼 record type 선언을 하고  java 의 extends 처럼 하나의 record 로 만들고자 합니다.

type
TKindAll = packed reocrd
   TKind;

   c:integer;
   d: string;
end;

이렇게 추가하는 방법이 있을까요?

사용시
KindAll.TKind.~ 방식이 아닌 KindAll.a 와 같이 사용될 수 있으면 합니다.