Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Работа с командной строкой [D5, Win95/98, NT4]


dr.karter ©   (2002-09-24 11:43:00) 

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


SottNick   (2002-10-31 06:31:00) [1]

вообще-то пинговать надо самой программой, а не внешней
но если лень, то
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");


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

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


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

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


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

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


Adder   (2002-09-24 11:49:00) [5]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо