Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Основы_алгоритм_и_программир_2курс_ПИ .doc
Скачиваний:
0
Добавлен:
01.07.2025
Размер:
720.9 Кб
Скачать
  1. Создание консольного приложения в Delphi.

Консольные приложения - это особый вид Windows приложений, которые не имеет графического интерфейса(GUI) и выполняется в текстовом режиме, т.е. работают в окне так называемого «сеанса DOS».

Для этого загрузим Delphi и в меню File -> New выберем пункт Other. В открывшемся окне выберем значок Console Application: После нажатия OK система создаст готовое консольное приложение, которое, пока, ничего не делает. Вы можете увидеть примерно такой текст: program Project2; 

{$APPTYPE CONSOLE} 

uses    SysUtils; 

begin 

  { TODO -oUser -cConsole Main : Insert code here } 

end.

Директива APPTYPE с параметром CONSOLE устанавливает тип приложения как консольное. Это означает, что при запуске программы будет создана консоль и приложение получит стандартные дескрипторы ввода (stdin), вывода (stdout) и ошибки (stderr). В Delphi эти переменные называются InputOutput и ErrOutput соответственно и имеют тип TextFile. Если программа была запущена другим приложением, у которого есть своя консоль, но наша программа примет дескрипторы своего родителя и будет работать с его консолью. 

Запустив программу клавишей F9 мы на мгновение увидим консоль, однако, она сразу же исчезнет. Программы выполнит вывод в консоль и завершит работу, а с ней и исчезнет консоль.

Вот пример приложения, которое выводит таблицу значений синуса угла: 

program Project2;  {$APPTYPE CONSOLE}  var    X, dX, A: double;    N, i: integer;  begin    Write('X  = '); ReadLn(X);    Write('dX = '); ReadLn(dX);    Write('N  = '); ReadLn(N);    WriteLn;    WriteLn('    X    |   sin(X)');    WriteLn('---------+------------');    for i:=0 to N do begin      A := X + dX * i;      WriteLn( A:8:1, ' |',sin(A/180*Pi):10:4);    end;    ReadLn;  end.

Вот вывод программы: 

X  = 90  dX = 10  N  = 18      X    |   sin(X)  ---------+------------      90.0 |    1.0000     100.0 |    0.9848     110.0 |    0.9397     120.0 |    0.8660     130.0 |    0.7660     140.0 |    0.6428  150.0 |    0.5000 

4.Компиляция и выполнение проекта

В процессе компиляции проекта создается готовый к использованию файл, которым может быть приложение (ЕХЕ) или динамически загружаемая библиотека (DLL). Далее будем рассматривать только файл-приложение.

Имя приложения, получаемого в результате компиляции, совпадает с именем файла проекта, а само приложение является автономным и не требует для своей работы дополнительных файлов Delphi.

Запуск процесса компиляции выполняется по команде Project | Compile<Projectl> (Проект | Компилировать <проект>) или нажатием комбинации клавиш <Ctrl>+<F9>. В этой команде содержится имя проекта, разработка которого выполняется в настоящий момент, первоначально это Projectl .

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

Запустить проект на выполнение можно из среды Delphi и из среды Windows. Выполнение проекта из среды Delphi осуществляется командой Run | Run (Выполнение | Выполнить) или нажатием клавиши <F9>. При этом созданное приложение начинает свою работу. Если в файлы проекта вносились изменения, то предварительно выполняется компиляция проекта. Запущенное приложение работает так же, как и запущенное вне среды Delphi, однако имеются некоторые особенности:

• нельзя запустить вторую копию приложения;

• продолжить разработку проекта можно только после завершения работы приложения;

• при зацикливании (зависании) приложения его завершение необходимо выполнять средствами Delphi с помощью команды Run | Program Reset (Выполнение | Остановить программу) или комбинации клавиш <Ctrl>+<F2>.