help me i need send _Recordset by com with connection points

Hello,
I need send a _Recordset by COM with connection points, but i don't know
implent TEventSink.Invoke

function TEventSink.Invoke(DispID: Integer; const IID: TGUID;
  LocaleID: Integer; Flags: Word; var Params; VarResult, ExcepInfo,
  ArgErr: Pointer): HResult;
var
  V: OleVariant;
  rstRecordSet: _Recordset;
begin

  Result:=S_OK;
  case DispID of
    1: begin
        V:=OleVariant(TDispParams(Params).rgvarg^[0]);
        FController.OnNextStep(V);
      end;
    2: FController.OnNextRecord;
    3: begin
        V:=OleVariant(TDispParams(Params).rgvarg^[0]);
        FController.OnStartRecords(V);
      end;
    4: begin

        rstRecordSet:=......???????
FController.OnErrors(rstRecordSet);
      end;

  end;

end;

If you know i make this i apreciate,
tank you