База данных магазина 'Автозапчасти'

База данных магазина 'Автозапчасти'

Содержание

Введение

1. Постановка задачи "Разработать постановку и осуществить программную реализацию одного из модулей задачи "Информационная система магазина АЗ-01" (Магазин "Автозапчасти")

1.1 Характеристика задачи АЗ-01

.2 Выходная информация задачи АЗ-01

.3 Входная информация задачи АЗ-01

.4 Выбор и обоснование состава технических средств и средств программной реализации задачи АЗ-01

2. Разработка алгоритма и программы решения задачи

2.1 Разработка математического алгоритма решения задачи

.2 Разработка схемы данных программы с описанием задачи

.3 Разработка схемы программы решения задачи с описанием

3. Разработка руководства пользователя и контрольного примера, демонстрирующего корректность решения задачи "Разработать постановку и осуществить программную реализацию одного из модулей задачи: "Информационная система АЗ-01" (Магазин "Автозапчасти")

Заключение

Список используемых источников

Приложения

Введение

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

Сейчас же, в век компьютерных технологий и больших прогрессов в этой сфере, на смену картотекам пришли очень удобные, надёжные, быстродействующие компьютерные системы. Для решения задач с использованием компьютерных систем используется специальное программное обеспечение, часто объединенное в крупные информационно-справочные системы.

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

Постепенно с развитием программного обеспечения ЭВМ появились идеи создания управляющих систем, которые позволяли бы накапливать, хранить и обновлять взаимосвязанные данные по целому комплексу решаемых задач, например при автоматизации бухгалтерского учета на предприятии. Эти идеи нашли свое воплощение в системах управления базами данных (СУБД). СУБД взаимодействуют не с локальными, а взаимосвязанными по информации массивами, называемыми базами данных. С появлением персональных компьютеров СУБД становятся наиболее популярным средством обработки табличной информации. Они являются инструментальным средством проектирования банков данных при обработке больших объемов информации.

Одной из таких информационно-справочной системой является моя база данных магазина "Автозапчасти". Она позволяет автоматизировать многие процессы, связанные с вводом и обработкой информации большого объема. Эта программа должна облегчить работу сотрудников магазина и решить большинство проблем, вызванных недостатками бумажных носителей.

В данной курсовой работе описание разрабатываемой задачи произведено в трех главах.

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

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

В третий главе приводится описание контрольного примера решения задачи и руководство пользователя.

. Разработка постановки задачи "Информационная система АЗ-01" (магазин "Автозапчасти")

1.1     Характеристика задачи АЗ-01

Цель курсовой работы - создание программного продукта для автоматизации работы магазина "Автозапчасти" и соответствующей ему документации.

Результат решения задачи используется всеми сотрудниками желающими посмотреть информацию об автозапчастях.

Выходная информация задачи хранится в виде файлов базы данных (БД), выводится на экран монитора в виде форм, на основании которых создаются отчеты для вывода на печать.

Периодичность решения задачи - задача решается каждый раз, как только начинается смена в магазине.

Входная информация задачи поступает на обработку в виде записей хранимых в файлах баз данных.

Прекращение решения задачи выполняется при выходе нового программного обеспечения связанного с решением данной задачи.

Связь задачи АЗ-01 с другими задачами заключается в использовании плановой информации связанной с магазином "Автозапчасти". Эта информация может передаваться для обработки в рассматриваемую задачу, в виде файлов базы данных.

.2       Выходная информация задачи АЗ-01

Результатом решения задачи АЗ-01 являются следующие сообщения:

информация о проданных автозапчастях;

информация о поступивших автозапчастях;

отчет о выработке сотрудников;

информация о поставщиках.

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

Перечень и описание выходных сообщений задачи АЗ-01 представлены в виде таблицы 1, перечень и описание структурных единиц информации выходных сообщений задачи АЗ-01 - в таблице 2.

Таблица 1. Перечень и описание выходных сообщений задачи АЗ-01

Таблица 2. Перечень и описание структурных единиц информации выходных сообщений задачи АЗ-01

.3       Входная информация задачи АЗ-01

Для решения задачи АЗ-01 с использованием средств вычислительной техники используются данные из следующих таблиц:

-       "Накладная";

-       "Детали";

-       "Покупатели".

Перечень и описание входных сообщений задачи АЗ-01 приведены в таблице 3, перечень и описание структурных единиц информации входных сообщений - в таблице 4.

Таблица 3. Перечень и описание входных сообщений задачи АЗ-01

Таблица 4. Перечень и описание структурных единиц информации входных сообщений задачи АЗ-01

1.4 Выбор и обоснование состава технических средств и средств программной реализации задачи АЗ-01

Для решения задачи АЗ-01 использован IBM-совместимый ПК.

Решение задачи АЗ-01 с использованием средств вычислительной техники предоставляет следующие преимущества:

-       уменьшение времени на сбор исходной информации и подведения итогов;

-       сокращение бумажного документооборота;

-       повышение надежности хранения информации;

-       увеличение достоверности результатов решения задачи.

Задача АЗ-01 может быть реализована на IBM-совместимом ПК, имеющем следующие минимальные характеристики:

-       процессор тактовая частота, МГц 800;

-       оперативная память, Мб 128;

-       свободного места на НЖМД, Мб 100;

-       монитор, Дюйм 15;

-       операционная система Windows XP.

В состав так же входят следующие технические средства:

-       CDROM;

-       манипулятор типа мышь;

-       клавиатура.

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

-       необходимость концентрации всех подлежащих обработке данных;

-       значительный объем корректировок.

Программная реализации задачи АЗ-01 основана на реляционной модели данных.

В качестве массивов данных предназначенных для хранения записей в данной программе используются таблицы базы данных приложения Microsoft Access.

Для разработки программного обеспечения задачи АЗ-01 выбрана среда разработки Delphi 7 по следующим причинам (достоинствам):

-       позволяет создавать приложения для работы с базами данных.

-       высокая скорость работы, большое количество библиотек компонентов;

-       позволяет использовать различные технологии доступа к данным, в том числе и ADO (наиболее простая технология доступа к данным).

У данной среды программирования не только одни достоинства имеются, так же и недостатки и главным является, низкая эффективность системы доступа к данным по технологии ADO (не обходимо наличие установленных драйверов BDE на машине пользователя для обеспечения работоспособности приложения использующих данную технологию доступа). В качестве метода организации внутримашинной технологии обработки данных для решения задачи АЗ-01 выбран диалоговый режим, который предусматривает возможность многократного поступления информации и запросов пользователя. В процессе решения задачи рациональность диалогового режима в полной мере проявляется в процессе общения пользователя с БД.

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

. Разработка алгоритма и программы решения задачи "Информационная система АЗ-01"

.1 Разработка формализованного описания алгоритма решения задачи АЗ-01

) Первая процедура предназначена для получения информации о нужной детали в таблице базы данных:

Поставщики.Поставщик, Поставщики.[№ поставщика], Накладная.Количество, Накладная.Стоимость, Детали.НазваниеДетали RIGHT JOIN (Поставщики LEFT JOIN Накладная ON Поставщики.[№ поставщика] = Накладная.[№ поставщика]) ON Детали.[№ детали] = Накладная.[№ детали](((Детали.Название)=[Название детали]));

) Вторая процедура предназначена для вывода на экран инвентаризационной ведомости:

Детали.[№ детали], Детали.Название, Детали.Количество, Детали.Фирма, Детали.[№ склада], Детали.[№ ячейки]Детали;

) Третья процедура предназначена для получения информации о бракованных деталях:

Брак.[№ брака], Детали.[№ детали], Детали.НазваниеБрак LEFT JOIN Детали ON Брак.[№ детали]=Детали.[№ детали];

4) Четвёртая процедура предназначена для вывода перечни проданных деталей за определенный день :

Детали.Название, Заявки.Количество, Заявки.Стоимость, Продажи.[Дата продажи](Детали LEFT JOIN Заявки ON Детали.[№ детали]=Заявки.[№ детали]) LEFT JOIN Продажи ON Заявки.[№ заявки]=Продажи.[№ заявки](((Продажи.[Дата продажи])=[Дата]));

.2 Разработка схемы данных задачи АЗ-01 с описанием

Схема данных отображает потоки данных при решении задачи, определяет этапы их обработки, а также применяемые носители данных. Схема данных программы АЗ-01 приведена на рисунке 1, а её описание приведено в таблице 5.

Рисунок 1 - Схема данных задачи АЗ-01

Таблица 5. Описание схемы данных задачи АЗ-01

2.3 Разработка схемы программы решения задачи АЗ-01 с описанием

Схема программы отображает последовательность операций выполняемых в программе. Схема программы АЗ-01 приведена на рисунке 2, а её описание приведено в таблице 6.

Рисунок 2 - Схема программы

Таблица 6. Описание схемы программы АЗ-01

Исходный код программы представлен в приложении Е.

. Разработка руководства пользователя и контрольного примера, демонстрирующего корректность решения задачи "Разработать постановку и осуществить программную реализацию одного из модулей задачи: "Информационная система магазина автозапчастей (АЗ-01)"

В начале работы с приложением необходимо чтобы приложение было установлено на компьютере пользователя, для этого нужно скопировать каталог "Курсовая ТРПП Ефремов ПО-31" с CDROM диска в любой каталог указанный пользователем, например "С:\ Курсовая ТРПП Ефремов ПО-31".

До начала работы с программой АЗ-01 необходимо учитывать тот факт, что таблицы "Склад", "Детали", "Брак", "Поставщики", "Покупатели", "Накладная", "Продажи", "Заявки" базы данных должны быть заполнены соответствующими данными. Заполнение всех таблиц происходит аналогично и по следующему алгоритму.

Запускаем программу "Project1.exe" из каталога ""С:\ Курсовая ТРПП Ефремов ПО-31". Запуск осуществляется аналогично запуску любой программы в операционной системе Windows, а именно двойным нажатием левой кнопки мыши на указанно выше файле, или одинарным нажатием, на том же файле, кнопки Enter. У Вас запустится программа как показано на рисунке 3.

После запуска программы Project1.exe выбираем пункт меню "Таблицы" главного меню, в этом списке выбираем первый пункт подменю "Склад". Запускается дополнительное приложение, как показано на рисунке 4, позволяющее вносить данные в таблицу, редактировать их и удалять. Чтобы добавить следующий склад необходимо нажать на кнопку 5, как показано на рисунке 4.

Рисунок 4 - Склад

После нажатия на кнопке 5, все записи таблицы спустятся на одну ниже от положения курсора, а курсор останется на новой пустой строке. В этой пустой строке поочередно вводим новые данные. В результате проделанных действий в таблице появится строка, как показано на рисунке 5 - это новая запись и её необходимо сохранить. Сохранить вновь введённые данные можно просто, переведя курсор на уже имеющиеся записи в таблице или нажав кнопку 8, как показано на рисунке 4, к этому моменту она уже будет активна. Данные сохранены.

Внесенные ранее данные можно редактировать и удалять, используя для этого следующие кнопки навигации:

) Кнопки 1-4 предназначены для навигации (движения) по таблице.

) Кнопка 6 предназначена для удаления текущей записи (записи, на которой расположен курсор).

) Кнопка 7 предназначена для редактирования текущей записи.

Рисунок 5 - Форма таблицы после добавления записи

После того, как таблица "Склад" заполнена необходимыми данными, нужно закрыть это приложение. И в главном окне формы выбрать пункт меню "Таблицы"\"Покупатели", запустится приложение, изображенное на рисунке 6.

Рисунок 6 - Таблица Покупатели

Добавление нового клиента в таблицу этого приложения происходит по алгоритму заполнения таблицы "Склад".

После того, как таблица "Покупатели" заполнена необходимыми данными, нужно закрыть это приложение. И в главном окне формы выбрать пункт меню "Таблицы"\"Поставщики", запустится приложение, изображенное на рисунке 7.

Рисунок 7 - Таблица Поставщики

Заполнение таблицы этого приложения происходит по алгоритму заполнения таблицы "Склад".

После того, как таблица "Поставщики" заполнена необходимыми данными, нужно закрыть это приложение. И в главном окне формы выбрать пункт меню "Таблицы"\"Брак", запустится приложение, изображенное на рисунке 8.

Рисунок 8 - Таблица Брак

Заполнение таблицы этого приложения происходит по алгоритму заполнения таблицы "Склад".

После того, как таблица "Брак" заполнена необходимыми данными, нужно закрыть это приложение. И в главном окне формы выбрать пункт меню "Таблицы"\"Накладная", запустится приложение, изображенное на рисунке 9.

Рисунок 9 - Таблица Накладная

Заполнение таблицы этого приложения происходит по алгоритму заполнения таблицы "Склад".

После того, как таблица "Накладная" заполнена необходимыми данными, нужно закрыть это приложение. И в главном окне формы выбрать пункт меню "Таблицы"\"Заявки", запустится приложение, изображенное на рисунке 10.

Рисунок 10 - Таблица Заявки

Заполнение таблицы этого приложения происходит по алгоритму заполнения таблицы "Склад". После того, как заполнены таблицы, можно приступать к выполнению запросов. Перейдем на главное окно формы для выбора пункта меню "Запросы"\"Информация о деталях", запустится окно ввода параметра изображенное на рисунке 11. Далее вводим название детали, например "Двигатель", и жмем ОК, появляется результат, изображенный на рисунке 12. Дальше можно вернуться на главное окно, нажав кнопку "Назад", или сделать отчет, используя MS Excel, нажав кнопку "Отчет".

Рисунок 11 - Окно ввода параметра

Рисунок 12 - Запрос Информация о деталях

Данный запрос отображает информацию о детали, название которой вы ввели. После того, как мы узнали информацию о двигателях, перейдем на главное окне формы для выбора пункта меню "Запросы"\"Инвентаризационная ведомость", запустится приложение изображенное на рисунке 13. Дальше можно вернуться на главное окно, нажав кнопку "Назад", или сделать отчет, используя MS Excel, нажав кнопку "Отчет".

Рисунок 13 - Запрос Инвентаризационная ведомость

Данный запрос отображает информацию о деталях и где они хранятся.

Далее перейдем на главное окне формы для выбора пункта меню "Запросы"\"Бракованные детали", запустится приложение, изображенное на рисунке 14. Дальше можно вернуться на главное окно, нажав кнопку "Назад", или сделать отчет, используя MS Excel, нажав кнопку "Отчет".

Рисунок 14 - Запрос Бракованные детали

информационный программный база данные

В результате выполнения данного запроса, можно получить данные о Бракованных деталях.

Это приложение позволяет выполнять с данными таблицы действия, описанные выше (сохранять, изменять, удалять данные и перемещаться по таблице), Возможно так же выполнение заданных программно запросов. Для исполнения запросов нужно выбрать пункт меню приложения "Запросы".

Заключение

В результате выполнения курсовой работы были закреплены практические и теоретические знания, полученные при изучении дисциплины "Технология разработки программных продуктов".

В соответствии с требованием заказчика была разработана база данных с использованием средств вычислительной техники. В ходе выполнения работы была использована реляционная СУБД Microsoft Access 2000.

В созданной базе данных переход по формам осуществляется с помощью обработчика событий - нажатие на кнопку, так как главная форма "АЗ-01" запускается автоматически и оснащена меню и кнопками.

При дальнейшей доработке базу данных можно существенно модернизировать, используя создание запросов, создание и пополнение таблиц новыми данными, создание форм и отчетов. Также можно усовершенствовать её надёжность и функциональность.

Список используемых источников

Н. И. Полтавцева Правила оформления текста курсовой и дипломной работы, 2008

И.И. Мирошниченко Методические рекомендации по выполнению и защите курсовой работы для студентов специальности 230105. - Ростов-на-Дону: РГКРИПТ, 2009

Т. А. Гайворонская Базы данных. Методические рекомендации по выполнению практических заданий для студентов 3 курса. - г. Ростов-на-Дону: РГКРИПТ, 2009

Освой самостоятельно SQL. 10 минут на урок, 3-е издание.: Пер. с англ. - М.: Издательский дом "Вильямс", 2009

Microsoft Access 2003. Эффективный самоучитель/ Пер. с чеш. Серия "Просто о сложном". - СПб.: Наука и Техника, 2010

Разработка приложений в Ms Access. Краткое руководство. - М.: Издательский дом "Вильямс", 2009

Access: учебно - практ. пособие. - М.: ТК Велби, Изд-во Проспект, 2010

Практикум по Access. - М.: Финансы и статистика, 2009

#"588018.files/image016.gif">

Рисунок А1 - Диаграмма вариантов использования

Приложение Б

Рисунок Б1 - Диаграмма сотрудничества

Таблица Б1. Описание действий

Приложение В

Рисунок В1 - Диаграмма последовательности

Таблица В1. Описание действий

Приложение Г

Рисунок Г- ER-диаграмма

Приложение Д

Техническое задание

Введение

Настоящее техническое задание распространяется на разработку одного из модулей задачи "Автоматизация работы магазина "Автозапчасти"", предназначенного для использования сотрудниками магазина.

Основание для разработки

Задание на курсовую работу по дисциплине "Технология разработки программного продукта" от 23.03.2012 г.

Назначение

Основным назначением программы является учет продаваемых автозапчастей, информация о поставщиках и сотрудниках.

. Требования к программе или программному изделию

.1Требования к функциональным характеристикам;

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

Ввод и изменение данных;

Автоматическое обновление данных на основании накладной;

Удаление данных на основании проданного товара.

.1.2 Исходные данные:

накладные;

квитанции;

.2Требования к надежности

.2.1 Предусмотреть контроль вводимой информации.

.2.2 Предусмотреть блокировку некорректных действий пользователя при работе с системой.

.3Требования к составу и параметрам технических средств:

.3.1 Система должна работать на IВМ совместимых ПК

.3.2 Минимальная конфигурация:

тип процессора - Pentium 2 и выше;

объем ОЗУ - 128 и выше

.4Требования к информационной и программной совместимости:

Система должна работать под управлением семейства операционных систем Win 32.

Требования к программной документации

.1Разрабатываемые программные модули должны быть самодокументированы, т. е. тексты программ должны содержать все необходимые комментарии.

.2В состав сопровождающей документации должны входить:

Пояснительная записка, содержащая описание разработки.

Руководство пользователя.

. Этапы разработки

Приложение Е

Исходный текст задачи АЗ-01

Программный код для Главной формы

unit Unit1;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,,Menus, unit3,unit4, unit5, unit6, unit7, unit8, unit9, unit10,, jpeg, unit11, unit12, unit13, unit14 ;= class(TForm): TMainMenu;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TImage;N19Click(Sender: TObject);N20Click(Sender: TObject);N21Click(Sender: TObject);N22Click(Sender: TObject);N23Click(Sender: TObject);N24Click(Sender: TObject);N25Click(Sender: TObject);N26Click(Sender: TObject);N27Click(Sender: TObject);N28Click(Sender: TObject);N29Click(Sender: TObject);N15Click(Sender: TObject);N18Click(Sender: TObject);

{ Private declarations }

{ Public declarations };: TForm1;Unit2;

{$R *.dfm}TForm1.N25Click(Sender: TObject);

begin.Show; //Показать форму "Продажи".Visible:=false; //Скрыть Главную форму

end;TForm1.N27Click(Sender: TObject);.Show;.Visible:=false;;TForm1.N28Click(Sender: TObject);.Show;.Visible:=false;;TForm1.N29Click(Sender: TObject);.ADOQuery4.Parameters[0].Value:=InputBox('Ввод параметра','Введите дату',''); // Окно ввода параметра для запроса

DataModule2.ADOQuery4.Active:=true;.Show; // Показать запрос "Перечень проданных деталей в определенный день".Visible:=false; // Скрыть Главную форму

end;TForm1.N15Click(Sender: TObject);

begin; // Закрытие Главной формы;

procedure TForm1.N18Click(Sender: TObject);.Show;.Visible:=false;;TForm1.N19Click(Sender: TObject);.Show;.Visible:=false;;TForm1.N20Click(Sender: TObject);.Show;.Visible:=false;;TForm1.N21Click(Sender: TObject);.Show;.Visible:=false;;TForm1.N22Click(Sender: TObject);.Show;.Visible:=false;;TForm1.N23Click(Sender: TObject);.Show;.Visible:=false;;TForm1.N24Click(Sender: TObject);.Show;.Visible:=false;;TForm1.N26Click(Sender: TObject);.ADOQuery1.Parameters[0].Value:=InputBox('Ввод параметра','Введите название детали','');.ADOQuery1.Active:=true;.Show;.Visible:=false;;.

Программный код для Формы № 2

Форма для помещения компонентов, позволяющая связать базу данных в Access с Delphi.

unit Unit2;, Classes, DB, ADODB;= class(TDataModule): TADOTable;: TDataSource;: TADOTable;: TDataSource;: TADOTable;: TDataSource;: TADOTable;: TDataSource;: TADOTable;: TDataSource;: TADOTable;: TDataSource;: TADOTable;: TDataSource;: TADOTable;: TDataSource;: TADOConnection;: TADOQuery;: TDataSource;: TADOQuery;: TDataSource;: TADOQuery;: TDataSource;: TADOQuery;: TDataSource;

{ Private declarations }

{ Public declarations };: TDataModule2;

{$R *.dfm}

end.

Программный код для Формы № 3

Форма таблицы "Склад".

unit Unit3;

interface, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, unit2, ExtCtrls, DBCtrls, Grids, DBGrids, StdCtrls, ComObj;= class(TForm): TDBGrid;: TDBNavigator;: TButton;Button1Click(Sender: TObject);FormClose(Sender: TObject; var Action: TCloseAction);

{ Private declarations }

{ Public declarations };: TFormSklad;Unit1;

{$R *.dfm}TFormSklad.Button1Click(Sender: TObject);.Close; // Закрыть форму "Склад"

Form1.Visible:=true; // Показать Главную форму

end;TFormSklad.FormClose(Sender: TObject; var Action: TCloseAction);.Visible:=true;; end.

Программный код для формы № 11

Форма для запроса "Информация о деталях".

unit Unit11;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, unit2, StdCtrls, ExtCtrls, DBCtrls, Grids, DBGrids, ComObj;= class(TForm): TDBGrid;: TButton;: TButton;Button1Click(Sender: TObject);FormClose(Sender: TObject; var Action: TCloseAction);FormActivate(Sender: TObject);Button2Click(Sender: TObject);

{ Private declarations }

{ Public declarations };: TForm11;Unit1;

{$R *.dfm}TForm11.Button1Click(Sender: TObject);

begin.Close; // Закрыть запрос "Информация о деталях"

Form1.Visible:=true;;TForm11.Button2Click(Sender: TObject); // Процедура выполнения отчета,Sheet,Column:Variant;,i:integer;:=CreateOleObject('Excel.Application');.Visible:=true;.Workbooks.Add(-4167);.Workbooks[1].WorkSheets[1].Name:='Отчет';:=XLApp.Workbooks[1].WorkSheets['Отчет'].Columns;.Columns[1].ColumnWidth:=20;.Columns[2].ColumnWidth:=20;.Columns[3].ColumnWidth:=20;.Columns[4].ColumnWidth:=20;:=XLApp.Workbooks[1].WorkSheets['Отчет'].Rows;.Rows[1].Font.Bold:=true;.Rows[1].Font.Color:=clBlue;.Rows[1].Font.Size:=14;:=XLApp.Workbooks[1].Worksheets['Отчет'];

Sheet.Cells[1,2]:='Информация о деталях';.Cells[2,1]:='Поставщик';.Cells[2,2]:='№ поставщика';.Cells[2,3]:='Количество';.Cells[2,4]:='Стоимость';

Sheet.Cells[2,5]:='Название';:=3;.ADOQuery1.First;i := 0 to DataModule2.ADOQuery1.RecordCount-1 do.Cells[index,1]:=DataModule2.ADOQuery1.Fields.Fields[0].AsString;.Cells[index,2]:=DataModule2.ADOQuery1.Fields.Fields[1].AsString;.Cells[index,3]:=DataModule2.ADOQuery1.Fields.Fields[2].AsString;.Cells[index,4]:=DataModule2.ADOQuery1.Fields.Fields[3].AsString;.Cells[index,5]:=DataModule2.ADOQuery1.Fields.Fields[4].AsString;(index);.ADOQuery1.Next;;;TForm11.FormActivate(Sender: TObject);.ADOQuery1.Active:=true;.Columns[0].Width:=100;.Columns[4].Width:=100;;TForm11.FormClose(Sender: TObject; var Action: TCloseAction);.Visible:=true;;

end.