Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Делфи _ Технология com

Автор: expm 23.02.2007 17:26

Здравствуйте, уважаемые.

Существует готовое приложение, являешееся com-сервером. Нужно написать под него небольшое дополнение. Сервер на своей машине я зарегистрировал (лично в реестре проверял - все интерфейсы прописались). Насколько я понимаю (в com-технологии делаю первые шаги), чтобы получить доступ к интерфейсам нужно сначала подключиться к серверу. А как это сделать?

Автор: expm 24.02.2007 17:15

Уже сам разобрался. Нужно просто добавить в раздел uses файл библиотеки типов сервера и написать что-то вроде эого:


implementation

uses {библиотека}_TLB;

var
Interface1: I{интерфейс, к которому хотим получить доступ};

{$R *.dfm}


procedure TForm1.FormShow(Sender: TObject);
begin
Interface1 := Co{интерфейс, к которому хотим получить доступ}.Create;
end;