Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Учебное пособие Delphi.doc
Скачиваний:
1
Добавлен:
01.07.2025
Размер:
5 Мб
Скачать
☆

13Построение графика функции

Для построения графика функции используется компонент TChart, расположенный на странице Aditional. Последовательность действий при работе с данным компонентом может быть такая:

  • положите компонент на форму

  • дважды щелкните мышью по компоненту, откроется окно, представленное на рисунке 27

Рисунок 27 - Добавление нового Series

  • добавьте линию (выберите окно Line и нажмте кнопку Add, галочку 3D рекомендуется снять). Окно выбора видов графика представлено на рисунке 28

Рисунок 28 - Окно выбора вида графика

  • измените название графика. Для этого выберите вкладку Chart/Title. В окне поменяйте название (рисунок 29)

Рисунок 29 - Окно выбора названия графика

  • измените название осей. Обычно строят график функции на плоскости, поэтому имеется две оси: х и у. Для того, чтобы изменить названия осей, выберите окно, представленное на рисунке 30. Слева выбираете ось, справа в окне записываете название.

Рисунок 30 - Окно редактирования стиля осей

  • если на графике планируется только одна зависимость, то легенда, которая показывается по умолчанию, не нужна. Окно редактирования легенды показано на рисунке 31.

Рисунок 31 - Окно редактирования легенды

Пример 15. Построение графика функции на интервале [a,b] с шагом h. Добавьте пример 14 компонентом TChart. Полученный вид формы представлен на рисунке 32.

Рисунок 32 - Окно формы на этапе проектирования

Событие нажатие на кнопку «Расчет» изменится следующим образом: перед циклом расчета функции добавим строку очистки значений Series:

Chart1.SeriesList.Series[0].Clear;

Внутри цикла расчета функции добавим вывод результатов в TChart

Chart1.SeriesList.Series[0].AddXY(a,y,'',clRed);

14Файлы

Объявление файлов

Под файлом понимается именованная область внешней памяти ПК [6].

Файл имеет:

  • имя

  • содержит компоненты одного вида

  • длина файла не оговаривается при создании

  • нельзя создать файл типа файл

Файловый тип можно создать:

<Имя> =File of <тип>;

<Имя> =TextFile ;

<Имя> =File;

Здесь <Имя> - имя файлового типа, File of - зарезервированные слова, TextFile – имя стандартного типа текстовых файлов, <тип> - тип данных Object Pascal кроме файлового.

В зависимости от способа объявления можно выделить три вида файлов:

  • типизированные файлы (задаются предложением File of …)

  • текстовые файлы (определяются типом TextFile)

  • нетипизированные файлы (определяются типом File)

Доступ к файлам

Для доступа к файлу используется процедура AssignFile (<ф.п>,<имя файла>), которая связывает <ф.п> - файловую переменную с именованным местом на диске <имя файла>, которое содержит полный путь к файлу.

Для записи в файл используется процедура Rewrite (<ф.п>), для чтения - Reset (<ф.п>). Запись и чтение записей в файл осуществляется с помощью процедур соответственно Write (WriteLn) и Read (ReadLn).

Для того, чтобы узнать существует ли указанный файл, используется функция FileExists (FileName) типа Boolean, которая возвращает True в случае существования файла и False при не существовании файла.

Только для текстовых файлов применима процедура добавления записи в ранее существующий файл Append(<ф.п>) .

При нормальном завершении приложения связь между файловой переменной и местом на диске разрывается, однако при возникновении исключительной ситуации требуется закрыть файл процедурой CloseFile(var F) [6].

Пример записи в файл данных представлен в примере 16.