schtasks在cmd窗口中输入正常，但使用delphi的shellexecute命令不行，怎么办

schtasks在cmd窗口中输入正常，但使用delphi的shellexecute命令不行，怎么处理？
在cmd窗口中输入“SchTasks /Create /Tn myBackupApp /Sc MONTHLY /St 23:00:00 /Ru Administrator /Rp abc123 /Tr "E:\source_code\delphi\JAMIS\Bin\BackUp\BackUP.bat"”正常，


改成：CommandStr:= 'SchTasks /Create /Tn myBackupApp /Sc MONTHLY /St 23:00:00 /Ru Administrator /Rp abc123 /Tr "'+ExtractFilePath(Application.ExeName)+'BackUp\'+batfName+'"';
  ShellExecute(handle, 'Open',PChar(CommandStr),nil,nil,SW_NORMAL ); 运行没有出现cmd窗口，执行没有报错，但在任务计划中，看不到新增的任务。

为什么使用cmd人工输入正常，
使用delphi的shellexecute命令不正常呢，怎么处理？
谢谢

------解决方案--------------------
试试
ShellExecute(Handle, nil, 'cmd.exe', pchar('你的参数'), nil, SW_HIDE);