Перемещение по записям набора данных

II. Контрольные вопросы

1.С каким компонентом работает Редактор колонок?

2.Для чего используется Редактор колонок?

3.Как открыть Редактор колонок?

Задание для самостоятельной работы

Создайте БД «Список группы».

Имя поля	Информация
FIO	ФИО
Data	Дата рождения
Language	Изучаемый язык

v Подумайте, какого типа и размера должно быть каждое поле. (см. таблицу «Типы данных таблицы Paradox»)

v БД должна содержать не менее 5 записей.

v Данные в приложении должны отображаться в режиме таблицы.

v Имена столбцов должны быть на кириллице.

v Поле «Изучаемый язык» должно представлять собой выпадающий список со следующим содержанием:

Ø английский

Ø немецкий

Ø французский

Ø испанский

Таблица «Типы данных таблицы Paradox»

Практическая работа 5. Тема: Перемещение по записям набора данных. Доступ к полям.

Цели:

1. Изучить объекты доступа к полям;

.

2. На практических примерах изучить методы перемещения по записям НД;

3. Развивать логическое мышление.

Ход работы:

Практическое задание №1

Создайте в своей рабочей папке новую папку под именем «Товар». Пропишите к ней псевдоним «Tovar». Создайте таблицу «Tovar.db» со следующими полями:

Field Name	Type	Size
Tovar	A
Kod	I
DataVipusk	D
SrokGodnos	D
Kolvo	I
Cena	$

Внесите в таблицу следующие записи:

Откройте Delphi. Разместите на форме следующие компоненты и настройте их свойства:

Компонент	Свойство
	DataBaseName – Tovar
Table1	TableName – Tovar.db
	Active - True
DataSource1	DataSet – Table1
DBGrid1	DataSource – DataSource1
DBNavigator1	DataSource – DataSource1

Перемещение по НД заключается в управлении указателем текущей записи (курсором). Этот указатель определяет запись, с которой будут выполняться какие-либо операции.

Перед перемещением указателя текущей записи НД автоматически переводится в режим просмотра. Для перемещения указателя текущей записи используются методы:

Процедура First – установка курсора на первую запись НД;

Процедура Next – на следующую запись;

Процедура Last – на последнюю запись;

Процедура Prior – на предыдущую запись;

Функция MoveBy (n:integer): integer – перемещение на число запсией, указанных в параметре n n>0 – перемещение вперед;

n<0 – назад;

n=0 – нет перемещения. Результат функции – число записей, на которое переместился указатель.

Практическое задание №2

Перемещение по записям НД с помощью кнопок. Расположить на форме следующие компоненты:

Компонент SpinEdit (п. к. Samples) – редактор числа, обеспечивающий отображение и редактирование целого числа с возможностью его изменения с помощью двойной кнопки.

Для компонента Label1 в свойстве Caption оставьте пустую строку.

При помощи рассмотренных методов напишите процедуру для кнопки «Первая запись»:

procedure TForm1.Button1Click (Sender: TObject);

Дата добавления: 2014-11-06