![]() |
#5 |
Участник
|
ну если в COM ваша функция объявлена типа так
function GetVersionDev(DevNum: Byte; out VersionDev: WideString): WordBool; тогда скорее всего вот так будет работать: X++: COMVariant ver = new COMVariant(COMVariantInOut::Out, COMVariantType::VT_BSTR); COMVariant varWrapper = new COMVariant(COMVariantInOut::In, ComVariantType::VT_VARIANT); varWrapper.variant(ver); met.GetVersionDev(1, varWrapper ); return ver.bStr(); а то на Delphi оно как то не то ![]() |
|