База данных MySQL
Содержание
Введение
Глава 1. MySQL
.1 Исследовательская часть
.2 SQL
.3 Основные характеристики
.4 Требования к аппаратному обеспечению
Глава 2. Конструкторская часть
.1 Создание таблицы
.2 Создание триггеров
.3 Создание генераторов
.4 Создание Хранимых процедур
.5 Разработка приложения
.6 Блок схема
Глава 3. Руководство пользователю
Заключение
Список литературы
Введение
является, прежде всего, информационно-логическим языком, предназначенным
для описания, изменения и извлечения данных, хранимых в реляционных базах
данных. SQL нельзя назвать языком программирования
Изначально, SQL был основным способом работы пользователя с базой данных
и позволял выполнять следующий набор операций:
· создание в базе данных новой таблицы;
· добавление в таблицу новых записей;
· изменение записей;
· удаление записей;
· выборка записей из одной или нескольких таблиц (в
соответствии с заданным условием);
а, также, изменение структур таблиц. Со временем, SQL усложнился -
обогатился новыми конструкциями, обеспечил возможность описания и управления
новыми хранимыми объектами (например, индексы, представления, триггеры и
хранимые процедуры) - и стал приобретать черты, свойственные языкам
программирования.
При всех своих изменениях, SQL остаётся единственным механизмом связи
между прикладным программным обеспечением и базой данных. В то же время,
современные СУБД, а, также, информационные системы, использующие СУБД,
предоставляют пользователю развитые средства визуального построения запросов.
Каждое предложение SQL - это запрос или обращение к базе данных, которое
приводит к изменению в базе данных. В соответствии с тем, какие изменения
происходят в базе данных, различают следующие типы запросов:
· запросы на создание или изменение в базе данных новых или
существующих объектов (при этом в запросе описывается тип и структура
создаваемого или изменяемого объекта);
· запросы на получение данных;
· запросы на добавление новых данных (записей)
· запросы на удаление данных;
· обращения к СУБД.
Основным объектом хранения реляционной базы данных является таблица,
поэтому все SQL-запросы - это операции над таблицами. В соответствии с этим,
запросы делятся на
· запросы, оперирующие самими таблицами (создание и изменение
таблиц);
· запросы, оперирующие с отдельными записями (или строками
таблиц) или наборами записей.
Каждая таблица описывается в виде перечисления своих полей (столбцов
таблицы) с указанием
· типа хранимых в каждом поле значений;
· связей между таблицами (задание первичных и вторичных
ключей);
· информации, необходимой для построения индексов.
Запросы первого типа, в свою очередь, делятся на запросы, предназначенные
для создания в базе данных новых таблиц, и на запросы, предназначенные для
изменения уже существующих таблиц. Запросы второго типа оперируют со строками,
и их можно разделить на запросы следующего вида:
· вставка новой строки;
· изменение значений полей строки или набора строк;
· удаление строки или набора строк.
Самый главный вид запроса - это запрос, возвращающий (пользователю)
некоторый набор строк, с которым можно осуществить одну из трёх операций:
· просмотреть полученный набор;
· изменить все записи набора;
· удалить все записи набора.
Таким образом, использование SQL сводится, по сути, к формированию
всевозможных выборок строк и совершению операций над всеми записями, входящими
в набор.
В начале 1970-х годов в одной из исследовательских лабораторий компании
IBM была разработана экспериментальная реляционная СУБД IBM System R, для
которой затем был создан специальный язык SEQUEL, позволявший относительно
просто управлять данными в этой СУБД. Аббревиатура SEQUEL расшифровывалась как Structured English QUEry Language - «структурированный английский язык
запросов». Позже по юридическим соображениям язык SEQUEL был переименован в
SQL. Когда в 1986 году первый стандарт языка SQL был принят ANSI (American National Standards Institute), официальным произношением стало
[,es kju:' el] - эс-кью-эл. Несмотря на это, даже англоязычные специалисты
зачастую продолжают читать SQL как сиквел (по-русски также часто говорят
«эс-ку-эль» или используют жаргонизм «скуль»).
Целью разработки было создание простого непроцедурного языка, которым мог
воспользоваться любой пользователь, даже не имеющий навыков программирования.
Собственно разработкой языка запросов занимались Дональд Чэмбэрлин (Donald D. Chamberlin) и Рэй
Бойс (Ray Boyce). Пэт Селинджер (Pat Selinger) занималась разработкой стоимостного
оптимизатора (cost-based optimizer), Рэймунд Лори (Raymond Lorie) занимался компилятором запросов.
Стоит отметить, что SEQUEL был не единственным языком подобного
назначения. В Калифорнийском Университете Беркли была разработана
некоммерческая СУБД Ingres (являвшаяся, между прочим, дальним прародителем
популярной сейчас некоммерческой СУБД PostgreSQL), которая являлась реляционной
СУБД, но использовала свой собственный язык QUEL, который, однако, не выдержал
конкуренции по количеству поддерживающих его СУБД с языком SQL.
Первыми СУБД, поддерживающими новый язык, стали в 1979 году Oracle V2 для
машин VAX от компании Relational Software Inc. (впоследствии ставшей компанией
Oracle) и System/38 от IBM, основанная на System/R.
Глава 1. MySQL
.1 Исследовательская часть
база данные borland
delphi
База данных представляет собой структурированную совокупность данных. Эти
данные могут быть любыми - от простого списка предстоящих покупок до перечня
экспонатов картинной галереи или огромного количества информации в
корпоративной сети. Для записи, выборки и обработки данных, хранящихся в
компьютерной базе данных, необходима система управления базой данных, каковой и
является ПО MySQL. Поскольку компьютеры замечательно справляются с обработкой
больших объемов данных, управление базами данных играет центральную роль в
вычислениях. Реализовано такое управление может быть по-разному - как в виде
отдельных утилит, так и в виде кода, входящего в состав других приложений.- это
система управления реляционными базами данных. В реляционной базе данных данные
хранятся не все скопом, а в отдельных таблицах, благодаря чему достигается
выигрыш в скорости и гибкости. Таблицы связываются между собой при помощи
отношений, благодаря чему обеспечивается возможность объединять при выполнении
запроса данные из нескольких таблиц. SQL как часть системы MySQL можно
охарактеризовать как язык структурированных запросов плюс наиболее распространенный
стандартный язык, используемый для доступа к базам данных.- это ПО с открытым
кодом. Применять его и модифицировать может любой желающий. Такое ПО можно
получать по Internet и использовать бесплатно. При этом каждый пользователь
может изучить исходный код и изменить его в соответствии со своими
потребностями.
Почему веб-программисты отдают предпочтение СУБД MySQL? MySQL является
очень быстрым, надежным и легким в использовании. Если вам требуются именно эти
качества, попробуйте поработать с данным сервером. MySQL обладает также рядом
удобных возможностей, разработанных в тесном контакте с пользователями.
Первоначально сервер MySQL разрабатывался для управления большими базами данных
с целью обеспечить более высокую скорость работы по сравнению с существующими
на тот момент аналогами. И вот уже в течение нескольких лет данный сервер
успешно используется в условиях промышленной эксплуатации с высокими
требованиями. Несмотря на то что MySQL постоянно совершенствуется, он уже
сегодня обеспечивает широкий спектр полезных функций. Благодаря своей
доступности, скорости и безопасности MySQL очень хорошо подходит для доступа к
базам данных по Internet.
Технические возможности СУБД MySQLявляется системой клиент-сервер,
которая содержит многопоточный SQL-сервер, обеспечивающий поддержку различных
вычислительных машин баз данных, а также несколько различных клиентских
программ и библиотек, средства администрирования и широкий спектр программных
интерфейсов (API). Мы также поставляем сервер MySQL в виде многопоточной
библиотеки, которую можно подключить к пользовательскому приложению и получить
компактный, более быстрый и легкий в управлении продукт. Доступно также большое
количество программного обеспечения для MySQL, в большей части -
бесплатного.правильно произносится как ''Май Эс Кью Эль''.
1.2 SQL
состоит из двух частей: серверной и клиентской.
Сервер MySQL постоянно работает на компьютере. Клиентские программы
(например, скрипты PHP) посылают серверу MySQL SQL-запросы через механизм
сокетов (то есть при помощи сетевых средств), сервер их обрабатывает и
запоминает результат. То есть скрипт (клиент) указывает, какую информацио он
хочет получить от сервера баз данных. Затем сервер баз данных посылает ответ
(результат) клиенту (скрипту).
Почему всегда передается не весь результат? Очень просто: дело в том, что
размер результирующего набора данных может быть слишком большим, и на его
передачу по сети уйдет чересчур много времени. Да и редко когда бывает нужно
получать сразу весь вывод запроса (то есть все записи, удовлетворяющие
выражению запроса). Например, нам может потребоваться лишь подсчитать, сколько
записей удовлетворяет тому или иному условию, или же выбрать из данных только
первые 10 записей. Механизм использования сокетов подразумевает технологию
клиент-сервер, а это означает, что в системе должна быть запущена специальная
программа - MySQL-сервер, которая принимает и обрабатывает запросы от программ.
Так как вся работа происходит в действительности на одной машине, накладные
расходы по работе с сетевыми средствами незначительны (установка и поддержание
соединения с MySQL-сервером обходится довольно дешево).труктура MySQL
трехуровневая: базы данных - таблицы - записи. Базы данных и таблицы MySQL
физически представляются файлами с расширениями frm, MYD, MYI. Логически -
таблица представляет собой совокупность записей. А записи - это совокупность
полей разного типа. Имя базы данных MySQL уникально в пределах системы, а
таблицы - в пределах базы данных, поля - в пределах таблицы. Один сервер MySQL
может поддерживать сразу несколько баз данных, доступ к которым может
разграничиваться логином и паролем. Зная эти логин и пароль, можно работать с
конкретной базой данных. Например, можно создать или удалить в ней таблицу,
добавить записи и т. д. Обычно имя-идентификатор и пароль назначаются хостинг
провайдерами, которые и обеспечивают поддержку MySQL для своих пользователей.
1.3 Основные
характеристики
· MySQL - это система управления реляционными базами данных.
В реляционной базе данные хранятся в отдельных таблицах, благодаря чему
достигается выигрыш в скорости и гибкости. Таблицы связываются между собой при
помощи отношений, благодаря чему обеспечивается возможность объединять при
выполнении запроса данные из нескольких таблиц. SQL как часть системы MySQL
можно охарактеризовать как язык структурированных запросов плюс наиболее
распространенный стандартный язык, используемый для доступа к базам данных.
· Программное обеспечение MySQL - это ПО с открытым кодом.
ПО с открытым кодом означает, что применять и модифицировать его может
любой желающий. Такое ПО можно получать по Internet и использовать бесплатно.
При этом каждый пользователь может изучить исходный код и изменить его в
соответствии со своими потребностями.
· Технические возможности СУБД MySQL
ПО MySQL является системой клиент-сервер, которая содержит многопоточный
SQL-сервер, обеспечивающий поддержку различных вычислительных машин баз данных,
а также несколько различных клиентских программ и библиотек, средства
администрирования и широкий спектр программных интерфейсов (API).
· Безопасность
Система безопасности основана на привилегиях и паролях с возможностью
верификации с удаленного компьютера, за счет чего обеспечивается гибкость и
безопасность. Пароли при передаче по сети при соединении с сервером шифруются.
Клиенты могут соединяться с MySQL, используя сокеты TCP/IP, сокеты Unix или
именованные каналы (named pipes, под NT)
· Вместимость данных
32-разрядная Linux-Intel - размер таблицы 4 Гб.
- Solaris 2.7 Intel - 4 Гб
Solaris 2.7 UltraSPARC - 512 Гб
- WindowsXP - 4 Гб
Как можно видеть, размер таблицы в базе данных MySQL обычно лимитируется
операционной системой. По умолчанию MySQL-таблицы имеют максимальный размер
около 4 Гб. Для любой таблицы можно проверить/определить ее максимальный размер
с помощью команд SHOW TABLE STATUS или myisamchk -dv table_name. Если большая
таблица предназначена только для чтения, можно воспользоваться myisampack,
чтобы слить несколько таблиц в одну и сжать ее. Обычно myisampack ужимает
таблицу по крайней мере на 50%, поэтому в результате можно получить очень
большие таблицы.
1.4
Требования к аппаратному обеспечению
Система предъявляет следующие требования к аппаратному и программному
обеспечению сервера:
Минимальные требования к серверу: 1 компьютер с процессором Pentium II
233 МГц и выше, 128 Мб оперативной памяти.
Рекомендуемые требования к серверу: 2 компьютера с процессором Pentium II
233 МГц и выше, 256Мб оперативной памяти. В этом случае предполагается, что
один компьютер будет выполнять функции SQL сервера, а другой - сервера
приложений CimWebCenter.
Для работы системы необходимо следующее предустановленное программное
обеспечение: Apache Web Server , PHP 4.3.x, MySql , на платформе FreeBSD или
Linux.
Существует также возможность инсталляции системы на платформе Windows.
При этом требования к предустановленному программному обеспечению остаются
прежними.
Для работы с клиентской частью системы требуется компьютер, подключенный
по протоколу TCP/IP к сети, в которой находится сервер с установленной
CimWebCenter.
Минимальные требования к компьютеру клиента: Pentium 200 МГц и выше, 32
Мб оперативной памяти. Работа с системой осуществляется посредством браузера
Internet Explorer версии 6.0.
Для работы в режиме WYSIWIG редактора, также требуется наличие на
клиентском компьютере установленного пакета MsOffice. При первом запуске
системы может потребоваться дистрибутив пакета MsOffice.
Глава 2. Конструкторская часть
· Создание базы данных.
· Для создания базы данных использовался Ibexpert:
· Утилита администрации InterBase (поддерживет InterBase MySQL Yaffil) Работает одновременно с
несколькими базами данных. Содержит редакторы для всех объектов БД с
синтаксической подсветкой, SQL редактор с историей запросов и возможностью
фонового выполнения запросов, отладчик хранимых процедур и триггеров, поиск в
метаданных, полное и частичное извлечение данных и метаданных, анализатор
зависимостей объектов баз данных, отчеты по метаданным, менеджеры пользователей
и пользовательских привилегий, экспорт данных в различные форматы.
Данный триггер следит за изменением, если пользователь изменил любое поле
из таблицы goroda, триггер автоматически записывает в
таблицу LOG имя пользователя и дату.
2.1 Создание
таблицы
Таблица - основной объект для хранения информации в реляционной базе данных.
Она состоит из содержащих данные строк и столбцов, занимает в базе данных
физическое пространство и может быть постоянной или временной. Поле, также
называемое в реляционной базе данных столбцом, является частью таблицы, за
которой закреплен определенный тип данных. Каждая таблица базы данных должна
содержать хотя бы один столбец. Строка данных - это запись в таблице базы
данных, она включает поля, содержащие данные из одной записи таблицы.
Главное в команде создания таблицы - определение имени таблицы и описание
набора имен полей, которые указываются в соответствующем порядке. Кроме того,
этой командой оговариваются типы данных и размеры полей таблицы.
Ключевое слово NULL используется для указания того, что в данном столбце
могут содержаться значения NULL. Значение NULL отличается от пробела или нуля -
к нему прибегают, когда необходимо указать, что данные недоступны, опущены или
недопустимы. Если указано ключевое слово NOT NULL, то будут отклонены любые
попытки поместить значение NULL в данный столбец. Если указан параметр NULL,
помещение значений NULL в столбец разрешено. По умолчанию стандарт SQL
предполагает наличие ключевого слова NULL.
CREATE GENERATOR GEN_GORODA_ID;TABLE GORODA (_GOR INTEGER NOT
NULL,VARCHAR(30) NOT NULL,INTEGER,INTEGER,_STR INTEGER NOT NULL);
с помощью этого кода создается таблица города, она состоит из следующих
столбцов:
id_gor - индентефикатор города, данное поле
не может быть пустым.
nazvanie- это поле содержит название города, оно не может превышать 30 символов.
id_str - индентификатор страны к которой
принадлежит город.
dolgota-
долгота на которой находится данный город.
shirota-
широта на которой находится данный город.
CREATE GENERATOR GEN_STRANA_ID_STR;TABLE STRANA (_STR INTEGER
NOT NULL,VARCHAR(30) NOT NULL,VARCHAR(30) NOT NULL,
NASELENIE INTEGER);
Таблица страны:
id_str - индентификатор страны
nazvanie- это поле содержит название страны
stolica
- в данном поленаходится столица выбранной страны
naselenie- население данной страны(в млн).
CREATE TABLE LOG (
"WHEN" TIMESTAMP,
"USER" VARCHAR(20),
"ACTION" CHAR(3));
Таблица лог: данная таблица содержит информацию о том Кто? Когда? и что
сделал(удалил,изменил,вставил)?
When-
дата дейстивя;
User-
кто совершает действия;
Action-
показывает действие которое совершает пользователь
Таблица страны:
id_str - индентификатор страны
nazvanie- это поле содержит название страны
stolica
- в данном поленаходится столица выбранной страны
naselenie- население данной страны(в млн).
CREATE TABLE LOG (
"WHEN" TIMESTAMP,
"USER" VARCHAR(20),
"ACTION" CHAR(3));
Таблица лог: данная таблица содержит информацию о том Кто? Когда? и что
сделал(удалил,изменил,вставил)?
When-
дата дейстивя;
User-
кто совершает действия;
Action-
показывает действие которое совершает пользователь
2.2 Создание триггеров
TRIGGER TRIG_AI_GOR FOR GORODAAFTER INSERT POSITION 0INTO log
VALUES (current_timestamp, current_user, 'INS');
Данный триггер следит за действием вставка, если пользователь добавляет
новое значение в таблицу goroda,
триггер автоматически записывает в таблицу LOG имя пользователя и дату.
CREATE TRIGGER TR_AD_GOR FOR GORODAAFTER DELETE POSITION
0INTO log VALUES (current_timestamp, current_user, 'DEL');
END
Данный триггер отвечает за удаление, если пользователь удалил значение из
таблицы goroda, триггер автоматически записывает в
таблицу LOG имя пользователя и дату.
CREATE TRIGGER TR_AU_GOR FOR GORODAAFTER UPDATE POSITION
0INTO log VALUES (current_timestamp, current_user, 'UPD');
END
Данный триггер следит за изменением, если пользователь изменил любое поле
из таблицы goroda, триггер автоматически записывает в
таблицу LOG имя пользователя и дату.
2.3 Создание генераторов
GENERATOR GEN_GORODA_ID;GENERATOR GEN_GORODA_ID TO
24;GENERATOR GEN_STRANA_ID_STR;GENERATOR GEN_STRANA_ID_STR TO 15;
Данные генераторы необходимы для создания триггеров на автоинкремент.
В них можно указать начальное значение автоинкремента.
CREATE TRIGGER TRIG_GORODA FOR GORODABEFORE INSERT POSITION
0(new.id_gor is null) then new.id_gor = gen_id(gen_goroda_id,1);
Данный триггер автоматически создает идентификационный номер каждого
нового города в таблице goroda.
CREATE TRIGGER TRIG_STRANA FOR STRANABEFORE INSERT POSITION
0BEGIN(NEW.Id_str IS NULL) THEN NEW.Id_str = GEN_ID(gen_strana_id_str,1);
END
Тоже самое делает и ‘тот триггер. только для таблицы strana, отметим что идентификационный номер
каждой новой страны или города увеличивается на 1.
2.4 Создание хранимых процедур
PROCEDURE STRANA_1(_S VARCHAR(30),_G VARCHAR(30),_S
INTEGER)select strana.nazvanie,goroda.nazvanie,strana.naseleniestrana,goroda(strana.id_str=goroda.id_str):strana_s,:gorod_g,:naselenie_s
do suspend;
Данная процедура осуществляет выборку из таблиц Strana и Goroda.
В данном варианте при выполнении хранимой процедуры будут показаны
название стран, городов, а так же население стран. Выборка осуществляется по
идентификатору страны.
.5 Разработка приложения для базы данных с помощью Borland Delphi
Основные компоненты которые использовались для создания
приложения:Компонент TDatabase позволяет наиболее эффективно управлять подключениями
к базам данных. Это управление включает:
создание постоянного подключения к базе данных;
отмену установленной по умолчанию регистрации на сервере;
создание псевдонима BDE на уровне приложения;
управление транзакциями и определение уровней их разграничения.компонент
IBTransaction, который будет использоваться в качестве умолчательного для
выполнения различных операций IBDatabase. Клиентская часть InterBase допускает
выполнение любых действий только в контексте транзакции. Поэтому если вы смогли
получить доступ к данным без явного вызова IBTransaction.StartTransaction, то
значит где то в недрах IBX этот вызов произошел автоматически. Такое поведение
крайне не рекомендуется использовать. Для корректной работы приложений с базой
данных желательно управлять транзакциями вручную, то есть явно вызывать методы
StartTransaction, Commit и Rollback компонента TIBTransaction.Назначение
компонента: буферизация записей, выбираемых оператором SELECT, для
представления этих данных в Grid, а также для обеспечения "редактируемости"
записи путем автоматического или ручного задания запросов Insert, Delete и
Update.Свойство DataSet обеспечивает связь между компонентом, представляющим
собой таблицу или запрос, и компонентами, предназначенными для доступа к
записям. Наличие этого свойства позволяет выбирать источник данных. Например,
база данных может быть организована таким образом, что таблица, состоящая из
большого числа записей, разделена на несколько подтаблиц, имеющих одинаковую
структуру. В этом случае в приложении каждой подтаблице будет соответствовать
свой компонент Table, а выбор конкретной подтаблицы можно осуществить
установкой значения свойства DataSet.Компонент Т PageControl может содержать
несколько прикрывающих друг друга панелей класса TtabSheet. Каждая панель выбирается связанной
с ней закладкой и может содержать свой набор помещенных на нее
компонентов.омпонент DBGrid обеспечивает представление базы данных в виде
таблицы. Свойства компонента DBGridl определяют вид таблицы и действия, которые
могут быть выполнены над данными во время работы программы.контекстное меню.
2.6 Блок схема
Рисунок. №1
Глава 3. Руководство пользователю
Для того, чтобы открыть приложение базы данных необходимо двойным кликом
мыши нажать на ярлык 
.
После запуска приложения появится основное окно программы
Рисунок. №2
Для добавления новых данных необходимо нажать на кнопку New, после чего появится дополнительное
окно в которое необходимо ввести новые данные.
Рисунок. №3
Для того чтобы изменить уже существующие данные, необходимо выбрать
интересующую запись и нажать кнопку Change, после чего появится дополнительное окно в котором можно изменить
данные. После внесенных изменений необходимо нажать кнопку Save для сохранения, либо Cancel для отмены.
Рисунок. №4
Для удаления существующих записей, необходимо выбрать ту запись, которую
следует удалить и нажать кнопку Delete.
Рисунок. №5
Так же в базе данных существует поиск по названию страны(города).
Для того, чтобы осуществить поиск, необходимо ввести название
страны(города) в соответствующее поле и нажать кнопку Search.
Рисунок. №6
Для того чтобы скопировать необходимые данные из таблицы , нужно зажав
кнопку Shift левой клавишей мыши, выбрать
интересующие записи, после чего нажать правой кнопкой мыши для вызова
контекстного меню и выбрать Copy.
Рисунок. №7
В базе данных ведется лог событий таблицы города. Все изменения
отображаются в закладке Log_Goroda.
Рисунок. №8
Заключение
В данной работе были кратко описаны основные характеристики системы
управления базами данных. Определены основные классы объектов БД, которые имеют
значение при использовании для решения наиболее распространенных задач. Interbase- хорошее решение для предприятий,
стремящихся совершенствовать управление бизнесом в условиях постоянно
изменяющегося рынка, стремящихся в максимально короткие сроки получить
правильное решение.
Разработанное приложение осуществляет основные операции: добавление,
изменение, удаление данных. Разработан поиск по названию стран
(городов).Возможно копирование данных из таблицы. Создана лог-таблица, в
которой ведется учет изменения данных.
Список литературы
1. www.ibase.ru;
2. Фаронов В.В. Delphi 6. Учебный курс. Москва 2003г.
. Шупрута В.В. Delphi 2005.
. Петр Дархвелидзе, Евгений Марков Программирование в Delphi7 СПб, 2003г.
5. megalib.com
Листинг программы
unit Unit1;
interface, Messages, SysUtils, Variants, Classes, Graphics,
Controls, Forms,, Grids, DBGrids, DB, IBCustomDataSet, IBDatabase, StdCtrls,,
Buttons, Mask, DBCtrls, Menus, QClipbrd;= class(TForm): TIBDatabase;:
TIBTransaction;: TIBDataSet;: TDataSource;: TDataSource;: TIBDataSet;:
TPageControl;: TTabSheet;: TTabSheet;: TDBGrid;: TDBGrid;: TBitBtn;: TBitBtn;:
TBitBtn;: TBitBtn;: TBitBtn;: TBitBtn;: TBitBtn;: TEdit;: TLabel;: TButton;:
TEdit;: TLabel;: TBitBtn;: TTabSheet;: TDBGrid;: TDataSource;: TIBDataSet;:
TPopupMenu;: TMenuItem;: TMenuItem;Button1Click(Sender:
TObject);Button2Click(Sender: TObject);BitBtn1Click(Sender: TObject);BitBtn3Click(Sender:
TObject);BitBtn2Click(Sender: TObject);BitBtn4Click(Sender:
TObject);BitBtn5Click(Sender: TObject);BitBtn6Click(Sender:
TObject);BitBtn7Click(Sender: TObject);BitBtn8Click(Sender:
TObject);FormCreate(Sender: TObject);DBGrid1DblClick(Sender: TObject);DBGrid2DblClick(Sender:
TObject);copy1Click(Sender: TObject);{ Private declarations }{ Public
declarations };: TForm1;Unit2, Unit3, Unit4, unit5;
{$R *.dfm}TForm1.Button1Click(Sender:
TObject);ibdataset2.Locate('NAZVANIE',Edit2.Text,[loPartialKey]) then
form2.Show('Не найдено');
//form1.ibdataset2.insert;
//form2.show;;TForm1.Button2Click(Sender:
TObject);.IBDataSet1.Post;;TForm1.BitBtn1Click(Sender: TObject);.Edit;
//ibdataset1.Post;.Show;;TForm1.BitBtn3Click(Sender:
TObject);.IBDataSet1.Insert;
//form1.IBDataSet1.Post;.Show;;TForm1.BitBtn2Click(Sender:
TObject);.Insert;
//ibdataset2.Post;.Show;;TForm1.BitBtn4Click(Sender:
TObject);
if MessageDlg ('Подтвердите удаление записи',
mtConfirmation, [mbYes, mbNo], 0) = mrYes
then.Delete;TForm1.BitBtn5Click(Sender:
TObject);.Edit;.Show;;TForm1.BitBtn6Click(Sender: TObject);
if MessageDlg ('Подтвердите удаление записи',
mtConfirmation, [mbYes, mbNo], 0) = mrYes
then.Delete;;TForm1.BitBtn7Click(Sender:
TObject);ibdataset1.Locate('NAZVANIE',Edit1.Text,[loPartialKey]) then
form3.Show('Не найдено');;TForm1.BitBtn8Click(Sender:
TObject);.show;;TForm1.FormCreate(Sender:
TObject);.Open;.Open;;TForm1.DBGrid1DblClick(Sender:
TObject);.Show;.IBDataSet1.Open;;TForm1.DBGrid2DblClick(Sender:
TObject);.Show;.IBDataSet1.Open;;TForm1.copy1Click(Sender: TObject);, j:
Integer;: string;DBGrid2.SelectedRows.Count>0 thenDBGrid2.DataSource.DataSet
doi:=0 to DBGrid2.SelectedRows.Count-1
do(pointer(DBGrid2.SelectedRows.Items[i]));j := 0 to FieldCount-1 do(j>0)
then s:=s+', ';:=s+Fields[j].AsString;;:= s+#13+#10;;.AsText := s;;.Unit2;,
Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, StdCtrls,
DBCtrls, Mask, Buttons;= class(TForm): TDBEdit;: TDBEdit;: TDBEdit;: TButton;:
TLabel;: TLabel;: TLabel;: TBitBtn;Button1Click(Sender:
TObject);BitBtn1Click(Sender: TObject);
{ Private declarations }
{ Public declarations };: TForm2;unit1;
{$R *.dfm}TForm2.Button1Click(Sender:
TObject);.IBDataSet2.Post;.Close;;TForm2.BitBtn1Click(Sender:
TObject);.Close;;.Unit3;, Messages, SysUtils, Variants, Classes, Graphics,
Controls, Forms,, StdCtrls, Buttons, Mask, DBCtrls;= class(TForm): TDBEdit;:
TDBEdit;: TDBEdit;: TDBEdit;: TLabel;: TLabel;: TLabel;: TLabel;: TBitBtn;:
TBitBtn;BitBtn1Click(Sender: TObject);BitBtn2Click(Sender:
TObject);FormCreate(Sender: TObject);
{ Private declarations }
{ Public declarations };: TForm3;unit1;
{$R *.dfm}TForm3.BitBtn1Click(Sender:
TObject);.IBDataSet1.Post;.Close;;TForm3.BitBtn2Click(Sender:
TObject);.Close;;TForm3.FormCreate(Sender: TObject);;.Unit4;, Messages,
SysUtils, Variants, Classes, Graphics, Controls, Forms,, StdCtrls;=
class(TForm): TEdit;: TEdit;: TButton;Button1Click(Sender:
TObject);FormCreate(Sender: TObject);
{ Public declarations };: TForm4;unit1; {$R
*.dfm}TForm4.Button1Click(Sender:
TObject);.IBDatabase1.Params.Clear;.IBDatabase1.Params.Add('user_name='+Edit1.Text);.IBDatabase1.Params.Add('password='+Edit2.Text);.IBDatabase1.Params.Add('lc_ctype=WIN1251');.IBDatabase1.Connected:=True;.IBTransaction1.StartTransaction;.IBDataSet1.Open;.IBDataSet2.Open;.IBDataSet3.Open;.Close;;TForm4.FormCreate(Sender:
TObject);;.Unit5;, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,, DB, IBCustomDataSet, Grids, DBGrids;= class(TForm): TDBGrid;: TDataSource;:
TIBDataSet;FormCreate(Sender: TObject);
{ Private declarations }
{ Public declarations };: TForm5;unit1;
{$R *.dfm}TForm5.FormCreate(Sender: TObject);.