| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как програмно запустить приложение? [D7]

Barracudic ©   (2007-10-18 18:46:00) 

Можно ли вообще, и как именно програмно запустить другое приложение или ярлык. Например ярлык программы на рабочем столе, или соединения с интернетом.

---

Dmitro   (2007-11-09 01:13:00) [1]

> Malik   (08.11.07 18:06) [6]

Полностью согласен...

или WinExec('explorer ' + 'то, че нам надаааа'

---

Malik   (2007-11-08 18:06:00) [2]

WinExec

---

NaRuTo   (2007-11-08 17:59:00) [3]

Запуск косынки:
procedure TForm1.Button1Click(Sender: TObject);
var
si : Tstartupinfo;
p : Tprocessinformation;
begin
FillChar( Si, SizeOf( Si ) , 0 );
with Si do begin
cb := SizeOf( Si);
dwFlags := startf_UseShowWindow;
wShowWindow := 4;
end;
Application.Minimize;
Createprocess(nil,'C:\Windows\system32\sol.exe',nil,nil,false,
Create_default_error_mode,nil,nil,si,p);
или
Createprocess(sol.exe',nil,nil,false,
Create_default_error_mode,nil,nil,si,p);

Waitforsingleobject(p.hProcess,infinite);
Application.Restore;
end;

---

Elec3C   (2007-10-20 01:01:00) [4]

> homm ©

LOL;)))

---

homm   (2007-10-18 21:36:00) [5]

> Как програмно запустить приложение? Можно ли вообще,

Нет, все приложения запускаются только аппаратно, ударом ноги по корпусу.

---

PZ   (2007-10-18 21:11:00) [6]

Запустить ярлык:
ShellExecute(0, nil,
     'C:\Documents and Settings\<Имя_пользователя>\Рабочий стол\<Имя_ярлыка>.lnk',
     nil, nil, SW_SHOWNORMAL);

---

Desdechado   (2007-10-18 18:54:00) [7]

ShellExecute
CreateProcess

---

Наверх