Ошибка при вызове com сервера...

← →
nali (2007-01-06 22:30) [0]

Есть простейший com сервер с интерфейсом ITest2 и библиотекой типов. Запускаю клинт пробую создать com обьект и получить интерфейс ITest2. После этого выдается ошибка : "Interface not supported".
При компиляции клиента использую ту же библиотеку типов, что
и в сервере. Из-за чего может быть ошибка ?
В клиенте такой код:

var Form1: TForm1; Test:ITest2; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin // Test:=CoTest2.Create; Test:=CreateComObject(CLASS_Test2) as ITest2; end; procedure TForm1.Button2Click(Sender: TObject); begin Test.ShowIt("Hello"); end; end.

← →
isasa © (2007-01-07 19:50) [1]

regsvr32 <COM server filename> ?

← →
nali (2007-01-08 08:10) [2]

Да нет, сервер в exe, он регестрируется при первом запуске.
Кстати, в dll такой же объект нормально работает.

Ошибка при вызове com сервера... Найти похожие ветки