Hola nicktdigo.
Mirá, opté por duplicar en mi disco la ruta que presentas en tu ejemplo creando las carpetas necesarias
(C:\Documents and Settings\Intel\Escritorio\ Aplicacion como servicio).
Lo que no puedo, por razones obvias, es hacer lo mismo con "Project2.exe", dado que:
1) No tengo ese archivo.
2) No sé que acción deseas que realize.
Pero como el problema que tenés es que el código genera excepciones;
el ejemplo que te agrego sirve igual. ( se ejecuta sin arrojar ningún error ).
Código:
procedure TForm1.Button1Click(Sender: TObject);
var
Comando: string;
begin
Comando:= 'sc create Servicio1 binpath= "C:\Documents and Settings\Intel\Escritorio\Aplicacion como servicio\notepad.exe" start= disabled';
WinExec(PChar(Comando),SW_NORMAL);
end;
Como verás, es casi una copia fiel de tu línea, excepto claro está, por el ejecutable.
Bueno, a mi no me genera excepción de ningún tipo, ni de conversión ni de incompatibilidad de tipos...
Así que lamento no poder ayudarte más.
Saludos.