Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.09.2009, 18:55   #1
Vol666
Гуру Разврата
Форумчанин
 
Аватар для Vol666
 
Регистрация: 29.07.2009
Сообщений: 373
Восклицание

Всё с HWND разобрался теперь с ShellExecute...
Path:=Memo1.Lines.Strings[1];// Path содержит такой адресс C:\Program Files
if (checkbox1.Checked=true) and (radiobutton1.Checked=true) then
ShellExecute(form1.Handle, Pchar('open'), PChar('ter.exe'), nil, PChar(''+Path), SW_ShowMinimized);

и не работает, не запускает...
что это может быть?


P.S. большое спасибо пеплу феникса за его программу)

в uses ShellApi прописан...
Фредди вернулся))) И Готов Убивать!!!

Последний раз редактировалось Stilet; 24.09.2009 в 10:02.
Vol666 вне форума Ответить с цитированием
Старый 23.09.2009, 19:06   #2
uberchel
Участник клуба
 
Аватар для uberchel
 
Регистрация: 19.01.2009
Сообщений: 1,486
По умолчанию

Код:
Path:=Memo1.Lines.Strings[1];// Path содержит такой адресс C:\Program Files
if (checkbox1.Checked=true) and (radiobutton1.Checked=true) then
ShellExecute(0, 'open', PChar('ter.exe'), nil, PChar(''+Path), 2);
uberchel вне форума Ответить с цитированием
Старый 23.09.2009, 19:07   #3
Vol666
Гуру Разврата
Форумчанин
 
Аватар для Vol666
 
Регистрация: 29.07.2009
Сообщений: 373
По умолчанию

что цифры 0 и 2 означают?
Фредди вернулся))) И Готов Убивать!!!
Vol666 вне форума Ответить с цитированием
Старый 23.09.2009, 19:09   #4
Terran
Участник клуба
 
Аватар для Terran
 
Регистрация: 28.11.2007
Сообщений: 1,521
По умолчанию

Цитата:
Сообщение от Vol666 Посмотреть сообщение
что цифры 0 и 2 означают?
В данном примере 0 - это хэндл, а 2 - это параметр запуска.
Всегда рад помочь!
Terran вне форума Ответить с цитированием
Старый 23.09.2009, 19:11   #5
Vol666
Гуру Разврата
Форумчанин
 
Аватар для Vol666
 
Регистрация: 29.07.2009
Сообщений: 373
По умолчанию

0 реакции даже с такими параметрами...
Есть ещё способы запустить приложения?
Фредди вернулся))) И Готов Убивать!!!
Vol666 вне форума Ответить с цитированием
Старый 23.09.2009, 19:14   #6
Terran
Участник клуба
 
Аватар для Terran
 
Регистрация: 28.11.2007
Сообщений: 1,521
По умолчанию

Меняя хэндл реакции может и не быть, а меняя параметр запуска реакция должна быть.
Цитата:
Есть ещё способы запустить приложения?
Их много. К примеру:
Код:
{ ShowWindow() Commands }
  {$EXTERNALSYM SW_HIDE}
  SW_HIDE = 0;
  {$EXTERNALSYM SW_SHOWNORMAL}
  SW_SHOWNORMAL = 1;
  {$EXTERNALSYM SW_NORMAL}
  SW_NORMAL = 1;
  {$EXTERNALSYM SW_SHOWMINIMIZED}
  SW_SHOWMINIMIZED = 2;
  {$EXTERNALSYM SW_SHOWMAXIMIZED}
  SW_SHOWMAXIMIZED = 3;
  {$EXTERNALSYM SW_MAXIMIZE}
  SW_MAXIMIZE = 3;
  {$EXTERNALSYM SW_SHOWNOACTIVATE}
  SW_SHOWNOACTIVATE = 4;
  {$EXTERNALSYM SW_SHOW}
  SW_SHOW = 5;
  {$EXTERNALSYM SW_MINIMIZE}
  SW_MINIMIZE = 6;
  {$EXTERNALSYM SW_SHOWMINNOACTIVE}
  SW_SHOWMINNOACTIVE = 7;
  {$EXTERNALSYM SW_SHOWNA}
  SW_SHOWNA = 8;
  {$EXTERNALSYM SW_RESTORE}
  SW_RESTORE = 9;
  {$EXTERNALSYM SW_SHOWDEFAULT}
  SW_SHOWDEFAULT = 10;
  {$EXTERNALSYM SW_MAX}
  SW_MAX = 10;
Всегда рад помочь!
Terran вне форума Ответить с цитированием
Старый 23.09.2009, 19:15   #7
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

стоп...а файл где находится?
полный путь.
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 23.09.2009, 19:18   #8
Vol666
Гуру Разврата
Форумчанин
 
Аватар для Vol666
 
Регистрация: 29.07.2009
Сообщений: 373
По умолчанию

непонял? всмысле полный путь...
C:\Program Files\ter.exe
Фредди вернулся))) И Готов Убивать!!!
Vol666 вне форума Ответить с цитированием
Старый 23.09.2009, 19:18   #9
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

тогда так надо:
Код:
ShellExecute(0, 'open', PChar(Path+'/ter.exe'), nil, PChar(Path), 2);
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.

Последний раз редактировалось Пепел Феникса; 23.09.2009 в 19:21.
Пепел Феникса вне форума Ответить с цитированием
Старый 23.09.2009, 19:36   #10
Vol666
Гуру Разврата
Форумчанин
 
Аватар для Vol666
 
Регистрация: 29.07.2009
Сообщений: 373
По умолчанию

Тоже не пашет((( Попробую через WinExec
Фредди вернулся))) И Готов Убивать!!!
Vol666 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
ShellExecute san72 Общие вопросы Delphi 6 16.05.2009 22:55
ShellExecute - параметр не работает? heart Win Api 2 12.03.2009 15:45
ShellExecute Zeraim Общие вопросы Delphi 1 07.05.2008 17:02
ShellExecute SNUPY Общие вопросы Delphi 4 19.02.2008 22:59
ShellExecute Volkogriz Общие вопросы Delphi 4 31.10.2007 13:33