Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лабораторные работы по Информатике 2011.doc
Скачиваний:
6
Добавлен:
04.11.2018
Размер:
557.06 Кб
Скачать

3.2.3.2. Вывод в поле диалогового окна

Часть диалогового окна, предназначенная для вывода информации, называ­ется полем вывода или полем метки. У каждого поля вывода есть имя. Для того чтобы в поле вывода появился текст, достаточно присвоить значение свойству caption этого поля. Например, если Label1 — это имя поля вывода диалогового окна программы решения квадратного уравнения, то для того чтобы в этом поле появился текст "Уравнение не имеет действительных корней", достаточно записать:

Label1.Caption:= 'Уравнение не имеет действительных корней';

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

FloatToStr или IntToStr.

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

Label1.Caption:=’Корни уравнения:’+Chr(13)+’xl=’+FloatToStr(x1)+Chr(13)+’x2=’ +FloatToStr(x2);

В этом примере для вывода текста в три строки используется функция chr, которая возвращает символ "Новая строка", код которого равен 13.

Для вывода информации в окно однострочного текстового редактора Tedit следует использовать для этого его свойство Text:

Edit1.text:=’В это окно мы выводим строковую информацию…’;

3.3. Вывод и ввод информации из\в файла.

3.3.1. Вывод в файл

Программы, которые до настоящего момента рассматривались, вы­водили результат своей работы на экран. Вместе с тем, Pascal позволяет сохранить результаты работы программы на диске компьютера и в файле, что дает возможность использовать эти данные для дальнейшей обработки, минуя процесс их ввода с клавиатуры.

Для вывода информации в файл необходимо выполнить несколько обязательных действий:

  • Объявить файл: (var f : TextFile)

  • Задать имя файла (назначить файл): (AssignFile(f));

  • Открыть файл: (Rewrite(f) или Append(f))

  • Вывести в файл информацию: (Writeln(f,…..) или Write(f,…..));

  • Закрыть файл (CloseFile(f));

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

Файл — это именованная конечная структура данных, представляющая собой после­довательность элементов данных одного типа.

Как и любая структура данных (переменная, массив) программы, файл дол­жен быть объявлен в разделе описания переменных. При объявлении файла указывается тип его элементов.

В общем виде объявление файла выглядит так:

Имя: file of ТипЭлементов

Примеры:

res: file of char; { файл символов }

koef: file of real; / файл вещественных чисел f

f: file of integer; { файл целых чисел }

Файл, компонентами которого являются данные символьного типа, называ­ется символьным или текстовым. Описание текстового файла в общем виде выглядит так:

имя:ТехtFilе;

где имя — имя файловой переменной;

TextFile — обозначение типа, показывающее, что имя это файловая переменная, представляющая текстовый файл.