Как запустить другую программу?

@Darth Coder · Регистрация: 10.06.2011

Author24 — интернет-сервис помощи студентам

@zhan313 · 15.12.2011, 15:29

Exec(ProgramName, CmdLine);
Подойдет ? В Help пример есть.

@Darth Coder · 16.12.2011, 14:47 **[ТС]**

Не работает!
Делал так:

Pascal

1	exec('c:\1.exe','');

говорит Unknown id

@zhan313 · 20.12.2011, 09:28

Pascal

{$M $4000,0,0 }   { 16K stack, no heap }
uses dos;
begin
  SwapVectors;
  Exec('d:\bp\readme.com', '');
  SwapVectors;
  WriteLn('...back from Exec');
  if DosError <> 0 then{ Error? }
    WriteLn('Dos error #', DosError)
  else
    WriteLn('Exec successful. ',
            'Child process exit code = ',
            DosExitCode);
end.

@Darth Coder 290 / 271 / 107 Регистрация: 10.06.2011 Сообщений: 696
		1
	Как запустить другую программу? 15.12.2011, 14:34. Показов 3468. Ответов 3 Метки нет (Все метки) Как запустить другую программу? 0

@zhan313 85 / 85 / 38 Регистрация: 09.12.2011 Сообщений: 174
	15.12.2011, 15:29	2
	Exec(ProgramName, CmdLine); Подойдет ? В Help пример есть. 1

	20.12.2011, 09:28