Текущий архив: 2003.09.04;
Скачать: CL | DM;

Вниз

После экзэшника   Найти похожие ветки 

← →
Zheks   (2003-08-22 09:43) [0]

доброе утро!
В процедуре я вызываю экзэшник(winexec("*.exe", 1);), этот экзэшник создаёт файл, который мне нужно перенести(именно в этой процедуре, сразу за winexec("*.exe", 1);), но что бы экзэшник успел создать этот файл?

---

← →
Zacho ©   (2003-08-22 09:47) [1]

Вместо winexec используй CreateProcess или ShellExecuteEx и WaitForSingleObject. Пример есть в любом FAQ"е по Дельфи.

---

← →
Zheks   (2003-08-22 10:05) [2]

to Zacho: блин, как назло faq говорит: извените, ошибка на странице...

Черкани если не трудно, как дождаться пока отгремит внешний процесс

---

← →
MVova ©   (2003-08-22 10:19) [3]

procedure Run(Path : AnsiString; Wait : Boolean);
var
si : Tstartupinfo;
p : Tprocessinformation;
begin
FillChar( Si, SizeOf( Si ) , 0 );
with Si do
begin
cb := SizeOf( Si);
dwFlags := startf_UseShowWindow;
wShowWindow := 4;
end;
Createprocess(nil,PChar(Path),nil,nil,false,Create_default_error_mode, nil,nil,si,p);
if Wait then
Waitforsingleobject(p.hProcess,infinite);
end;

---

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

Текущий архив: 2003.09.04;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.028 c