|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
30.03.2015, 21:58 | #1 |
Форумчанин
Регистрация: 25.01.2014
Сообщений: 105
|
создание простого объекта СОМ в составе внутреннего сервера Delphi
Добрый вечер, уважаемые программисты этого замечательного форума! помогите, пожалуйста, выполнить задания на Delphi.
Задания 1. На странице ActiveX репозитарию объектов создать Delphi-проект "ActiveX Library" дав ему имя ClientInProcCom. 2. К созданному проекту добавить новый СОМ-объект (COM-object) из страницы ActiveX репозитария объектов создать Delphi-проект с следующими параметрами: Class Name - SimpleCom Instancing - tmAparatment Threading Model - CiMultiInstance Implemented Interface - ISimpleCOM Description - пример простого COM-объекта Include type Library - установлено Mark interface Oleautomation - сброшено 3. К существующему интерфейсу добавить новый метод с помощью редактора библиотек типов с именем LinearX. 4. Для созданного метода задайте тип значения, что возвращается методом - long и добавьте входящий параметр AValue с типом данных long. 5.Добавьте к существующему интерфейсу ещё один метод SquareX с такими самими установками как и у предыдущего. 6.Добавьте к COM-объекту ещё один интерфейс с именем ISimpleCOM2 с скинутыми флагами Dual и Ole Automation. 7.К созданному интерфейсу добавить 2 метода:Linear2X и CubeX с параметрами указанными в пункте 4. 8.Созданный интерфейс привязать к объекту COM SimpleCOM. 9.Для завершения создания кода нажать на кнопку Refresh. 10. Теперь перейти к модулю uSimpleCOM и создать код для новых методов (х;х2;2х;х3). 11. После завершения разработки объекта исполнить его компиляцию и регистрацию в качестве сервера ActiveX для текущего пользователя. 12. Добавьте к проектной группе визуального применение и задайте имя формы fmMain. 13. Добавьте на формы 2 компонента TSpinEdit (предназначенные для задания значения х, аргумента математических функций, заданных в методах интерфейса ISimpleCOИM и ISimpleCOM2), 2 компонента TButton и 4 компонента TLabel. 14.Включить к проекту клиента файл библиотеки типов ClientInProcCOM_TLV.pas и огласить 2 переменные для интерфейса объекта COM TSimpleCOM. Код:
Код:
Interface1.QueryInterface (ISimpleCOM2,Interface); |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Вызов интерфейса из СОМ сервера. | Stilet | Win Api | 9 | 23.12.2016 03:51 |
Помогите с написанием простого сервера | ivpo | C++ Builder | 0 | 20.11.2013 02:36 |
настройка СОМ-сервера | mureno | Компоненты Delphi | 0 | 12.12.2010 15:35 |
Система СОМ на базе сервера МТS | s2dentishe | Общие вопросы Delphi | 4 | 17.09.2010 10:10 |
Вызов формы внутреннего (dll) ActiveX сервера | HelloEverybody | Компоненты Delphi | 2 | 29.01.2008 17:25 |