Why Cant Start A service.

[ZuBi]

i wrote an service, now when trying to run him i get this:

Code:

C:\svch\dll>net start xmldrv
The Who care ha it service is starting.
The Who care ha it service could not be started.

A system error has occurred.

System error 127 has occurred.

The specified procedure could not be found.

i have regsitred service main and i dont know what couse that, did anyone mess with somthingg like this ?

Main code:

Code:

begin
installservice;
//uninstallservice;

FillChar(DispatchTable, SizeOf(DispatchTable), 0);
DispatchTable[0].lpServiceName:= PChar(S_Name);
DispatchTable[0].lpServiceProc:= @ServiceProc;
StartServiceCtrlDispatcher(DispatchTable[0]);
end.

what can be wrong ?