Ok, ahora se me presento otro problemita, tengo en un classes.pas estas funciones:
Código Delphi
[-]function TStream.Seek(const Offset: Int64; Origin: TSeekOrigin): Int64;
begin
if (Offset < Low(Longint)) or (Offset > High(Longint)) then
raise ERangeError.CreateRes(@SRangeError);
Result := Seek(Longint(Offset), Ord(Origin));
end;
function TStream.Seek(const Offset: Int64; Origin: Word): Int64;
begin
Result := Seek(Offset, TSeekOrigin(Origin));
end;
Y en fs_uses.pas tengo lo siguiente:
Código Delphi
[-]else if MethodName = 'SEEK' then
Result := _TStream.Seek(Caller.Params[0], Caller.Params[1])
Me esta dando el siguiente error:
[dcc32 Error] fs_iclassesrtti.pas(306): E2251 Ambiguous overloaded call to 'Seek'
System.Classes.pas(846): Related method: function TStream.Seek(const Int64; Word): Int64;
System.Classes.pas(845): Related method: function TStream.Seek(const Int64; TSeekOrigin): Int64;
Alguien sabe como poder solucionarlo?
Gracias
Por cierto Caller.Params son Variant. (Uso XE5)