ВУЗ:
Составители:
Рубрика:
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
- …
- следующая ›
- последняя »
