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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 13.07.2010, 12:20   #1
arxidevill
Пользователь
 
Регистрация: 11.05.2010
Сообщений: 11
По умолчанию ShellExecute

Нужно в одной программе запустить другую...
ShellExecute(Handle, 'open', PChar('Games\burime\1.exe'), nil, nil, SW_SHOW);

работает....но при запуске 1.exe вылетает ошибка....т.к. 1.exe запускает еще с собой fonbyr.gif ...пишет не может открыть...
arxidevill вне форума Ответить с цитированием
Старый 13.07.2010, 12:26   #2
Korben5E
Форумчанин
 
Аватар для Korben5E
 
Регистрация: 13.07.2010
Сообщений: 346
По умолчанию

1. указывай полный путь к имени файла
2. 5й параметр должен содержать путь к папке с твоей программой
иначе она запускается там где ты ее вызвал ну и не находит файл потому как открывает его так-же по относительному пути
Non est culpa vin, sed culpa bibentis
Korben5E вне форума Ответить с цитированием
Старый 13.07.2010, 12:34   #3
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Подитожу Корбена
ShellExecute(Handle, 'open', PChar('Games\burime\1.exe'), nil, PChar('Games\burime\'), SW_SHOW);
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 14.07.2010, 10:59   #4
arxidevill
Пользователь
 
Регистрация: 11.05.2010
Сообщений: 11
По умолчанию

Stilet
ShellExecute(Handle, 'open', PChar('Games\Burime\Буримэ.exe'), nil,PChar('Games\Burime\'), SW_SHOW);
Прописал так-же...теперь программа не запускается....
arxidevill вне форума Ответить с цитированием
Старый 14.07.2010, 11:03   #5
Korben5E
Форумчанин
 
Аватар для Korben5E
 
Регистрация: 13.07.2010
Сообщений: 346
По умолчанию

Цитата:
Сообщение от arxidevill Посмотреть сообщение
Stilet
ShellExecute(Handle, 'open', PChar('Games\Burime\Буримэ.exe'), nil,PChar('Games\Burime\'), SW_SHOW);
Прописал так-же...теперь программа не запускается....
для начала попробуй экзешник латинскими буквами назвать
Non est culpa vin, sed culpa bibentis
Korben5E вне форума Ответить с цитированием
Старый 14.07.2010, 11:23   #6
arxidevill
Пользователь
 
Регистрация: 11.05.2010
Сообщений: 11
По умолчанию

Цитата:
Сообщение от Korben5E Посмотреть сообщение
для начала попробуй экзешник латинскими буквами назвать
нет никакой реакции..просто висит моя программа и не открывает...все буквы написаны були уже на латинск. яз.
arxidevill вне форума Ответить с цитированием
Старый 14.07.2010, 12:00   #7
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Код:
if ShellExecute(Handle, 'open', PChar('Games\Burime\Буримэ.exe'), nil,PChar('Games\Burime\'), SW_SHOW)<=32 
 then RaiseLastWin32Error;
Хотя бы посмотришь какую ошибку выдает.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
ShellExecute Fakov Общие вопросы Delphi 13 18.11.2022 16:47
shellExecute GAGARIN-NEW Общие вопросы Delphi 3 18.10.2008 12:04
ShellExecute SNUPY Общие вопросы Delphi 4 19.02.2008 22:59
ShellExecute Volkogriz Общие вопросы Delphi 4 31.10.2007 13:33
ShellExecute doncova1 БД в Delphi 4 29.11.2006 18:20