ВУЗ:
Составители:
Рубрика:
29
Пример организации прохода по таблице с использованием BOF и Prior:
while not Table1.Bof do
begin
. . . //действия с данными
Table1.Prior;
end;
Цикл будет продолжаться до тех пор, пока вызов Table1.Prior не смо-
жет больше выполнить перемещение на предыдущую запись в таблице. В этот
момент
BOF вернет true и программа выйдет из цикла.
Свойство
EOF возвращает true в следующих случаях:
− после того, как был открыт пустой файл;
− после вызова
TDataSet.Last;
− после того, как вызов
TDataSet.Next не выполняется.
Код, приведенный ниже, позволяет пробежать по всем записям в таблице
от начала до конца:
Table1.First;
while not Table1.EOF do
begin
. . . //действия с данными
Table1.Next;
end;
2.3. Доступ к полям
Таблица состоит из записей, а записи – из полей. При работе с полями
программно надо уметь правильно к ним обращаться.
Существует несколько способов получения доступа к полям записи. Пре-
жде всего это возможности класса
TDataSet:
свойство
Fields[Index:Integer]:TField,
свойство
FieldValues[const FieldName:string]:Variant,
метод
FieldByName(const FieldName:string):TField,
а также свойство Value:Variant класса TField.
Пример организации прохода по таблице с использованием BOF и Prior: while not Table1.Bof do begin . . . //действия с данными Table1.Prior; end; Цикл будет продолжаться до тех пор, пока вызов Table1.Prior не смо- жет больше выполнить перемещение на предыдущую запись в таблице. В этот момент BOF вернет true и программа выйдет из цикла. Свойство EOF возвращает true в следующих случаях: − после того, как был открыт пустой файл; − после вызова TDataSet.Last; − после того, как вызов TDataSet.Next не выполняется. Код, приведенный ниже, позволяет пробежать по всем записям в таблице от начала до конца: Table1.First; while not Table1.EOF do begin . . . //действия с данными Table1.Next; end; 2.3. Доступ к полям Таблица состоит из записей, а записи – из полей. При работе с полями программно надо уметь правильно к ним обращаться. Существует несколько способов получения доступа к полям записи. Пре- жде всего это возможности класса TDataSet: свойство Fields[Index:Integer]:TField, свойство FieldValues[const FieldName:string]:Variant, метод FieldByName(const FieldName:string):TField, а также свойство Value:Variant класса TField. 29
Страницы
- « первая
- ‹ предыдущая
- …
- 27
- 28
- 29
- 30
- 31
- …
- следующая ›
- последняя »