Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2003.01.09;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.007 c
1-24858
GOG
2002-12-27 05:49
2003.01.09
Дискретка


4-25162
Kors
2002-11-20 12:41
2003.01.09
сообщения и ошибки


6-25004
Cu
2002-11-11 12:35
2003.01.09
Компонент TIdSMTP (Indy)


1-24919
drin
2002-12-24 18:16
2003.01.09
DLL


3-24797
Cobalt
2002-12-11 22:57
2003.01.09
Через что работает 1С?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский