Главная страница
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.046 c
1-24852
Dm9
2002-12-27 18:43
2003.01.09
Результат работы консольной программы


6-25002
kofman
2002-11-10 00:11
2003.01.09
Как принудительно выйти из авторомного режима в TWebBrowser?


4-25144
valler
2002-11-20 20:05
2003.01.09
AnimateWindow - Как Использовать


3-24784
Botcha
2002-12-12 22:00
2003.01.09
Драйвер для ACCESS


14-25033
Val
2002-12-19 20:22
2003.01.09
Тест на умопомешательство :)