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

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 оставьте пустую строку.

 

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

 

procedureTForm1.Button1Click (Sender: TObject);