Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 25.10.2012, 05:49
Аватар для Erilar
Erilar Erilar вне форума
Новичок
 
Регистрация: 30.03.2011
Сообщения: 91
Версия Delphi: 7
Репутация: 10
Вопрос Открыть через командную строку

Как можно открыть командную строку "CMD" и через него, например, запустить программу. "START EXPLORER.EXE" Или какую либо другую программу.
__________________
Если программа даёт неверный результат - в ней ошибка. Если же результат правильный - ошибок, как минимум, две.
Ответить с цитированием
  #2  
Старый 25.10.2012, 06:02
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от Erilar
Как можно открыть командную строку "CMD" и через него, например, запустить программу. "START EXPLORER.EXE" Или какую либо другую программу.
А почему именно через "CMD"?
Почему бы не запускать "EXPLORER.EXE Или какую либо другую программу" сразу с помощью CreateProcess, ShellExecute или WinExec?
Ответить с цитированием
  #3  
Старый 25.10.2012, 06:09
Аватар для Erilar
Erilar Erilar вне форума
Новичок
 
Регистрация: 30.03.2011
Сообщения: 91
Версия Delphi: 7
Репутация: 10
По умолчанию

Цитата:
Сообщение от poli-smen
А почему именно через "CMD"?
Почему бы не запускать "EXPLORER.EXE Или какую либо другую программу" сразу с помощью CreateProcess, ShellExecute или WinExec?
Потому что там будут и другие функции, которые мне более знакомы на CMD.
__________________
Если программа даёт неверный результат - в ней ошибка. Если же результат правильный - ошибок, как минимум, две.
Ответить с цитированием
  #4  
Старый 25.10.2012, 06:52
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

Код:
procedure run(...);
//CreateProcess, ShellExecute или WinExec
end

run('cmd /c exlporer')
__________________
>woweook<
Ответить с цитированием
  #5  
Старый 25.10.2012, 07:06
Аватар для Erilar
Erilar Erilar вне форума
Новичок
 
Регистрация: 30.03.2011
Сообщения: 91
Версия Delphi: 7
Репутация: 10
По умолчанию

Здесь понял. Но как например создать папку в CMD. Можно код?
__________________
Если программа даёт неверный результат - в ней ошибка. Если же результат правильный - ошибок, как минимум, две.

Последний раз редактировалось Erilar, 25.10.2012 в 07:18.
Ответить с цитированием
  #6  
Старый 25.10.2012, 07:19
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

Код:
procedure run(...);
//Google, CreateProcess, ShellExecute или WinExec
end
 
run('cmd /k my.bat')
а с bat файлами что не так?
__________________
>woweook<

Последний раз редактировалось Pyro, 25.10.2012 в 07:22.
Ответить с цитированием
  #7  
Старый 25.10.2012, 07:20
Аватар для Erilar
Erilar Erilar вне форума
Новичок
 
Регистрация: 30.03.2011
Сообщения: 91
Версия Delphi: 7
Репутация: 10
По умолчанию

Цитата:
Сообщение от Pyro
а с bat файлами что не так?
Нужно через делфи, не создавая бат-файлы.
__________________
Если программа даёт неверный результат - в ней ошибка. Если же результат правильный - ошибок, как минимум, две.
Ответить с цитированием
  #8  
Старый 25.10.2012, 07:37
Аватар для Erilar
Erilar Erilar вне форума
Новичок
 
Регистрация: 30.03.2011
Сообщения: 91
Версия Delphi: 7
Репутация: 10
По умолчанию

Получилось:
Код:
ShellExecute(handle, 'open', 'cmd.exe', '/k "md \desktop\1"', NIL, SW_SHOW);
__________________
Если программа даёт неверный результат - в ней ошибка. Если же результат правильный - ошибок, как минимум, две.
Ответить с цитированием
  #9  
Старый 25.10.2012, 07:37
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

Код:
mkdir('\desktop\1');
__________________
>woweook<

Последний раз редактировалось Pyro, 25.10.2012 в 07:41.
Ответить с цитированием
  #10  
Старый 25.10.2012, 07:44
Аватар для Erilar
Erilar Erilar вне форума
Новичок
 
Регистрация: 30.03.2011
Сообщения: 91
Версия Delphi: 7
Репутация: 10
По умолчанию

Цитата:
Сообщение от Pyro
Код:
mkdir('\desktop\1');
Просто мне нужно запускать файлы с параметрами, Например установочный файл.
START SETUP.EXE /S - устанавливается без вопросов типо, в какую директорию...
__________________
Если программа даёт неверный результат - в ней ошибка. Если же результат правильный - ошибок, как минимум, две.
Ответить с цитированием
  #11  
Старый 25.10.2012, 07:47
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

Код:
ShellExecute(handle, 'open', 'SETUP.exe', '/S', NIL, SW_SHOW);
__________________
>woweook<
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 09:38.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025