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)
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)
Подскажите, как правильно реализовать вышеописанную задачу. Спасибо!