Delphi-Quellcode:
count.SQL.Clear;
Qcount.SQL.Add('SELECT COUNT(*) AS count FROM FZ where FZTYP=:FZTYP');
Qcount.ParamByName('FZTYP').AsString:=cmbModel.Text;
Qcount.Open;
while not Qcount.Eof do
begin
LbCount.Items.Add(Qcount.FieldByName('Count').AsString);
Qcount.Next;
end;
Qcount.Close;
Also wie in meinem Quelltext geschrieben scheint es nicht zu gehen.
Hab jetzt extra Code mitgeliefert