[Dark_RavenM]

Dim objTarifa As clsTarifa
Dim objCC As clsCuotas
Dim intTmp as Integer
Dim colTmp as Collection
Set objTarifa = New clsTarifa
objTarifa.Ruta = "C:\"
objTarifa.Codigo = "15091001"
If objTarifa.Actualiza Then
   Set colTmp = objTarifa.CuotasC

objTarifa.CuotasC es el que regresa una coleccion

Si Delphi lo toma como un componente ActiveX

y asi lo tengo en Delphi

Código Delphi [-]

type
  TForm1 = class(TForm)
    objDia: TclsTarifa;
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

procedure TForm1.FormCreate(Sender: TObject);
var
  info:variant;
  dispatch:idispatch
begin
   objDia.Ruta:='C:\';
   objDia.Codigo:='15091001';

   if objDia.Actualiza(TRUE) then
   begin
      dispatch:=objDia.CuotasC;
      info:=objDia.CuotasC;
   end;

pero ya no se como manejar el dispatch para obtener la informacion o la variable info como variant