Текущая TTable пуста?

Галимарзанов Фанис пишет:

Проверить таблицу - имеет она записи или нет, можно с помощью простой функции

Function NotEmptySet(inSet:TDataSet):boolean;
begin
Result:=Not (inSet.Bof and inSet.eof);
end;

Проще некуда, используются известные свойства DataSet.Bof и DataSet.Eof Удалить все записи из таблицы (вместо EmptyTable)

while NotEmptySet(dm.taAb) do dm.taAb.Delete;

[000555]

Содержание Назад Вперед

Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий