Código Delphi [-]OpenSCManager(PChar(sMachine), nil, SC_MANAGER_ENUMERATE_SERVICE);
OpenSCManager(PChar(sMachine), nil, SC_MANAGER_ENUMERATE_SERVICE);