Создание редактора. 
Технология разработки программного обеспечения на тему "Торговля"

Создаем новую форму (File -> New -> Form). Ее свойство Name переименовываем в fEditor, а при сохранении формы даем имя Editor. Командой File -> Use Unit подключаем к форме модуль данных DM. Теперь на форму устанавливаем компоненты.

Устанавливаем в форму два GroupBox с вкладки Standard. В свойстве Caption первой GroupBox впишем «Наименование» а во второй «Данные», они отразятся в заголовке панели. Выделив первый GroupBox, и дважды щелкнув по событию onExit на вкладке Events инспектора объектов. Это событие происходит всякий раз, когда пользователь перейдет к другой панели GroupBox, либо к кнопкам, расположенным в нижней части окна. В сгенерированной процедуре впишем код:

Рисунок 14.

Так же сгенерируем onExit для оставшегося GroupBox-а.

Рисунок 15.

Наш редактор будет выглядет именно так Рисунок 16.

Потом сгенерируем процедуру нажатия на кнопку «Сохранить и выйти» для этого в обработчике событий пишем:

Рисунок 17.

Здесь мы лишь сохраняем изменения во всех таблицах, если они были, и закрываем окно. Далее кнопка «Добавить»:

Рисунок 18.

Здесь добавляем новую запись в каждую таблицу и переводим курсор в первый DBEdit, в котором редактируется наименование.

С этой формой закончили, соединяем его с главной формой File — Use Unit и переходим к главной форме.

В главной форме мы ранее поместили четыре кнопки и в их обработчике события пишем следующее:

Для редактирования:

Рисунок 19.

Здесь переходим в редактор с помощью команды ShowModal.

Для добавления:

Рисунок 20.

Здесь добавляем новую запись в каждую таблицу и переводим в редактор с помощью команд Append и ShowModal.

Для удаления:

Рисунок 21.

Здесь удаляем выбранные данные с каждой таблицы с помощью команду Delete.

Для выхода:

Рисунок 22.

Здесь просто закрываем проект через команду Close.

Создание раздела поиска

Для создания поиска в главную форму мы ранее поместили компоненты Edit и ComboBox. Заполняем свойство Items в Combobox именами столбцов таблицы Tovar (Наименование, Тип).

Затем в обработчике события Edit1Change пишем следующее:

Рисунок 23.

Здесь фильтруем данные по одному из столбцов на выбор и отсеиваем данные по мере ввода искомой строки в Edit.

Вот и все проект готов теперь запустим его и добавим нужные нам данные.

Рисунок 24.