inherit from Object that inherit from TService

hi
i build a service shell that launch, close and detect when the application was closed (by process list), This shell inherit from TService (Service application wizard).
In my project i use this for 2 application can i do this generic?
i have the following code:

TGenericServiceShell = class(TService)
.
.
and
TMyService = class(TGenericServiceShell)

MyService unit was created by using ‘Service application’ wizard,  I changed the inheritance from TService to TgenericServiceShell, and then when closing the project and load it again i get an error about name missing, the service main form replaced with another one and the service doesn't work.

Thanks,
udi
udicAsked:
Who is Participating?
 
TOndrejConnect With a Mentor Commented:
What's the problem? Is anything in my previous post unclear? Feel free to ask.
0
 
TOndrejCommented:
You are trying to use form inheritance (because TService comes with a data module).
In that case, make sure the following is true:

The ancestor unit is part of your project.
The descendant's .dfm begins with 'inherited' keyword instead of 'object'.

You can achieve this at design time with File\New\Other... in your project tab, select ancestor, Inherit.

HTH
TOndrej
0
 
udicAuthor Commented:
i didn't success.how can i do this?
0
 
udicAuthor Commented:
sorry
Thank you i success, its work great

thanks alot
udi
0
 
TOndrejCommented:
I'm glad that it helped you.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.