10 lines
147 B
Text
10 lines
147 B
Text
|
program ExecuteSystemCommand;
|
||
|
|
|
||
|
|
{$APPTYPE CONSOLE}
|
||
|
|
|
||
|
|
uses Windows, ShellApi;
|
||
|
|
|
||
|
|
begin
|
||
|
|
ShellExecute(0, nil, 'cmd.exe', ' /c dir', nil, SW_HIDE);
|
||
|
|
end.
|