Скачать: CL | DM;

Передача ADOConnection от VBasic DLL к Delphi программе   Найти похожие ветки 

← →
jago ©   (2004-01-16 08:24) [0]

Как передать ADOConnection из OLE сервера в приложение разрабатываемое на Delphi 7? OLE сервер реализован в виде DLL написанной на Visual Basic и когда я пытаюсь передать непосредственно объект происходит ошибка "не совместимость типов"
var
MyShell:Variant;
sSession :String;
begin
..
MyShell := CreateOleObject("MyShellLib.MyShell");
..
frmMain.ADOConnection := TADOConnection(MyShell.cnn); #Error!!

---

← →
sniknik ©   (2004-01-16 10:44) [1]

проверь варианты (второй думаю ближе к "истине")
frmMain.ADOConnection.Assign(TADOConnection(MyShell.cnn));
frmMain.ADOConnection.ConnectionObject:= MyShell.cnn;

---

← →
jago ©   (2004-01-16 13:30) [2]

к сожелению оба варианта не подошли: не совпадение типов

---

← →
Vlad ©   (2004-01-16 13:32) [3]

OleVariant

---

← →
jago ©   (2004-01-16 19:22) [4]

так тоже пробовал, не работает :(

---

← →
Ломброзо ©   (2004-01-16 22:53) [5]

Во-первых, предъявите в студию код на Visual Basic, конкретнее - реализацию property Get.

Во-вторых, не забыт ли CoInitialize?

В-третьих, не спасёт ли QueryInterface на IID__Connection отца rусской демократии?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c