Скачать: CL | DM;

Вопрос про shellexecute   Найти похожие ветки 

← →
dimich ©   (2002-06-11 11:27) [0]

Мастера как можно реализовать запуск той или иной программы, я понимаю что это надо делать через shellexecute, но вопрос вот в чем некоторые программы необходимо запускать именно из каталога, где находится сам екзешник программы.
и если я пишу такую вещь:
shellexecute(handle,"open",apchar,nil,nil,sw_restore);
то некоторые проги жалуются что не находят файлы (да это и понятно)и немогут запустится.
Как с этим бороться подскажите....плиз.
Заранее благодарен.

---

← →
UserL   (2002-06-11 11:35) [1]

Попробуй передать полный путь к запускаемой проге.
Должно сработать

---

← →
dimich ©   (2002-06-11 11:45) [2]

>>UserL
Так я в переменную apchar и кладу полный путь.
Подробнее у меня код выглядит так:
procedure TForm1.TreeView1DblClick(Sender: TObject);
var
apchar:array[0..254] of char;
begin
table1.locate("kod_s",treeview1.selected.parent.index+1,[loCaseInsensitive]);
table2.locate("game",treeview1.selected.Text ,[loCaseInsensitive]);
strpcopy(apchar,table2.fields[4].asstring);
shellexecute(handle,"open",apchar,nil,nil,sw_restore);
form1.FormStyle:=fsnormal;
end;

---

← →
VID ©   (2002-06-11 15:02) [3]

Попробуй перед вызовом ShellExecute написать
SetCurrentDir(ExtractFilePath(apchar));

---

← →
dimich ©   (2002-06-13 12:00) [4]

Согласен, а еще есть chDir(куда идти). Спасибо всем за помощь, сам справился:)))

---

← →
Sasha9 ©   (2002-06-13 14:58) [5]

VID ©
не обязательно, нужно просто вместо второго nil указать путь

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c