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

Delphi Sources



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

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 01.02.2015, 16:26
Аватар для Alloc
Alloc Alloc вне форума
Начинающий
 
Регистрация: 17.09.2014
Сообщения: 104
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию Как запустить приложение через Cmd с параметрами?

Приветствую всех!

Пожалуйста, подскажите как запустить приложение с параметрами через командную строку таким образом:

Код:
cmd.exe /c start affinity 1 C:\Program Files\Project\Program.exe -minimize

программа должна запускаться и окна cmd не должно быть видно вообще.

Играл с WinExec и ShellExecute - не выходит...

Как правильно это сделать? Заранее благодарю.
Ответить с цитированием
  #2  
Старый 01.02.2015, 16:31
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

WinExec + SW_HIDE
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
Этот пользователь сказал Спасибо NumLock за это полезное сообщение:
Alloc (01.02.2015)
  #3  
Старый 01.02.2015, 17:45
Аватар для Alloc
Alloc Alloc вне форума
Начинающий
 
Регистрация: 17.09.2014
Сообщения: 104
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Цитата:
Сообщение от NumLock
WinExec + SW_HIDE

спасибо! Вроде как работает.. проверьте пожалуйста, правильно ли все сделал (что касается командной строки и самого кода)?

Код:
 WinExec(Pchar('cmd.exe /c start /affinity 1 /d "'+ExtractFileDir(Application.ExeName)+'" '+'Revenant.exe "'+Keys+'"'), SW_HIDE)

И еще вопрос: Как сюда прикрутить коды ошибок которые возвращает функция и дать соответствующее сообщение о них в MessageBox?
Ответить с цитированием
  #4  
Старый 01.02.2015, 18:10
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

Код:
if WinExec('...', SW_HIDE)<32 then RaiseLastOSError;
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
Этот пользователь сказал Спасибо NumLock за это полезное сообщение:
Alloc (01.02.2015)
  #5  
Старый 01.02.2015, 18:51
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

Для "32" должна же быть какая-то константа?
If the function succeeds, the return value is greater than 31.
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Ответить с цитированием
Этот пользователь сказал Спасибо M.A.D.M.A.N. за это полезное сообщение:
Alloc (03.02.2015)
  #6  
Старый 01.02.2015, 18:58
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

Цитата:
Return value

If the function succeeds, the return value is greater than 31.

If the function fails, the return value is one of the following error values.Return code/value Description
0
The system is out of memory or resources.
ERROR_BAD_FORMAT
The .exe file is invalid.
ERROR_FILE_NOT_FOUND
The specified file was not found.
ERROR_PATH_NOT_FOUND
The specified path was not found.

Цитата:
ERROR_BAD_FORMAT = 11;
ERROR_FILE_NOT_FOUND = 2;
ERROR_PATH_NOT_FOUND = 3;

достаточно с 32 сравнить
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
Этот пользователь сказал Спасибо NumLock за это полезное сообщение:
Alloc (03.02.2015)
Ответ


Delphi Sources

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

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

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

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


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


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

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

ВКонтакте   Facebook   Twitter