-height:12pt">      Then

        Begin

            New(kv);

            kv.next := es.next;

            es^.next := kv;

            kv^.info := cop;

        End;

 

    //Вывод нового  списка в поле вывода

    Form1.Memo4.Lines.Add(es^.info);

 

    schet := schet +1;

    es:= es.next;

  End;

end;

 

procedure TForm1.Button3Click(Sender: TObject);

Var

  m : Ukazatel;

begin

  //Вывод полученного  динамического списка построчно

  m := es;

  Form1.Memo3.Lines.Clear;

  While m<> nil do

  Begin

    Form1.Memo3.Lines.Insert(0,m^.info);

    m:= m^.next;

  End;

end;

 

end.

 

Пример  выполнения программы.

 

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

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

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

Также посмотрим сам  первоначальный динамический список:

На скриншоте  хорошо видно, что первые строчки  текста являются последними элементами динамического списка, т.к. программа  новый элемент списка добавляет  в начало этого списка.

Произведем  изменения созданного списка – скопируем 4 строку после 5 строки. Ниже на скриншоте видно новую добавленную строку (идентичную строке через одну выше):

Теперь выведем данный текст «на печать»:

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Задание №3

 

ООП.  Разработать программу «Продажа программных продуктов» , использующую внешнюю базу данных. БД содержит следующие поля: наименование, фирма изготовитель, цена комплекта, дата продажи, количество на складе. Реализовать в программе возможность сортировки данных, а также поиск нужной информации с помощью Sql-запросов.

 

Решение:

 

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

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

• синхронный просмотр информации о программных продуктах, ценах, датах продаж;
• редактирование таблиц базы данных (т.е. добавление, удаление записей);
• поиск нужного продукта;

 

В качестве внешний БД будем  использовать Microsoft Access.

Достоинства БД MS Access.

 

Принято считать самой  популярной системой управления базами данных для персональных компьютеров  продукт, впервые появившийся в 1992 году и носящий название Microsoft Access.

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

Microsoft Access – это полнофункциональная  реляционная СУБД. В ней предусмотрены  все необходимые средства для  определения и обработки данных, а так же для управления  ими при работе с большими  объемами информации.

Информация, имеющая определенную ценность, нуждается в защите, как  от «дурака», так и от несанкционированного доступа.

Защита паролем, сохранение базы данных в виде MDE-файла (в этом случае базу данных можно открывать  для просмотра, но не для изменения) могут «закрыть» для случайного пользователя возможности, которые  не разрешается использовать. Но опытный  пользователь Access может открыть  базу данных при нажатой клавише Shift (чтобы не запустить приложение), изучить исходные тексты процедур и  определить, как «взломать» защиту. Чтобы действительно предотвратить  несанкционированный доступ к объектам этой базы, необходимо использовать средства защиты, встроенные в Access.

Вряд ли существует абсолютно  надежная компьютерная система защиты. Хотя средства защиты Microsoft Access считаются  одними из лучших для персональных компьютеров, найдутся умельцы, которые  при наличии времени смогут проникнуть в вашу защищённую базу данных Access. Если нужна более надежная защита данных, подумайте о переходе к  другой системе управления базами данных класса Microsoft SQL Server.

 

 

Описание  среды разработки.

 

Наряду с традиционными  инструментами доступа к данным Borland Database Engine и ODBC в приложениях Delphi можно применять технологию Microsoft ActiveX Data Objects (ADO), которая основана на возможностях СОМ, а именно интерфейсов OLE DB.

Технология ADO завоевала  популярность у разработчиков, благодаря  универсальности — базовый набор  интерфейсов OLE DB имеется в каждой современной операционной системе Microsoft. Поэтому для обеспечения  доступа приложения к данным достаточно лишь правильно указать провайдер  соединения ADO и затем переносить программу на любой компьютер, где  имеется требуемая база данных и, конечно, установленная ADO.

В Палитре компонентов Delphi есть страница ADO, содержащая набор  компонентов, позволяющих создавать  полноценные приложения БД, обращающиеся к данным через ADO.

Механизм доступа к  данным через ADO и многочисленные объекты  и интерфейсы реализованы в VCL Delphi в виде набора компонентов, расположенных  на странице ADO. Все необходимые интерфейсы, обеспечивающие работу компонентов, объявлены  и описаны в файлах OleDB.pas и ADODB.pas в папке \Delphi7\Source\Vcl.

Компоненты для работы с базами данных:

• AdoConnection. Компонент TADOConnection вобрал возможности перечислителя, источника данных и сессии с возможностями обслуживания транзакций. Свойство connectionstring предназначено для хранения информации о соединении с объектом ADO.
• AdoTable. Компонент ТАDOTаblе обеспечивает использование в приложениях Delphi таблиц БД, подключенных через провайдеры OLE DB.
• DataSource. Данный компонент служит в качестве связующего звена между не визуальными компонентами (в данном случае Table1) и визуальными компонентами, которые будут добавлены позже.
• DBGrid. Данный компонент служит для отображения записей набора данных в табличной форме.
• ADOQuery. Компонент TADOQuery обеспечивает применение запросов SQL при работе с данными через ADO. По своей функциональности он подобен стандартному компоненту запроса.
• Button – используется для создания кнопок, которыми пользователь выбирает команды в приложении.
• TListBox – Представляет собой стандартное окно списка Windows, позволяющее пользователю выбирать пункты из списка.
• ComboBox  – объединяет  функции ListBox и Edit. Пользователь может либо ввести текст, либо выбрать его из списка.
• Edit – используется для ввода пользователем однострочных текстов. Может использоваться для отображения текста.