if not OpenDialog1.Execute then Exit;
if FileExists(OpenDialog1.FileName) then begin
AssignFile(F, OpenDialog1.FileName); Reset(F);
While not Eof(F) do begin
Readln(F, s); // читаем строку
st_i:= Conv(s, i); // записываем строку в массив Inc(i); // номер строки
end;
CloseFile(F);
end; Look_Mas(st_i, i-1); end;
Процедура Look_Mas используется для просмотра в поле ввода edMassIn исходного массива. Поле ввода доступно только для чтения. Массив отображается в таком же виде, как и при вводе с клавиатуры (строки отделены ";"). В Look_Mas передается количество строк (x) и элементов в строке (n).
procedure Look_Mas(x, n: integer); var
i, j: integer; begin
Form1.edMassIn.ReadOnly:= True; // установим только чтение for i:= 1 to n do // цикл по строкам
begin
for j:= 1 to x do // цикл по элементам строки if j <> x then // отделяем числа пробелами
Form1.edMassIn.Text:= Form1.edMassIn.Text + IntToStr(Mas_a[i, j])+ ' '
else // после последнего элемента строки пробел не ставим
Form1.edMassIn.Text:= Form1.edMassIn.Text + IntToStr(Mas_a[i, j]);
if i <> n then
Form1.edMassIn.Text:= Form1.edMassIn.Text + '; ' else
Form1.edMassIn.Text:= Form1.edMassIn.Text + ';'; end;
Form1.edMassIn.SetFocus; // устанавливаем фокус ввода
19
end;
Задание 2 – На основании приведенной заготовки приложения, необходимо самостоятельно реализовать:
а) написать процедуру проверки количества элементов в строках массива, полученного при чтении файла.
б) написать процедуру генератора случайных чисел, создать компонент GroupBox с двумя полями ввода TEdit для ввода размера массива и кнопки BitBtn для записи чисел в массив. GroupBox сделать доступным при выборе соответствующего переключателя.
в) написать процедуру на обработку массива и исходных данных и процедуры для вывода в файл результатов работы приложения.
г) обработать ситуации открывания несуществующего файла и перезаписи существующего.
2.3. Контрольные вопросы для отчета работы
1.Опишите компоненты ListBox, ComboBox и Memo. Для чего они используются? Какие основные свойства и методы используются при работе с ними?
2.Каким образом можно организовать работу с файлами при помощи компонентов ListBox, ComboBox и Memo?
3.Каков основной порядок действия с файлами в системе Delphi?
4.Что такое файловая переменная, для чего она используется и как описывается в системе Delphi?
5.Каким образом и для чего в системе Delphi происходит ассоциация файловой переменной с нужным физическим файлом?
6.Какими операторами в системе Delphi можно открыть файл? В чем разница между этими операторами?
7.Какими операторами в системе Delphi происходит чтение из файла
изапись в файл?
8.Какие компоненты в системе Delphi позволяют организовать диалоги чтения и запись в файл?
9.Каким образом происходит работа с диалогами чтения и запись в файл в системе Delphi?
10.Каким образом происходит проверки выбора файла при работе с диалогами чтения и запись в файл
20
2.ЛАБОРАТОРНАЯ РАБОТА №12
ОСНОВЫ РАБОТЫ В СИСТЕМЕ УПРАВЛЕНИЯ БАЗАМИ ДАННЫХ
BASE ОФИСНОГО ПАКЕТА LIBREOFFICE
Цель работы: получить общие сведения о системе управления базами данных Base офисного пакета LibreOffice, изучить способы запуска LibreOffice Base и открытия баз данных, ознакомиться с методом создания новой базы данных, изучить методы выборки записей с помощью запросов, изучить методы создания форм для ввода данных в LibreOffice Base. Изучить методы создания и печати отчетов в LibreOffice Base.
Время работы: 8 часов.
2.1. Домашние задания и методические указания по их выполнению
Задание 1 – получить общие сведения о системе управления базами данных LibreOffice Base.
Система управления базами данных Base, входящая в состав программного комплекса LibreOffice, является одним из набирающих популярность бесплатным приложений в семействе настольных СУБД. Все версии LibreOffice Base имеют в своем арсенале средства, значительно упрощающие ввод и обработку данных, поиск данных и представление информации в виде таблиц, графиков и отчетов. LibreOffice Base создана для управления реляционными базами данных, которые представляют собой множество взаимосвязанных таблиц. Эти таблицы базы данных содержат информацию об объектах определенного типа. Каждая строка таблицы включает данные об одном объекте (например, клиенте, автомобиле, документе), а столбцы таблицы содержат различные характеристики этих объектов – атрибуты (например, фамилии, номера телефонов и адреса клиентов, марки и цены автомобилей). Строки таблицы называются записями. Все записи имеют одинаковую структуру: они состоят из полей, в которых хранятся атрибуты объекта. Каждое поле записи содержит одну характеристику объекта и имеет строго определенный тип данных (например, текстовая строка, число, дата). Все записи имеют одни и те же поля, только в них содержатся разные значения атрибутов.
Прежде чем заносить данные в таблицы, нужно определить структуру этих таблиц. Под этим понимается не только описание наименований и типов полей, но и ряд других характеристик (например, формат, критерии проверки вводимых данных).
21
Любая СУБД позволяет выполнять четыре простейшие операции с данными:
-добавлять в таблицу одну или несколько записей;
-удалять из таблицы одну или несколько записей;
-обновлять значения некоторых полей в одной или нескольких записях;
-находить одну или несколько записей, удовлетворяющих заданному условию.
Для выполнения этих операций используется механизм запросов. Результатом выполнения запросов является либо отобранное по определенным критериям множество записей, либо изменения в таблицах. Запросы к базе формируются или с помощью графического интерфейса, или на специально созданном для этого языке, который называется «язык структурированных запросов SQL» (Structured Query Language).
Достоинством системы управления базами данных (СУБД) LibreOffice Base является то, что она имеет очень простой графический интерфейс, который позволяет не только создавать собственную базу данных, но и разрабатывать простые и сложные приложения. Для анализа хранящейся в базе данных LibreOffice Base информации можно создавать различные отчеты, которые позволяют извлекать необходимые данные, группировать и сортировать их в нужном виде, вычислять итоговые значения по группам и в целом по всем отработанным записям. Отчеты могут быть дополнены рисунками, диаграммами, содержательными комментариями, могут быть выведены на печать, преобразованы в документ Writer или опубликованы на
Web.
Задание 2 – изучить способы запуска LibreOffice Base и открытия баз данных.
Для того чтобы запустить LibreOffice Base, необходимо:
-нажать кнопку «Пуск» на панели задач в нижней части рабочего стола;
-открыть в главном меню пункт «Программы»;
-выбрать программу LibreOffice Base.
В LibreOffice Base можно обращаться к данным, хранящимся в различных форматах файлов баз данных. LibreOffice Base поддерживает в естественном режиме некоторые обычные файловые форматы баз данных, например, dBASE. Кроме того, можно использовать LibreOffice Base для подключения к внешним реляционным базам данных, например, к базам данных MySQL или Oracle.
Для того чтобы открыть существующую базу данных, можно воспользоваться одним из трех способов:
- выбрать в меню из списка ранее открывавшихся файлов требуемый
файл;
22
-выбрать файл из списка в области задач, которая расположена в правой части окна приложения;
-выбрать команду «Открыть» в меню «Файл» и затем нужный файл в диалоговом окне «Открытие файла базы данных».
В последнем случае в диалоговом окне обычно по умолчанию отображается содержимое папки «Мои документы» или какой-либо другой (в зависимости от установленной на компьютере операционной системы). Найдя в списке необходимую базу данных, нужно выделить файл и нажать кнопку «Открыть» или дважды щелкнуть по элементу списка. В главном окне LibreOffice Base появится окно выбранной базы данных.
Открыть файл можно в одном из четырех режимов:
-в режиме коллективного доступа. При открытии файла базы данных в этом режиме доступ к нему будет разрешен другим пользователям, они могут открыть его и также работать с объектами базы данных. Причем все пользователи будут иметь возможность как просматривать данные, так и изменять их;
-в режиме монопольного доступа. В этом случае никто другой не сможет открыть этот файл, пока он используется;
-в режиме коллективного доступа только для чтения. В этом случае никто не сможет изменять ни данные в таблицах, ни другие объекты базы данных;
-в режиме монопольного доступа только для чтения. Открывается файл только для чтения и одновременно запрещается другим пользователям открывать этот файл.
Выбрать нужный режим можно из списка, который раскрывается при нажатии стрелки справа от кнопки «Открыть». По умолчанию файл базы данных открывается в режиме коллективного доступа.
Задание 3 – ознакомиться с методом создания новой базы данных в
LibreOffice Base.
Для создания новой базы данных необходимо воспользоваться областью задач «Создание файла» окна приложения LibreOffice Base. Эта область появляется справа при первом запуске LibreOffice Base. Если LibreOffice Base уже использовался для работы с каким-либо файлом и после его закрытия в главном окне этой области нет, можно:
-выбрать команду «Создать» из меню «Файл»;
-нажать кнопку «Создать» на панели инструментов.
Любое из этих действий приведет к открытию справа области задач «Создание файла».
После этого, чтобы создать базу данных, необходимо: 23