Ver Mensaje Individual
  #8  
Antiguo 25-03-2016
xangiesaurx xangiesaurx is offline
Miembro
NULL
 
Registrado: feb 2016
Posts: 57
Reputación: 9
xangiesaurx Va por buen camino
Wink

Gracias por tu pronta respuesta AgustinOrtu.

Me sirvio tu ejemplo para darme una idea de que hacer, así que ya lo solucione, lo que hice fue hacer comparaciones delos valores que obtenía el variant y dependiendo de eso los mandaba al método correspondiente:

Código Delphi [-]
 if Variants.VarIsType(Caller.Params[0], varInt64) and VarIsType(Caller.Params[1], varWord) then
      begin
          Result:= _TStream.Seek(Int64(Caller.Params[0]), Word(Caller.Params[1]));
      end

Gracias por toda su ayuda
Responder Con Cita