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

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

Запуск файла [D7, Win95/98]

Alexander2030 ©   (2003-02-09 16:35:00) 

Как с помощью делфи запускать другие exe файлы, текстовые, bat файлы и т.д..
Подскажите пожалуйста

---

Pakshin A. S.   (2003-02-14 20:17:00) [1]

Эта процедура запускиет калькулятор но может и многое другое, например, bat-файлы:

procedure RunCalc;
var
put:String;
si:TStartUpInfo;
pi:TProcessInformation;
begin
SetLength(put, 255);
GetWindowsDirectory(Pchar(put), 255);
SetLength(Put, StrLen(PChar(Put)));
Put:=Put + "\CALC.EXE";
ZeroMemory(@si, SizeOf(si));
si.cb:=SizeOf(si);
si.wShowWindow:=SW_Normal;
si.dwFlags:=STARTF_USESHOWWINDOW;
CreateProcess(nil, PChar(Put), nil, nil, False, IDLE_PRIORITY_CLASS or DETACHED_PROCESS, nil , nil, si, pi);
end;

---

soho   (2003-02-09 17:03:00) [2]

Используй функции ShellExecute() или WinExec();
Пример:

WinExec(PChar("c:\file.txt"), SW_SHOW);


---

Наверх