Daten eines Feldes in einer Query addieren

[TypusMensch]

Hab mich belesen (wofür gibt's die Hilfe??? ) und kam auf folgendes Ergebnis, was aber immernoch eine Fehlermeldung ausgibt.

Code:

  for i := 0 to DaysBetween(DatMod.FTaFbeginn.AsDateTime, DatMod.FTaFende.AsDateTime) do
    begin
    Datum := DatMod.FTaFbeginn.AsDateTime + i;
    anzahldatum := 0;
    Kopie2.SQL.Clear;
    s := 'select Sum(ZIanzahl) AS Summe';
    s := s + ' from zwischen;
    //fest,kunden,zwischen,inventar';
    s := s + ' where';
    s := s + ' zwischen.ZInr = inventar.Inr AND zwischen.ZFnr = fest.Fnr AND fest.fknr = kunden.knr';
    s := s + ' AND fest.fbeginn <= "'+DateToStr(Datum)+'" AND fest.fende >= "'+DateToStr(Datum)+'"';
    s := s + ' AND zwischen.ZInr = '+DatMod.IQuInr.AsString;}
    Kopie2.SQL.Add(s);
    Showmessage(s);
    Kopie2.Active:=True;
    anzahldatum:=Kopie2.FieldByName('Summe').AsInteger;
    ShowMessage('Datum: '+datetostr(Datum)+'; Anzahldatum: '+inttostr(anzahldatum));
    end;

Fehler lautet "Invalid field name. INr".
Wieso das?