Запуск DOS приложения под Win2000

← →
АлеКо (2003-07-16 04:20) [0]

Привет всезнайки!

Столкнулся с проблеммой под Win2000 не срабатывает команда:
procedure RunArj(S: string);
var si:STARTUPINFO;
pi:PROCESS_INFORMATION;
cmdline,Path:string;
begin
path:=ExtractFilePath(Application.ExeName);
ZeroMemory(@si,sizeof(si));
si.cb:=SizeOf(si);
si.wShowWindow := SW_HIDE;
si.dwFlags:=STARTF_USESHOWWINDOW;
cmdline:="command.com /c ""+path+"arj.exe" a -y ""+path+"out\"+S+"" ""+path+"out\"+S+".dbf"";
CreateProcessA( nil, // No module name (use command line).
PChar(cmdline), // Command line.
nil, // Process handle not inheritable.
nil, // Thread handle not inheritable.
False, // Set handle inheritance to FALSE.
CREATE_NEW_CONSOLE, // No creation flags.
nil, // Use parent"s environment block.
nil, // Use parent"s starting directory.
si, // Pointer to STARTUPINFO structure.
pi ); // Pointer to PROCESS_INFORMATION structure.
WaitForSingleObject( pi.hProcess, INFINITE );
CloseHandle( pi.hProcess );
CloseHandle( pi.hThread );
DeleteFile(path+"\out\"+S+".dbf");
end;

а конкретно не запускается arj хотя под 98 это работает.

← →
Германн (2003-07-16 04:30) [1]

У NT нет "command.com". Есть "cmd.exe".

← →
Rouse_ (2003-07-16 04:32) [2]

Ээээ проверить не на чем :(

UNICODE?

Желаю успехов

← →
АлеКо (2003-07-18 03:47) [3]

Я хотел бы вернуться к этому вопросу.

В результате экспериментов устаноыил что данный пример на некоторых Вин2000 срабатывает а на некоторых нет.

Может дело в настройках винды.
Например в файлах autoexec.nt или config.nt.

Спасибо!

← →
Anatoly Podgoretsky (2003-07-18 10:01) [4]

Германн © (16.07.03 04:30)
Точнее у Нт нет cmd.exe, а у нет command.com, зато есть командный процессор, иногда его имя совпадает с этими.

Запуск DOS приложения под Win2000 Найти похожие ветки