Hola nuevamente beatriz, no he encontrado un parámetro válido en ShellExecute para crear un fichero, pero te voy a dar una idea:
Código Delphi
[-]if not FileExists(ruta + nombrefichero) then CreateFile(ruta + nombrefichero);
ShellExecute('')
Espero te sirva.
Saludos