|
#1
|
|||
|
|||
Запуск файлов\exe
Я хочу написать свою программу для создания меню автозапуска для дисков CD\DVD. А как выполнять файл (открыть например .wmv в ассоциированной программе) или запускать программу (.exe)?
|
#2
|
||||
|
||||
WinExec, ShellExecute (ShellAPI)
Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#3
|
|||
|
|||
Спасибо! Респект +. Все работает!
|
#4
|
|||
|
|||
Цитата:
Трабла следующего характера: формирую переменную Path: string; из Path:=ArtistBox1.Items[ComboBox1.ItemIndex] + '\' + AlbumBox2.Items[ComboBox2.ItemIndex] + '\' + '00.m3u' (соответственно плэйлисты во всех папках имеются), далее TreeView1 через readLN(f,s); список *.mp3-композиций - выводит, системный плейер через ShellExecute(0,'open',pchar(Path),'','',SW_minimiz e); - исправно проигрывает, а вот ShellExecute(0,'','winamp\winamp.exe'{здесь префикс Z:\ для будущей болванки - можно опустить},pchar(Path),'','',SW_minimize); - вот тут: геморрой и не важно winamp2.ХХ или 5.ХХ, но в плэйлистэдиторе всего 5-6 (зависит от длины назв. альбома) "композиций" например: 1-Мы, 2-встретимся, 3-снова, 4- -, 5-94. Естественно все трэки по 0 сек и - тишина... Даже если сперва Path:=ExtractFilePath(Application.ExeName);а потом + комбобоксы и т.д. - всё равно... В чём дело, что не так и как-нить ету пабедень победить можно? P.S. Если только тупо 'С:\00.m3u' (вместо pchar(Path)) - тогда работает, но надобно бы через переменную. Как быть? Спасибо |
#5
|
||||
|
||||
Не уверен, но должно работать...
Код:
ShellExecute(Handle,'open', C:\winamp\winamp.exe', pchar(Path),nil,nil,SW_minimize); Помогаю за Спасибо |
#6
|
|||
|
|||
P.S. на тип переменной string/array[0..255] of Char; - глубоко наплевать, при чём Winexec вытворяет то же самое, а
СreateProcess(nil,wamp,nil,nil,false,NORMAL_PRIORI TY_CLASS,nil,path,si,pi); пока молчит - что здесь не так? ShellExecute(Handle,'open', C:\winamp\winamp.exe', .... как вариант: ExtractFilePath(Application.ExeName) + \winamp\winamp.exe - если речь идёт о DVD-болванке с autorun-ом Последний раз редактировалось UFO 007, 04.12.2010 в 19:47. |