Пример.

Методы

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

процедура Next –установка на следующую запись; для последней записи указатель не перемещается;

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

процедура Prior– установка на предыдущую запись; для первой записи указатель не перемещается;

функция MoveBy (Distance: Integer): Integer;– перемещение на количество записей, указанное параметром функции. Например,

procedure TForm1.Button1Click(Sender: TObject);

begin

DataModule2.Table1.MoveBy(2);

Label1.Caption:=IntToStr(DataModule2.Table1.RecNo);

end;

s

// перебор всех записей набора данных

var i: integer;

…

Table1.First;

For i:=1 to Table1.RecordCount do begin

// обработка i-ой записи

…

Table1.Next;

End;

p

Набор данных может находиться в открытом (Table1.Active:= True) или закрытом (Table1.Active:= False) состояниях.

процедура Open – открывает набор данных, например,

Table1.Open;

процедура Close– закрывает набор данных, например,

Table1.Close;

или Table1.Active:=False;

процедура EmptyTable – удаляет из таблицы все записи;

процедура Post; override –записывает измененную запись в базу данных;

Наборы данных могут находиться в различных режимах. Текущий режим определяется свойством State:TDataSetState, которое доступно для чтения во время выполнения приложения. Для изменения режима используются специальные методы (прямые или косвенные).

Режимы набора данных

dsInactive – неактивность, набор данных закрыт и доступ к данным не возможен. Набор данных переходит в этот режим, если Active:=False;

dsBrowse– осуществляется навигация по записям набора данных и просмотр. Переходит:

из режима dsInactive – если Active:=true;

из режима dsEdit – при вызове метода Post или Cancel;

из режима dsInsert - при вызове метода Post или Cancel;

dsEdit – редактирование текущей записи. Переходит из режима dsBrowseпри вызове метода Edit.

dsInsert – вставка новой записи. Переходит из режима dsBrowse при вызове методов Insert, InsertRecord, Append или AppendRecord.

dsSetKey– поиск записи, удовлетворяющей заданному критерию. Переходит из dsBrowse при вызове методов SetKey,
SetRangeXXX, FindKey, GotoKey, FindNearest, GotoNearest.

dsCalcFields- расчет вычисляемых полей. Используется обработчик события OnCalcFields.

dsFilter- фильтрация записей. Автоматически переходит из режима dsBrowseпри выполнении обработчика события OnFilterRecord.

При выполнении программы режим набора данных можно определить с помощью свойства State:TDataSetStateкомпонента DataSourse.

Например,

procedure TDataModule2.DataSource1StateChange(Sender: TObject);

begin

case DataSource1.State of

dsInactive: Form1.Label1.Caption:=’НД закрыт';

dsBrowse: Form1.Label1.Caption:='Просмотр НД';

dsEdit: Form1.Label1.Caption:='Редактирование';

dsInsert: Form1.Label1.Caption:='Вставка';

else Form1.Label1.Caption:=Режим не определен!'

end;

end;

События