Запуск консольного приложения

← →
начинающий565 (2007-08-06 23:06) [0]

Здравствуйте!

Как средствами Delphi запустить tracert.exe и по окончании трассировки скопировать текстовые данные в свое приложение.

Заранее спасибо.

← →
vicegen © (2007-08-06 23:48) [1]

запустить с параметром: tracert.exe > 1.txt, далее считать из 1.txt. Или грамотный вариант через пайпы... ищи в мсдн: "Creating a Child Process with Redirected Input and Output"

← →
Anatoly Podgoretsky © (2007-08-07 00:00) [2]

> vicegen (06.08.2007 23:48:01) [1]

Неверно, надо запускать командный процессор, функция перенаправления это его функция.

← →
vicegen © (2007-08-07 00:55) [3]

> Anatoly Podgoretsky © (07.08.07 00:00) [2]
да это я пропустил, только на самом деле все-равно не работает...
ZeroMemory(@SI,SizeOf(TStartupInfo)); ZeroMemory(@PI,SizeOf(TProcessInformation)); SI.cb:=SizeOf(TStartupInfo); CreateProcess(nil,"cmd tracert >> 123.txt",nil,nil,False,0,nil,nil,SI,PI);

> [3] vicegen © (07.08.07 00:55)
> деле все-равно не работает...

> [0] начинающий565 (06.08.07 23:06)

ShellExecute(Handle, nil, PChar(GetEnvironmentVariable("ComSpec")), " /k tracert > 123.txt", nil, SW_HIDE);

Ну и например Memo.Lines.LoadFromFile("123.txt"); Только там в ДОС кодировке помоему будет...

Запуск консольного приложения Найти похожие ветки