Вопрос № 91304: Доброго времени суток, Уважаемые Эксперты!
Возникла такая проблема. Надо выполнить комаду, введённую из Edit и вывести её результат в файл. Использую так: ShellExecute(0, 0, PChar(Edit1.Text), '>> file.txt',0,1) Комманда выполняется, но фай...
Вопрос № 91.304
Доброго времени суток, Уважаемые Эксперты!
Возникла такая проблема. Надо выполнить комаду, введённую из Edit и вывести её результат в файл. Использую так: ShellExecute(0, 0, PChar(Edit1.Text), '>> file.txt',0,1) Комманда выполняется, но файл не создаётся. Пожайлуста, подскажите, кто чем сможет!
Отвечает: Виктор Пырлик
Здравствуйте, Romulus_1001!
ShellExecute это не вызов командного процессора, ваше же требование перенаправить вывод в файл ориентировано именно на работу cmd (command). Следовательно, вы должны однозначно указать процесс исполнения: Например так:
ShellExecute(0, 0, 'cmd.exe', PChar(Edit1.Text + ‘ >> file.txt'), nil, SW_NORMAL), беда в том, что будет моргание – экран консоли будет показан на время отработки команды, попробуйте поиграть с параметрами окна (последний), например SW_HIDE и т.д. Учтите, что в системах NT (XP) будет работать и cmd и command в системах WinX (95 – 98) только command.
--------- Если ничего не помогло - надо читать инструкцию
Ответ отправил: Виктор Пырлик (статус: 3-ий класс)
Ответ отправлен: 17.06.2007, 13:25