Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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


nali ©   (2007-01-06 22:30:00) 

Есть простейший 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.


nali   (2007-01-08 08:10:00) [1]

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


isasa   (2007-01-07 19:50:00) [2]

regsvr32 <COM server filename> ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо