powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / Использование объектов Delphi в Cache'
3 сообщений из 3, страница 1 из 1
Использование объектов Delphi в Cache'
    #34715576
Socratdv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день.
Подскажите, как решить проблему...
Есть необходимость ипользовать объекты Delphi из Каши. Как это сделать?.

Я пытался решить эту проблему следующим образом:
Код Delphi
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
//Объявляем интерфейс на класс объекта

IClientObj = interface (IInterface)
  ['{B3D07908-0598-4655-929D-FE61FA844766}']
end;


TClientObj = class (TInterfacedObject, IClientObj)
end;

//Передаем объект на сервер
procedure setClientObj;
var
    clientObj: IClientObj;
begin
    clientObj := TClientObj.Create();
    CacheObj.clientObj:=IDispatch(clientObj);
end;

В Cache' свойтсво clientObj объявлено как %Activate.IDispatch.
После установки этого свойства клиентом на сервере оно все равно пустое...
...
Рейтинг: 0 / 0
Использование объектов Delphi в Cache'
    #34718974
Игорь Сойников
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Посмотри в приложенном файле
...
Рейтинг: 0 / 0
Использование объектов Delphi в Cache'
    #34728077
Socratdv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Эту статью (пример) я уже видел. Там, к сожалению, ни чего не сказано как в Delphi создать свой собственный COM объект и передать его на сервер Cache'.

Сам COM объект я создал, но не могу его передать на сервер.
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / Использование объектов Delphi в Cache'
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]