Liczba rekordów

0

Witam wszystkich.

Mam bazę danych Paradox i chciałbym się dowiedzieć ile w niej znajduje się rekordów.

Zrobiłem to za pomocą pętli ale to nie jest najszczęśliwsze rozwiązanie.

Table1.FindFirst;
for i := 1 to 100000 do begin
if Table1.FindNext = false then begin
StatusBar1.Panels[0].Text := 'Liczba rekordów w bazie: ' + IntToStr(i);
Table1.FindFirst;
Break;
end;
end;

Czy ktoś wiej jak można to zrobić prościej?

0

Może Table1.RecordCount?

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.