Соединение компонентов ADO с хранилищем данных. Пример простейшего приложения

   
На этом шаге мы рассмотрим создание простейшего приложения, иллюстрирующий доступ к базе данных формата Paradox.

   
Начните новый проект Delphi. Переместите на форму следующие компоненты:

  • Компонент TADOTable (Вкладка ADO).
  • Компонент TDataSource (Вкладка Data Access).
  • Компонент TDBGrid (Вкладка Data Controls).
  •    
    Создайте строку подключения для компонента TADOTable так же как показано на
    шаге 4.

       
    Замечание.
    При создании строки подключения можно использовать созданные ранее источники данных. Используйте созданный на шаге 4 источник данных Sport.

       
    Теперь раскройте свойство TableName (название таблицы) компонента TADOTable и выберите
    Players. Чтобы данные из набора данных ADOTable1 отобразились в сетке DBGrid1
    нужно связать эти два компонента с помощью специального компонента TDataSource: свойство DataSet компонента
    DataSource1 установите равным ADOTable1, а свойство DataSource компонента
    DBGrid1 установите равным DataSource1.

       
    С помощью свойства Active компонента ADOTable1 вы можете еще во время проектирования приложения соединиться с базой данных.
    Установите свойство Active компонента
    ADOTable1 равным True. В результате таблица Players отобразится в сетке
    DBGrid1 (рисунок 1).


    Рис. 1. Пример простейшего приложения во время проектирования

       
    Текст этого приложения можно взять здесь.

       
    Замечание.
    Заранее выставлять для таблиц свойство Active равным True допустимо только в процессе настройки
    и отладки приложения. В законченных приложениях свойство Active во всех таблицах должно быть сначала
    установлено в False, а затем при событии формы OnCreate эти свойства могут быть установлены
    в True, а при событии формы OnDestroy эти свойства опять должны быть установлены в False.
    Это иссключит неоправданное поддержание связи с базой данных, которое занимает дополнительные ресурсы системы.

       
    Методы Open и Close компонента TADOTable позволяют открывать и закрывать набор данных.
    Обработчики событий OnCreate и OnDestroy формы могут выглядеть следующим образом:

       procedure TForm1.FormCreate(Sender: TObject);
       Begin
          ADOTable1.Open;
       End;
    
       procedure TForm1.FormDestroy(Sender: TObject);
       Begin
          ADOTable1.Close;
       End;
    

       
    Замечание.
    Если попытаться запустить приложение во время проектирования (клавиша F9), отладчик выдает сообщение
    об ошибке (рисунок 2).


    Рис. 2. Ошибка при использовании компонента TADOTable
    Если же запустить скомпилированный exe-файл, то ошибка исчезает.

       
    Исправить данную ошибку можно следующим образом. Достаточно щелкнуть правой кнопкой мыши по
    компоненту TADOTable и добавить все поля таблицы. В результате ошибка исчезает.

       

       
    На следующем шаге мы рассмотрим файлы подключения.



    Вы можете оставить комментарий, или Трекбэк с вашего сайта.

    Оставить комментарий