Раймонд слишком скромен, чтобы принимать репутацию; поэтому я использую его ответ как свой собственный.

ченная версияВерификатор приложения говорит, что при запуске кода есть нарушение прав доступа: var shi: TShellExecuteInfo; begin shi := Default(TShellExecuteInfo); shi.cbSize := SizeOf(TShellExecuteInfo); shi.lpFile := ...