VA
TypeInfo(TMyRecType)
а чтото вроде
SuperTypeInfo('TMyRecType')
?
http://docwiki.embarcadero.com/Libraries/Sydney/en/System.Rtti.TRttiContext.FindType
посмотри, может есть аналог для lazarus
Size: a a a
VA
z
TRttiContext = record
private
FContextToken: IInterface;
function GetByHandle(AHandle: Pointer): TRttiObject;
procedure AddObject(AObject: TRttiObject);
public
class function Create: TRttiContext; static;
procedure Free;
function GetType(ATypeInfo: PTypeInfo): TRttiType;
function GetType(AClass: TClass): TRttiType;
//function GetTypes: specialize TArray<TRttiType>;
end;BU
BU
МС
DB
AK
MО
AK
AK
MО
MО
AK
AK
AK
MО
AK
AK
DB
ED