在Midas做的delphi COM组件中，如何传递结构在VC中调用

Question

我在 类型库中定义了这个结构
Equip103DefStruct = packed record
    Name: array[0..29] of Shortint;
    Unit_: array[0..9] of Shortint;
    OnMean: array[0..29] of Shortint;
    OffMean: array[0..14] of Shortint;
    Format: Smallint;
    Attrib: Shortint;
    Equip103DefStruct_DUMMY: SYSINT;
  end;
function TPPofis.GetEquipDetail(m_sStationID, m_bEquipID,
  m_GroupID: Integer): OleVariant;
var
     V: ARRAY OF ^Equip103DefStruct;
    // V : ^Equip103DefStruct;
     //rec : OleVariant;
begin
     SetLength(V,20)  ;
     StrCopy(@(V[0].Name),'hello');
     StrCopy(@(V[0].Unit_),'unit1');
     StrCopy(@(V[0].OnMean),'test');
     StrCopy(@(V[1].Name),'array1');
     StrCopy(@(V[1].Unit_),'arrayunit1');
     StrCopy(@(V[1].OnMean),'arrayt1');
     Result := V;
end;
我想把这个结构数组指针传递给VC++调用，请问在C++中如何调用