Скачать: CL | DM;

Наследник сервиса и его использование   Найти похожие ветки 

← →
race1   (2007-08-23 14:45) [0]

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

Написал "базовый" сервис (TServiceBase = class(TService)), пытаюсь сделать от него дочерний класс (TServiceOne = class(TServiceBase)). И ничего не получается. Дельфи считает что TServiceOne это форма.

Можно как-нибудь такое сделать?

---

← →
Сергей М. ©   (2007-08-23 14:47) [1]

> Дельфи считает что TServiceOne это форма


Прямо так и говорит, мол, считаю чтот форма ?)

---

← →
Eraser ©   (2007-08-23 14:47) [2]

> race1   (23.08.07 14:45) 


> Дельфи считает что TServiceOne это форма.

так и говорит? )

---

← →
race1   (2007-08-23 14:52) [3]

Ну да... Открываю модуль где объявлен этот класс (TServiceOne), нажимаю F12 и вместо сервиса (как дата-модуль) вижу обыкновенную форму...

---

← →
clickmaker ©   (2007-08-23 14:53) [4]

F1 - TService - Hierarchy смотрел?

---

← →
Сергей М. ©   (2007-08-23 14:55) [5]

А что у тебя прописано в dpr сервис-проекта ?

---

← →
race1   (2007-08-23 15:02) [6]

Мой косяк... Я вручную написал базовый класс для нового сервиса. Если сделать через new - inheritable items то всё нормально... :[

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.019 c