Всем привет, и вот мой первый урок, думаю урок полезный, так как работа с базами данных в Delphi очень важно, а тем более Access на мой взгляд самая легкая база данных, с которой можно работать в Delphi. В этой статье я расскажу Вам как эту самую Базу данных Access подключить в Delphi, ну а в последующих статьях мы рассмотрим как добавлять информацию, редактировать, удалять и так далее, и Вы убедиться потом что ничего сложного в этом нету. Для начала запустим Delphi. Создадим новое приложение File-New-Application, думаю здесь объяснять долго ничего не надо. Что делаем далее, на нашу главную форму «ставим» следующие компоненты
- TDBGrid
- TDataSource
- TADOConnection
- TADOQuery
Итак теперь по компонентам:
TDBGrid находиться на вкладке DataControls, предназначен для отображения данных БД в нашей программе (приложении)
TDataSource находится на вкладке Data Access, предназначен для связи нашей сетки отображения данных, с самой БД
TADOConnection находится на вкладке ADO, предназначен для подключения нашей БД по определенному провайдеру
TADOQuery находится также на вкладке ADO, предназначен для получение нужных результатов из нашей БД.
Ну по компонентам немного прошлись, свойства я их не рассказываю, так как пока что не об этом, но дальше будет интереснее. Далее нам необходимо создать Базу данных в MS Access. А как же без нее, думаю как создать примитивную БД в MS Access труда не составит, я создам БД и таблицу с полями
- ФИО — строковый тип данных (fio)
- оценка — числовой тип данных (oz)
И назову ее Student, сохраним нашу БД в нужное место и продолжим дальше, ах да ну и заполните вашу таблицу какими-нибудь данными. А теперь мы «свяжим» все необходимые компоненты, которые находятся на нашей главной форме
TADOQuery в свойстве Connection я «связываю» с TADOConnection из выпадающего списка я выбираю имя данного компонента.
TDataSource в свойстве DataSet я «связываю» с TADOQuery из выпадающего списка я выбираю имя данного компонента
TDBGrid в свойстве DataSource я «связываю» с TDatasource из выпадающего списка я выбираю имя данного компонента.
Вот и все пол-дела сделано!!! Все свойства, с которыми мы связывали компоненты, они все ну красноватого цвета, так что Вы не ошибетесь.
Далее выделяем компонент TADOConnection и в свойстве LoginPromt ставим на False. Это делаем для того, чтобы при подключении к БД у нас не запрашивался пароль, дальше в свойстве ConnectionString нажимаем на кнопку с «…» и появляется окно следующего вида:
В данном окне нажимаем на кнопку «Build…» и появляется коно следующего вида:
В данном окне мы выбираем провайдера, а именно Microsoft Jet 4.0 OLE DB Provaider и нажимаем кнопку «Далее«.
В данном окне мы указываем путь к нашей БД и имя пользователя по умолчанию Admin. Если ваша БД находится в корневом каталоге с программой, то в данном поле достаточно указать ее имя с расширением, а если еще в подкаталоге, то указывается это примерно так BD\mydb.mdb
Почти все закончили осталось только нажать кнопку «Ок» и в свойстве компонента TADOConnection — Mode выбрать из выпадающего списка cmShareDenyNone.
Вот и все подключение у нас организовано теперь нам осталось только отобразить наши данные в таблице. Для этого в событии нашей главной формы OnCreate напишем следующее
procedure TForm1.FormCreate(Sender: TObject);
begin
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT * FROM Student');
ADOQuery1.Active:=True;
end;Что мы в этом коде делаем, обычный запрос к нашей таблице Student, как мы и называли ее. То есть мы запрашиваем у нее этим запросом все поля с данными и после этого просто активируем наш запрос, чтобы данные отобразились с помощью свойства Active
Исходники с базой данных скачать можно тут
| А Вы знаете, вообще сколько существует форматов графики и чем они друг от друга отличаются. Одним из форматом графики, а точнее формат растровой графики является формат bitmap, про который следует прочитать и ознакомиться с ним, а также произвести сравнения с другими форматами графики. |
В следующем уроке по базам данных мы поговорим как добавлять, редактировать, удалять и корректировать информацию в Delphi в БД MS Access
