INOMARKALK ru
» » Создать в delphi access таблица

Создать в delphi access таблица

Рубрика : Финансы

Обычно, для работы с текстовым файлом в Delphi достаточно использовать простые команды связи внешнего файла с файловой переменной и команды чтения и записи.

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



Создать в delphi access таблица видеоматериалы




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

Чтобы организовать работу программы с БД, потребуется следующие компоненты: После того, как все компоненты установлены на форму, можно приступить к их настройке. Для решения нашей задачи никакого программного кода не потребуется. Только настройка свойств компонентов: Получаем еще одно окно с несколькими закладками. Выберете или введите имя базы данных: Нажимаем на кнопку "Далее", либо переходим к вкладке "Подключение".

Здесь нам нужно выбрать или ввести базу данных. Тут есть одно замечание. Если мы выберем базу данных, то есть, нажмем на кнопку с тремя точками, откроем диалог выбора и найдем там наш файл, то база данных будет привязана к указанному адресу. Если вы желаете поместить базу данных в какой-то определенной папке, то так и поступите. Однако если вы поместили файл с базой данных в нашем случае ok. В этом случае вы не сможете проверить подключение, нажав на кнопку "Проверить подключение".

Ну и не надо, обойдемся без проверки.


Создание базы данных MS Access

Укажите только имя файла - ok. Нажмите на кнопку "ОК". Закрываем окно редактора связей, и нам остается открыть подключение. Если этого не сделать, то при каждой попытке соединиться с базой данных будет выходить запрос на пользовательское имя и пароль, нам это не нужно, наша база данных без пароля. Теперь свойство Connected переведите в True.

Если вам удалось это сделать, и не вышло никаких сообщений об ошибке, то подключение состоялось. Установите в модуль данных четыре компонента ADOTable, по одному на каждую таблицу из нашей базы данных. Все компоненты наборов данных являются потомками класса TDBDataSet, и имеют много общих свойств, методов и событий. Эти компоненты также называют наборами данных. Компоненты позволяют получить из одной или нескольких таблиц только те данные, которые удовлетворяют запросу.

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

Рядом с компонентом установите компонент DataSource из вкладки Data Access палитры компонентов. То же самое нужно проделать еще три раза, подключая аналогичным образом компоненты DataSource к другим таблицам: Модуль данных с установленными компонентами. Затем свойство Active таблиц переведите в True, открыв их. Для тех, кто пропустил предыдущий курс, напомню, что таблицы можно открывать и закрывать не только в Инспекторе Объектов, но и программно.

Как открыть, так и закрыть таблицы можно двумя абсолютно равноценными способами: Перейдите на главную форму. Теперь мы сможем видеть таблицы из главной формы. На вкладке DataControls сосредоточены визуальные видимые пользователю компоненты отображения данных, такие как DBGrid сетка, отображающая все данные НД в виде таблицы, и позволяющая редактировать их , DBEdit поле редактирования данных, предназначенная для ввода или редактирования одного поля записи, то есть, ячейки таблицы , DBMemo для редактирования MEMO-полей и т.

Единственным исключением является компонент DBNavigator. Этот компонент предназначен не для отображения данных, а для перемещения по записям набора данных, для вставки новой записи или удаления старой, для перевода НД в режим редактирования или для подтверждения сделанных изменений в наборе данных.

В таком же свойстве нижней сетки выберите fDM. Сетки среагировали, и вы можете видеть названия полей.



таблица access в создать delphi


Разумеется, таблица еще пуста, данных пока нет. Кстати, выделите обе сетки, и установите в True их свойства ReadOnly - только чтение.

Таблицы ведь будут связаны, и нам не нужно, чтобы пользователь вводил данные фрагментарно.



таблица access создать delphi в


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

Снова выделите модуль данных. Щелкните дважды по первой таблице, чтобы открыть редактор полей. Правой кнопкой щелкните по этому редактору и выберите команду Add all fields добавить все поля.



access создать таблица delphi в


В окне редактора полей появились все поля таблицы: Редактор полей Редактор полей предназначен для настройки параметров каждого поля, для добавления новых полей или удаления имеющихся. Если в редакторе полей нет ни одного поля, то в компоненте DBGrid будут отображены все поля таблицы, имеющие параметры по умолчанию.

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

Кроме того, редактор полей предоставляет возможность добавлять в набор данных новые поля, например вычисляемые или просматриваемые lookup. Но эту возможность мы будем рассматривать в других лекциях. Поле "Ключ" у нас автоинкрементное, предназначено для связи с другими таблицами. Пользователю его видеть не обязательно.

Выделите его, и в свойстве Visible установите False. Теперь для пользователя оно будет невидимым. Чтобы True и False выходили на экране так, как нам нужно, свойству DisplayValues первого из этих полей присвойте значение "Женат;Холост" разумеется, без кавычек , а второго - "Да;Нет".

Первым здесь идет значение, которое будет обозначать True, вторым - False. Эти значения разделяются точкой с запятой, пробелы не нужны.

Таким же образом добавьте все поля в остальные три таблицы. У них невидимым следует сделать поле "Сотрудник" - этому полю автоматически будет присвоено такое же число, как у поля Ключ соответствующей записи. Логических полей у них нет. Однако для поля "Телефон" таблицы Telephones следует изменить свойство EditMask.

Щелкните по нему дважды, открыв редактор маски, и в поле Input Mask введите маску " - - - ". Можно произвольно задавать для выражении тип Variant в форме Variant X.

В Object Pascal определены два особых значения Variant. Значение Unassigned применяется для указания, что вариантной переменной пока не присвоено значение какого бы то ни было типа. Значение Null указывает на наличие в переменной данных неизвестного типа или потерю данных. Разницу между этими двумя значениями трудно уловить. Значение Unassigned присваивается вариантным переменным автоматически при их создании, независимо от того, локальная это переменная или глобальная, и является ли она частью другой, структурной, переменной, такой как запись или массив.

Unassigned означает, что к данной вариантной переменной еще не обращались. Null же означает, что к вариантной переменной обращались, но не ввели в нее никакой информации.


Свойство ConnectionString компонента ADOConnection

Таким образом, Null указывает, что значение вариантной переменной недействительно или отсутствует. Вариантные переменные предоставляют широкие возможности формирования выражений с переменными разных типов. Однако за это приходится платить большим, по сравнению с жестко задаваемыми типами, расходом памяти. К тому же на выполнение операций с вариантными переменными требуется больше времени. Интересна проблема использования вариантной переменной как массива.

Элементы этого массива должны быть одного типа.



delphi таблица в создать access


На первый взгляд, это вполне естественное условие. Однако элементам массива можно присвоить и тип Variant! Тогда каждый элемент сможет содержать информацию разных типов, в том числе массив Variant.

Как правило, вариантные массивы создаются с помощью процедуры VarArrayCreate. Для передачи двоичной информации между контроллерами автоматизации OLE и серверами обычно применяются вариантные массивы с элементами varByte. Вариантные массивы типа varByte не могут подвергаться никаким преобразованиям.


Год выпуска: 2011
Поддерживаемые ОС: Windows XP, 7,
Локализация: Русский Английский
Вес : 221.79 Килобайт




Блок комментариев

Ваше имя:


Электронная почта:




  • © 2010-2017
    inomarkalk.ru
    Напишите нам | RSS фид | Карта сайта