En XE4:
Código Delphi
[-] TFloatRec = packed record
Exponent: Smallint;
Negative: Boolean;
Digits: array[0..20] of Byte;
end;
TMasterDataLink = class(TDetailDataLink)
TDetailDataLink = class(TDataLink)
TDataLink = class(TPersistent)
TDataSource = class(TComponent)
private
FDataLinks: TList< TDataLink >;
protected
property DataLinks: TList< TDataLink > read FDataLinks;
end;
Para el caso de la función StrLen, no compila tampoco con System.AnsiStrings.StrLen: [dcc32 Error] GHFRTL.pas(3605): E2250 There is no overloaded version of 'StrLen' that can be called with these arguments ==> solo Acepta tipos PAnsichar, PWideChar
Hice pruebas con Length y SizeOf y ambas generan el mismo resultado (21, para la definición de Digits del TFloatRec )