Datensätze mit SQL zählen

[fl63]

Hallo

Ich möchte die Datensätze einer Tabelle mit SQL zählen und als StatusPanel ausgeben.
Dafür habe ich folgenden Quelltext:

Delphi-Quellcode:

   with Query2 do
   begin
   Active:= false;
   SQL.Clear;
 SQL.Add('Select Count (feld001) as AnZahl from '+ ComboBox1.Text) ;
   StatusBar1.Panels[0].Text:=IntToStr(Anzahl ) ;
   Active := true;
  end;

In Variable Anzahl soll die gesamtZahl der Datensätze dieser Tabelle stehen. Es steht aber eine undefinierbare hohe Zahl (1243048) im Statuspanel. Egal welche Tabelle ob mit 5 oder 100000 Datensätzen diese Zahl ist dieselbe.
Auch das zurücksetzen der Variable Anzahl (Anzahl := 0) führt zu dem Ergebnis,daß in dem Statuspanel 0 steht. Für mich steht fest dieser Textmacht alles andere nur nicht zählen.
Wo ist mein Fehler?