Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как создать COM сервер с поддержкой интерфейса IDataIntercept [D7]

ILUHA © (2004-10-29 14:53:00)
Вот когда я задавал свой вопрос про шифрование данных мне дали сайт где эт можно взглянуть и там написано:
Однако в Delphi предусмотрена возможность защиты передаваемых пакетов данных от несанкционированного доступа. Механизм защиты очень прост: создается COM-сервер, который должен поддерживать интерфейс IDataIntercept.А как создать COM сервер с поддержкой интерфейса IDataIntercept не написано.

ILUHA (2004-10-31 19:18:00) [1]
>Nikolay M.
Я вот когда лазию по сети то в снифере появляется IP адрес куда я заходил ну и там всякого разного много . а где посмотреть зашифрованные данные я получаю?

ILUHA (2004-10-31 19:14:00) [2]
Нашел я этот снифер на http://softportal.com/?id=2304

ILUHA (2004-10-31 09:27:00) [3]
>Nikolay M. Я вот хотел узнать вот я зашел вот сюда http://www.eeye.com/html/Products/Iris/Download.html?rid=r.040113.134039.079139 и я хотел узнать тут надо заполнить все поля и потом что Iris2.0 мне вышлють чтоль?

Nikolay M. (2004-10-30 12:41:00) [4]
http://www.eeye.com/html/Products/Iris/index.html

ILUHA (2004-10-30 03:31:00) [5]
Да облазил уже фиг знает скока но Iris 2.0 не нашел. А у тебя нету на него сылки

Nikolay M. (2004-10-29 20:52:00) [6]
Ищи Iris 2.0.

ILUHA (2004-10-29 20:21:00) [7]
Прочитал что такое снифер а не мог бы ты сказать где мне его взять

ILUHA (2004-10-29 19:18:00) [8]
>Запусти снифер
А что такое снифер??

Nikolay M. (2004-10-29 18:41:00) [9]

> Ток я хотел узнать вот теперь данные шифруются???

Запусти снифер и посмотри, какие данные идут в одном и в другом случае.

ILUHA (2004-10-29 18:19:00) [10]
Но я сделал Com сервер по сайту который посоветовал Nikolay M. .И нашел проект в демо. Ну дальше я значение GUID этого сервера вставляю в scktsrvr.exe в поле Intercept GUID. Ну потом я в компоненте SocketConnection в ServerName указываю ранее зарегестрированный сервер (на нем находятся Table1 и DataSetProvider), а в Intercept GUID указываю GUID Com сервера "шифровальшика" ну когда запускаю все идет номально. Ток я хотел узнать вот теперь данные шифруются??? иль надо еще вызывать методы DataIn и DataOut

Digitman (2004-10-29 17:14:00) [11]

> ILUHA © (29.10.04 14:53)

разуй глаза.
в каталоге с демо-проектами, поставляемыми в составе Делфи, есть проект intrcpt.dpr - это в точности то что тебе нужно.

ILUHA (2004-10-29 16:34:00) [12]
>И хорошо бы еще уважать людей, которые не смотрели твой предыдущий >топик. И дать хотя бы ссылку на него или на статью, о которой идет речь

Приму к сведению

Nikolay M. (2004-10-29 15:18:00) [13]

> А как создать COM сервер с поддержкой интерфейса IDataIntercept
> не написано.

Неужели?! Интересно, а этот и следующий абзацы тогда о чем же?!

Создадим COM-сервер, реализующий защиту данных, и оформим его в виде DLL. Для этого сначала выполним команду File | New | Other, выберем закладку ActiveX и в ней вызовем эксперт ActiveX Library. Сохраним проект под именем DataIntr. Далее, при открытом проекте, вновь обратимся к закладке ActiveX и вызовем эксперт COM Object. Этот эксперт к тому же позволяет создать COM-сервер, который не поддерживает библиотеки типов и не поддерживает интерфейсов автоматизации. В появившемся диалоге снимем отметки Mark Interface Oleautomation и Include Type Library. Дадим вновь созданному классу имя DataInt (рис. 2).

После нажатия кнопки OK в полученном модуле прежде всего сошлемся на модуль SConnect в директиве Uses. Далее вручную в определении класса укажем имя поддерживаемого интерфейса:

type
TDataInt = class(TComObject, IDataIntercept)
......

ПС
И хорошо бы еще уважать людей, которые не смотрели твой предыдущий топик. И дать хотя бы ссылку на него или на статью, о которой идет речь.

Наверх

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