[HTTqp]

Кто нибудь подскажет как передать данные в winexec чтобы выполнилось действие.
Есть программа делает каждый час бекап файла, но не получается добавить ее в планировщик задач через cmd.

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
  buf: String;
begin
  buf:='cmd /c "Schtasks /Create /sc minute /mo 60 /tn "Backup_File" /tr "'+GetWin('%APPDATA%')+'\FileZilla\Backup_File\' + 'Backup.exe""';
  WinExec(PAnsiChar(buf), Sw_Show);
  ShellExecute(Handle, nil, PChar(buf), nil,nil, Sw_Show);
end;

главное если просто выполнить команду

Код:

'cmd /c "Schtasks /Create /sc minute /mo 60 /tn "Backup_File" /tr "'+GetWin('%APPDATA%')+'\FileZilla\Backup_File\' + 'Backup.exe""'

через Win+R -> "Выполнить" программа добавляется в планировщик задач без проблем, а программно не хочет!

[SCrat.ORS]

Если мне не изменяет память, то выполняешь

Код:

ShellExecute(0,'open',PChar(Regular1),PChar(paramt),Nil,SW_SHOWDEFAULT)

, где Regular1 - Это запускаемая программа, а paramt - Это параметры которые ей передаёшь.
т.е.

Код:

Regular1:='cmd.exe'
paramt:='/c "Schtasks /Create /sc minute /mo 60 /tn "Backup_File" /tr "'+GetWin('%APPDATA%')+'\FileZilla\Backup_File\' + 'Backup.exe""'

[HTTqp]

SCrat.ORS, благодарю то что надо)