🚀 go-pugleaf

"Stefano Bonifazi" <stefboombastic@libero.it> wrote in message
news:3ed1e176@newsgroups.borland.com...

> First of all I'd need to get the .exe name of my service
> within the service itself ... of course I tried with the
> Application->ExeName, but the compiler complains
> about an ambiguity between 'Application' and
> 'Svcmgr::Application' , if then I put the scope resolution:
> Svcmgr::Application->EXEName it screams as
> 'ExeName is not a member of 'TServiceApplication'

You need to use the "Forms" namespace, not the "Svcmgr" namespace:

    Forms::Application->ExeName

The alternative is to not use TApplication::ExeName at all, but use
ParamStr(0) instead (which is what TApplication::ExeName calls insternally
anyway).

>  Then from within another application I would like to
> install my service (and then starting it), but not launching
> it from ShellExecuteEx (or similar) with the "/INSTALL"
> parameter, as I would like to check if it's installed
> successfully! But I didn't find any useful API...

The "/install" parameter simply indicates that service executable should
call the Win32 API function CreateService() with the relavant values, and
then terminate the executable afterwards without actually running the
service.  If you know all of the setup values you want to use for the
service, then you can simply all CreateService() yourself directly.

> So I thought to install it that way, and the using the
> OpenSCManager and OpenService functions to check
> the installation result

That is another viable possibility, yes.

> but OpenService always fails and GetLastError always
> reports ERROR_SERVICE_DOES_NOT_EXIST

What does your exact code look like?  You're most likely not passing the
service name correctly.

> by the way what's the difference with ERROR_INVALID_NAME?

They mean exactly what their names suggest:

ERROR_SERVICE_DOES_NOT_EXIST means that the requested service does not
exist.

ERROR_INVALID_NAME means that the requested name itself is not formatted
correct (most likely has invalid characters in it) and thus the attempt to
open the service cannot proceed.

> Obviously I tried to change the dwDesiredAccess
> parameter, but the result does not change!

What does your EXACT code look like?


Gambit