Всем привет. Стоит задача перенести код взаимодействия с OLE-объектами, с Delphi на QT. Вроде ничего необычного, н оне могу достучаться до суб.объекта. Код на Delphi:

 CoInitialize(nil);
OleObj := CreateOleObject('Resonance.ForeignExchange');
           OleObj.InitAuto;

           Writeln(OleObj.GetExchangeRates (840).Buy); //Возвращает значение


Код на QT:

Цитата
HRESULT r = CoInitialize(0);
QAxObject object("Resonance.ForeignExchange", this);

qDebug() << object.dynamicCall("InitAuto").toInt();
QAxObject* object2 = object.querySubObject("GetExchangeRates(840)");

qDebug() << object2; // Возвращает QAxObject(0xcdd8fe0)
qDebug() << object2->dynamicCall("Buy"); // Возвращает QVariant(Invalid)


Подскажите, как правильно реализовать вышеописанную задачу. Спасибо!