Delphi XE8 (System.TypInfo):
TIntfMethodEntryTail = packed record
Kind: Byte; // 0=proc or 1=func
CC: TCallConv;
ParamCount: Byte;
{Params: array[1..ParamCount] of TIntfMethodParam;
ResultTypeName: string; // only if func
ResultType: PPTypeInfo; // only if Len(Name) > 0
AttrData: TAttrData;}
end;_______________________________________________ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel
