angerer
asked on
NT Service with Delphi 4
I have to implement an NT service with Delphi 4. The Classes TServiceApplication and TService are logic to me. The problem is that i do not know how to register the service within the NT (workstation or server) system.
Which is the instance that calls the Windows API functions CreateService, StartService and so on ?
When i start the application (TServiceApplication with one TService object) the events OnStart and OnExecute are never fired ? The application is running for about 15 secunds and than it stops.
Would be nice if you can help me !
thanks
bernhard
Dipl. Ing. Bernhard Angerer
IFT / Vienna University of Technology
Karlsplatz 13/311
A-1040 Wien
Tel: +43 1 58801 3192
Fax: +43 1 504 14 97
angerer@mail.ift.tuwien.ac
Which is the instance that calls the Windows API functions CreateService, StartService and so on ?
When i start the application (TServiceApplication with one TService object) the events OnStart and OnExecute are never fired ? The application is running for about 15 secunds and than it stops.
Would be nice if you can help me !
thanks
bernhard
Dipl. Ing. Bernhard Angerer
IFT / Vienna University of Technology
Karlsplatz 13/311
A-1040 Wien
Tel: +43 1 58801 3192
Fax: +43 1 504 14 97
angerer@mail.ift.tuwien.ac
As far as I remember (I don't have my D4 around), you can register the service by calling the EXE file with an INSTALL switch (and UNINSTALL if you want to uninstall it)
If you don't get any other feedback, I'll check more on it when I return to my D4 tomorrow..
If you don't get any other feedback, I'll check more on it when I return to my D4 tomorrow..
angerer,
I don't know much of these, sorry. The only thing I know is that there is a library which has combined all the needed API of NT. Here is the link : challenge.live-net.de/belc
I also suggest you to look at Winsvc.pas file in the delphi\source\rtl\win . there should all functions be decribed.
Regards, Zif.
Let me know, if I can help you further. Be more specific in your Question (Maybe I can do a little research)
I don't know much of these, sorry. The only thing I know is that there is a library which has combined all the needed API of NT. Here is the link : challenge.live-net.de/belc
I also suggest you to look at Winsvc.pas file in the delphi\source\rtl\win . there should all functions be decribed.
Regards, Zif.
Let me know, if I can help you further. Be more specific in your Question (Maybe I can do a little research)
There is beautiful class TNTService which was written by some German guy. It implements all the framework of the NT service and affords one to make a service in 15 minutes. Unfortunately i don't remember where from i have downloaded that but if you care i might send it to you
curedone,
The component you're refering to is the same as the library I proposed, see at : www.belcaf.com/products/english/ntset.html
or just www.belcaf.com
It's shareware....
Zif.
The component you're refering to is the same as the library I proposed, see at : www.belcaf.com/products/english/ntset.html
or just www.belcaf.com
It's shareware....
Zif.
ASKER
Dear BlackMan !
this is exactly the solution :-)
thank you very much
bernhard
this is exactly the solution :-)
thank you very much
bernhard
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
heh? Is this all we need? Great...
ASKER