Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.09.02;
Скачать: CL | DM;

Вниз

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

 
начинающий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);


 
{RASkov} ©   (2007-08-07 01:48) [4]

> [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"); Только там в ДОС кодировке помоему будет...



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

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

Наверх




Память: 0.47 MB
Время: 0.016 c
15-1185892916
cosinus
2007-07-31 18:41
2007.09.02
Эм... Глупейший вопрос по SoftIce.


15-1186046187
ISP
2007-08-02 13:16
2007.09.02
Google


2-1186484910
Strate
2007-08-07 15:08
2007.09.02
Перевод из строки в TDateTime


6-1168839344
DimaL
2007-01-15 08:35
2007.09.02
Перехват передачи данных


2-1186340061
Eugem
2007-08-05 22:54
2007.09.02
Создание объектов во время исполнения программы