Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 14.11.2009, 17:50   #1
Desha
Форумчанин
 
Аватар для Desha
 
Регистрация: 06.04.2009
Сообщений: 124
По умолчанию Подключение внешних программ в ТР

Из программы, написанной на Турбо Паскале, можно запустить любую другую готовую к работе программу. Для этого используется процедура ЕХЕС из библиотечного модуля DOS.

Покажите на простом примере как пользоваться этотй процедуой либо пркомментируйте следующий текст:

Код:
{$М 1024, 0, 0} 

Uses DOS; 

var 

st : string [79]; 

begin 

write ('Введите команду ДОС: '); 

readln (st); if st <> '' then 

begin 

st := '/C '+st; 

SwapVectors; 

Exec (GetEnv ('COMSPEC'), st) ; 

SwapVectors 

end 

end.
Desha вне форума Ответить с цитированием
Старый 14.11.2009, 18:59   #2
NeshSoft
Максим Николаев
Форумчанин
 
Аватар для NeshSoft
 
Регистрация: 15.02.2009
Сообщений: 170
По умолчанию

Открыл первую попавшуюся книгу по паскалю, ввел в поиске exec, поиск нашел главу: 11.5. Запуск внешних программ.
Скопировал главу в ворд, прикрепляю.

PS сори за качество, книга в pdf была
Вложения
Тип файла: doc отрывок.doc (42.5 Кб, 11 просмотров)
NeshSoft. Программирование на заказ для студентов. Delphi/Pascal. Подробнее на сайте neshsoft.narod.ru
NeshSoft вне форума Ответить с цитированием
Старый 14.11.2009, 20:25   #3
Desha
Форумчанин
 
Аватар для Desha
 
Регистрация: 06.04.2009
Сообщений: 124
По умолчанию

Я все это читала. Листинг программы, который я попросла прокомментировать, я взяла с предложенной Вами статьи. К сожалению статью не поняла.
Desha вне форума Ответить с цитированием
Старый 14.11.2009, 21:24   #4
NeshSoft
Максим Николаев
Форумчанин
 
Аватар для NeshSoft
 
Регистрация: 15.02.2009
Сообщений: 170
По умолчанию

Код:
program test;
{$M 1024,0,0} 
uses crt,dos;
begin
SWAPVECTORS;
exec('C:\bk.exe','');//запускается внешняя программа bk.exe, расположеная в корне диска С
SWAPVECTORS;
end.
Если из статьи не поняли, зачем нужны остальные строчки, просто знайте и верьте, что они нужны.
NeshSoft. Программирование на заказ для студентов. Delphi/Pascal. Подробнее на сайте neshsoft.narod.ru
NeshSoft вне форума Ответить с цитированием
Старый 14.11.2009, 21:34   #5
Desha
Форумчанин
 
Аватар для Desha
 
Регистрация: 06.04.2009
Сообщений: 124
По умолчанию

Спасибо. Как не странно, после Вашего примера, я поняла первый листинг))
Desha вне форума Ответить с цитированием
Старый 15.11.2009, 20:27   #6
Desha
Форумчанин
 
Аватар для Desha
 
Регистрация: 06.04.2009
Сообщений: 124
По умолчанию

А есть ли возможность подключения внешней программы в новое окно? Например я работаю с программой. нажала функциональную клавишу и у меня в новом окне открылась,допустим, справка.
Desha вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вызов внешних программ в с++ первокурсница)) Общие вопросы C/C++ 3 14.09.2009 11:03
Запуск внешних приложений Alex_09 Общие вопросы Delphi 4 10.04.2009 18:24
Обновление внешних связей Григорьев Игорь Microsoft Office Excel 12 10.11.2008 11:33
Компиляция внешних файлов NoRty Паскаль, Turbo Pascal, PascalABC.NET 2 25.02.2008 15:34
Импорт внешних данных asale Microsoft Office Excel 1 15.04.2007 00:41