Problemas con el Ampersand en un String

[cslbcn]

Hola. Estoy haciendo en Delphi 7 un menú para lanzar aplicaciones hechas en Delphi. Cuando voy a lanzar una aplicación, uso el componente ShellExecute:

ShellExecute(Form1.Handle, nil,PChar(ruta),nil, nil, SW_SHOWNORMAL);

ruta es una variable del tipo String con el siguiente contenido:

Código Delphi [-]
ruta := 'C:\programas\delphi\mantenimiento.exe ?123456789REAL%';

Siendo 123456789REAL el ID del usuario

De esta forma, no se ejecuta nada, ni si quiera sale error, no pasa nada de nada.
Si hago un ShowMessage(ruta) me sale:

C:\programas\delphi\mantenimiento.exe 123456789REAL%

¡¡¡Me desaparece el & !!!! Imagino que es ese el problema, aunque parece raro que no pete el programa... Como puedo conseguir que no me borre el & ??

Muchas gracias

[[xEsk]]

Hola,

Los parámetros de lanzamiento van "aparte" en la llamada del ShellExecute.

Código Delphi [-]
ruta:='C:\programas\delphi\mantenimiento.exe';
params:='123456789REAL%';

ShellExecute(Form1.Handle, nil,PChar(ruta), PChar(params), nil, SW_SHOWNORMAL);

Más información.

Saludos,
Xesc.

[ecfisa]

Hola cslbcn.

Si querés pasar el parámetro como en tu post, podés hacerlo, pero usando WinExec.

Código Delphi [-]
    ruta:= 'C:\programas\delphi\mantenimiento.exe ?123456789REAL%';
    WinExec(PChar(ruta), SW_NORMAL);

Ahora, usando ShellExecute, es como te expuso xEsk.

Saludos.