

| стрелялки |
| спорт |
| драки |
| стратегии |
| гонки |
| логические |
| азартные |
| аркады |
| эротические |
| фильмы онлайн |
| Реализация COM-объекта в Delphi - класс TComObject |
|
В Delphi отсчет потенциальных COM-объектов начинается с класса TComObject. Это прямой наследник TObject, описанный в модуле ComObj. Класс изначально поддерживает два интерфейса: IUnknown и IsupportErrorInfo, последний из которых используется при работе с контроллерами OLE-автоматизации. Благодаря ISupportErrorInfo объект сможет получать информацию об исключительных ситуациях. Фабрика класса, создавшая наш объект: property Factory: TComObjectFactory; //только для чтения Число ссылок на интерфейс COM-объекта находится в свойстве: property RefCount: Integer; //только для чтения Если COM-объект составной, то доступ к интерфейсу IUnknown вложенного в него объекта мы обнаружим в свойстве: property Controller: IUnknown; Если объект не составной, свойство возвратит nil. |
