Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c
3-1178593856
ДимаЛ
2007-05-08 07:10
2007.09.02
Изображения в SQL Server


2-1186488500
Roun
2007-08-07 16:08
2007.09.02
Как удалить пустые строки из Memo?


2-1186723135
Savek
2007-08-10 09:18
2007.09.02
TDBGrid.OnMouseDown


11-1169117920
Mabia
2007-01-18 13:58
2007.09.02
Работа с файлами


15-1185874126
gOODok
2007-07-31 13:28
2007.09.02
doom 3




   Наверх