БОЛЬШОЙ FAQ ПО DELPHI



Текущая 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;
 




<< ВЕРНУТЬСЯ В ОГЛАВЛЕНИЕ



Материалы находятся на сайте https://exelab.ru/pro/



Видеокурс ВЗЛОМ