Nein ist definitiv nicht der Service
Begründung :
1. Ich habe den Service einmal mit der Eingabeaufforderung installiert und da funktionierte es.
2. Habe ich das Problem gerade gelöst:
Ich hatte anfangs :
Delphi-Quellcode:
CreateService(
schSCManager,
// SCManager database
SERVICE_NAME,
// name of service
DISPLAY_NAME,
// service name to display
SERVICE_ALL_ACCESS,
// desired access
SERVICE_WIN32_OWN_PROCESS,
// service type
SERVICE_AUTO_START,
// start type
SERVICE_ERROR_NORMAL,
// error control type
lpszBinaryPathName,
// service's binary
nil,
// no load ordering group
nil,
// no tag identifier
nil,
// no dependencies
nil,
// LocalSystem account
nil);
// no password
Richtig ist:
Delphi-Quellcode:
CreateService(
schSCManager,
// SCManager database
SERVICE_NAME,
// name of service
DISPLAY_NAME,
// service name to display
SC_MANAGER_CONNECT
or
SC_MANAGER_ENUMERATE_SERVICE
or
SC_MANAGER_MODIFY_BOOT_CONFIG
or
SC_MANAGER_QUERY_LOCK_STATUS
or
STANDARD_RIGHTS_READ,
// desired access
SERVICE_WIN32_OWN_PROCESS,
// service type
SERVICE_AUTO_START,
// start type
SERVICE_ERROR_NORMAL,
// error control type
lpszBinaryPathName,
// service's binary
nil,
// no load ordering group
nil,
// no tag identifier
nil,
// no dependencies
nil,
// LocalSystem account
nil);
// no password
da SERVICE_ALL_ACCESS nur für Admins gilt , ich aber nicht als Admin sondern als LocalSystem den Dienst starte muss ich die Zugriffe für LocalSystem angeben und die sind :
SC_MANAGER_CONNECT or
SC_MANAGER_ENUMERATE_SERVICE or
SC_MANAGER_MODIFY_BOOT_CONFIG or
SC_MANAGER_QUERY_LOCK_STATUS or
STANDARD_RIGHTS_READ
Auch wenn ich es letztendlich doch alleine geschafft habe sag ich nochmal danke