Как я могу отправить параметры в CMD? например, отправить путь и запустить его с этого пути? Как я могу выполнить команды CMD? Спасибо
Чтобы запустить cmd.exe
и немедленно выполнить команду, используйте флаг / K
:
procedure TForm1.FormCreate(Sender: TObject);
begin
ShellExecute(Handle, nil, 'cmd.exe', '/K cd C:\WINDOWS', nil, SW_SHOWNORMAL);
end;
Чтобы запустить команду в cmd.exe
, а затем сразу же закройте окно консоли, используйте флаг / C
:
procedure TForm1.FormCreate(Sender: TObject);
begin
ShellExecute(Handle, nil, 'cmd.exe', '/C del myfile.txt', nil, SW_SHOWNORMAL);
end;