Форум программистов, компьютерный форум CyberForum.ru

Ошибка в клиенте COM - C++

Восстановить пароль Регистрация
 
Кгин
1 / 1 / 0
Регистрация: 22.03.2011
Сообщений: 25
05.11.2011, 19:50     Ошибка в клиенте COM #1
Пытался собрать небольшую программку клиент/сервер на COM по книге А. Я. Архангельский "Программирование C++", все сделал в точности как описано, но почему-то выдает ошибку:

C++
1
2
3
4
[ILINK32 Error] Error: Unresolved external 'Pmycomserv_tlb::IID_IMyObject' referenced from D:\МОИ ДОКУМЕНТЫ\RAD STUDIO\PROJECTS\DEBUG\WIN32\UNIT1.OBJ
[ILINK32 Error] Error: Unresolved external 'Pmycomserv_tlb::CLSID_MyObject' referenced from D:\МОИ ДОКУМЕНТЫ\RAD STUDIO\PROJECTS\DEBUG\WIN32\UNIT1.OBJ
[ILINK32 Error] Error: Unresolved external 'Pmycomserv_tlb::IID_IntDiv' referenced from D:\МОИ ДОКУМЕНТЫ\RAD STUDIO\PROJECTS\DEBUG\WIN32\UNIT1.OBJ
[ILINK32 Error] Error: Unable to perform link
В чем может быть проблема? Я даже близко предположить не могу в чем дело. Помогите кто знает, заранее благодарен.

Вот код файла с ошибкой:
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Interface1 = CoMyObject::Create();
Interface2 = Interface1;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BAddClick(TObject *Sender)
{
    Label1->Caption = Interface1.Add(StrToInt(Edit1->Text),
                                     StrToInt(Edit2->Text));
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BDivClick(TObject *Sender)
{
float r;
(*Interface2).Div(StrToInt(Edit1->Text),
                  StrToInt(Edit2->Text), &r);
Label1->Caption = r;
}
//---------------------------------------------------------------------------
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
05.11.2011, 19:50     Ошибка в клиенте COM
Посмотрите здесь:

Фиксированный размер буфера для приема сообщения на клиенте (UDP) C++
Абстрактный класс «Клиент банка», имеющий виртуальный метод для вывода данных о клиенте C++

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

Текущее время: 13:54. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru