Управление процессами

← →
Волков Михаил (2003-02-18 11:52) [0]

Я создаю процесс:
CODE>
var
si : Tstartupinfo;
p : Tprocessinformation;
begin
FillChar( Si, SizeOf( Si ) , 0 );
with Si do begin
cb := SizeOf( Si);
dwFlags := DETACHED_PROCESS ;
wShowWindow := 4;
end;
Application.Minimize;
Createprocess(nil,"cmd.exe /k dir C:\",nil,nil,false,CREATE_NEW_CONSOLE,nil,nil,si,p);

Waitforsingleobject(p.hProcess,infinite);

Командную строку. Как мне получить в мое основное приложение результаты
Выполнения команды (dir С:\). Или подскажите другой способ управлять
Командной строкой (и получать результаты).
Заранее благодарю, всех кто откликнется!

← →
Roma © (2003-02-18 12:08) [1]

Можно перенаправить вывод в файл ("cmd.exe /k dir C:\ >>" + MyTempFileName), временное имя файла получить с помощью GetTempFileName...

← →
DarkGreen © (2003-02-18 13:54) [2]

А самому написать скан каталога используя FindFirst, FindNext и FindClose слабо?

typedef struct _STARTUPINFO { // si
...
HANDLE hStdInput;
HANDLE hStdOutput;
...
} STARTUPINFO, *LPSTARTUPINFO;

Управление процессами Найти похожие ветки