Как запустить из подкаталога? - Общие вопросы Delphi - Страница 2

Yurk@ · 20.02.2013, 21:15

Код:

  ShellExecute(Handle, 'open', 'cmd /u /c Skype.exe /datapath:"Profile"  /username:*** /password:**** /removable', nil, PChar(ExtractFilePath(Application.ExeName)+'1\Add'), SW_SHOW);

если не запускает - копай в сторону параметров что у тебя в командной строке.
ориганальная команда

Код:

ShellExecute(Handle, 'open', 'Skype.exe', nil, PChar(ExtractFilePath(Application.ExeName)+'1\add\'), SW_SHOW);

запускает всё отлично

foxes · 20.02.2013, 23:50

Спасибо, всем Вам, разобрался.

Yurk@ · 21.02.2013, 00:16

а поделиться с остальными правильным решением не хочешь?

Аватар · 21.02.2013, 00:25

Yurk@ +1, так #11 и есть правильное решение

21.02.2013, 00:16	#13
Yurk@ Участник клуба Регистрация: 19.12.2007 Сообщений: 1,100	а поделиться с остальными правильным решением не хочешь? На форуме: Помогаю за спасибо ICQ\Skype: Это моё личное время ...

21.02.2013, 00:25	#14
Аватар Старожил Регистрация: 17.11.2010 Сообщений: 18,922	Yurk@ +1, так #11 и есть правильное решение Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
как запустить файл	ikar16	Общие вопросы Delphi	2	23.01.2011 17:20
WH_JOURNALRECORD. Как получить VirtualCode нажатой кнопки? Или как запустить toAscii только с ScanCode?	TwiX	Общие вопросы Delphi	7	09.06.2010 23:31
Как запустить приложение делфи в фоновом режиме(как процесс)?	Diakon	Общие вопросы Delphi	4	16.11.2009 13:06
Удаление подкаталога из реестра	aesoem	Общие вопросы Delphi	4	07.02.2008 17:07
Как запустить EXE	XATAB	Общие вопросы Delphi	4	08.07.2007 23:54

20.02.2013, 21:15	#11
Yurk@ Участник клуба Регистрация: 19.12.2007 Сообщений: 1,100	Код: `ShellExecute(Handle, 'open', 'cmd /u /c Skype.exe /datapath:"Profile" /username:* /password:** /removable', nil, PChar(ExtractFilePath(Application.ExeName)+'1\Add'), SW_SHOW);` если не запускает - копай в сторону параметров что у тебя в командной строке. ориганальная команда Код: `ShellExecute(Handle, 'open', 'Skype.exe', nil, PChar(ExtractFilePath(Application.ExeName)+'1\add\'), SW_SHOW);` запускает всё отлично На форуме: Помогаю за спасибо ICQ\Skype: Это моё личное время ... Последний раз редактировалось Yurk@; 20.02.2013 в 21:18.

20.02.2013, 23:50	#12
foxes Пользователь Регистрация: 14.11.2008 Сообщений: 94	Спасибо, всем Вам, разобрался.