делфи и работа с diskpart

[Алексей_2012]

Здравствуйте! Надавно задался вопросом, а возможно ли выполнять какие-то действия и возвращать результат именно из командной строки, допустим так: запустить утилиту diskpart, проверить количество локальных дисков, если более 2, то проверить размер, или другой пример, хотя к diskpart он не относиться, но все же, возвратить результат от команды ping smtp.yandex.ru если есть потерянный пакет то сообщить об этом. В общем хочу узнать возможно ли это сделать? Думаю мысль донести удалось до вас)

[northener]

Сообщение от Алексей_2012

Здравствуйте! Надавно задался вопросом, а возможно ли выполнять какие-то действия и возвращать результат именно из командной строки, допустим так: запустить утилиту diskpart, проверить количество локальных дисков, если более 2, то проверить размер, или другой пример, хотя к diskpart он не относиться, но все же, возвратить результат от команды ping smtp.yandex.ru если есть потерянный пакет то сообщить об этом. В общем хочу узнать возможно ли это сделать? Думаю мысль донести удалось до вас)

Конечно возможно. Ведь вышеназванные программы не хранят в секрете результаты своей работы, а выдают их на консоль вывода.

[Алексей_2012]

Есть какой-нибудь наглядный пример или полезная ссылочка? Кроме ГУГЛ. Спасибо_)

[alextrof94]

А мне вот гугл очень даже помог.
http://www.cyberforum.ru/delphi-wina...ead676118.html

[northener]

Сообщение от Алексей_2012

Есть какой-нибудь наглядный пример или полезная ссылочка? Кроме ГУГЛ. Спасибо_)

Наглядный пример чего тебя интересует?
(Это если не помогли ссылочки от alextrof94)

[Алексей_2012]

Допустим (одна из моих работ)

Это прописать так в командной строке

var
s:string;
...
s:='prg'+edit1.text+'1';
{tasm s+'.asm'}
...

Если результат положительный и создался *.obj, то

{tlink s+'.obj'}

Если отрицательный, то возвратить позицию ошибочной строки в проекте (командная строка покажет, а вывести допустим в файл или в showmessage)

В общем пишу что-то типа автокомпоновщика, или как он там называется, ну и пару других программ, допустим узнать пинганулся ли яндекс, если да, то продолжить, если нет, то вывести причину, или отскринить консоль.

Спасибо!

[northener]

Сообщение от Алексей_2012

Допустим (одна из моих работ)

Это прописать так в командной строке

var
s:string;
...
s:='prg'+edit1.text+'1';
{tasm s+'.asm'}
...

Если результат положительный и создался *.obj, то

{tlink s+'.obj'}

Если отрицательный, то возвратить позицию ошибочной строки в проекте (командная строка покажет, а вывести допустим в файл или в showmessage)

В общем пишу что-то типа автокомпоновщика, или как он там называется, ну и пару других программ, допустим узнать пинганулся ли яндекс, если да, то продолжить, если нет, то вывести причину, или отскринить консоль.

Спасибо!

Если "tasm" и "tlink" - те самые от папаши Борланда, то никаких проблем. Читай хелп ТурбоПаскаля. Не найдёшь, попробую помочь завтра.

[Алексей_2012]

Не знаю откуда они, когда проходил курс ассемблера-два года тому назад-скачивали у преподавателя и работали /кодили в нортоне, а сейчас колледж закончил, и соответственно не могу узнать откуда препод взял эти Tasm и Tlink, а вообще планируется таскать их с exe-файлом моей программы, так что вариант один-командная строка) Спасибо!