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

Вниз

Работа с командной строкой   Найти похожие ветки 

 
dr.karter   (2002-09-24 11:43) [0]

Здравствуйте уважаемые Мастаки!
У меня встала проблема: Как я могу в командную строку поместить текст.
Для примера пробовать хочу чтобы в Edit1 вписать IP Адрес
192.168.0.2 и по нажатию кнопочки появилась строка в которой написано
ping 192.168.0.2


 
Adder ©   (2002-09-24 11:49) [1]

uses ShellAPI;
.....
ShellExecute(0,"open", "ping" ,pchar(edit1.text), nil,sw_ShowNormal);


 
dr.karter   (2002-09-24 11:54) [2]

Спасибо ща попробую


 
dr.karter   (2002-10-30 19:40) [3]

И снова здравствуйте!
получилось, Спасибо! А теперь я могу как-нибудь результат выполнения
строки в компонент Edit?


 
dr.karter   (2002-10-30 19:42) [4]

Например Ping 192.168.0.2
результат выполнения четыре строки, которые я хочу словить и поместить в TEdit1.


 
SottNick ©   (2002-10-31 06:31) [5]

вообще-то пинговать надо самой программой, а не внешней
но если лень, то
ShellExecute(0,"open", "ping" ,pchar(edit1.text+" >temp~zzz.file"), nil,sw_ShowNormal);

а потом загрузить текстовый файл "temp~zzz.file"
в свой edit1
вот только как ты хочешь 4 стоки запихать в однострочный Edit1
может лучше Memo1 ?
Memo1.Lines.LoadFromFile("temp~zzz.file");



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
1-24838
n/a.STealth
2002-12-25 15:15
2003.01.09
TNotifyEvent


1-24922
Евгений Зеленоград
2002-12-25 19:13
2003.01.09
Наличие текста в MASKEDIT?


3-24768
LV
2002-11-28 18:02
2003.01.09
Delphi-7.Чем делать отчёты к БД ???


1-24967
solo
2002-12-26 01:17
2003.01.09
Как можно установить высоту ComboBox-а менее 25 pixel, при Font.S


14-25095
Agent Smith
2002-12-21 20:31
2003.01.09
Клиффорд Саймак